Io ho fatto un piccolo tentativo e ho prodotto:
[attachment=368]Immagine_2012-06-29.jpg[/attachment]
Ecco il codice:
`
\documentclass[a4paper,11pt]{article}
\usepackage{tikz}
% change sphere shading
\makeatletter
\pgfdeclareradialshading[tikz@ball]{ball}{\pgfqpoint{5bp}{10bp}}{%
color(0bp)=(tikz@ball!30!white);
color(9bp)=(tikz@ball!75!white);
color(18bp)=(tikz@ball!90!black);
color(25bp)=(tikz@ball!70!black);
color(50bp)=(black)}
\makeatother
\begin{document}
\tikzset{
MyPersp/.style={scale=1.8,x={(-0.8cm,-0.4cm)},y={(0.8cm,-0.4cm)},
z={(0cm,1cm)}}}
\thispagestyle{empty}
\begin{figure}[tb]
\centering
\begin{tikzpicture}[MyPersp]
\def\h{-1.53}% Heigth of the ellipse center (on the axis of the cylinder)
\def\a{40}% angle of the section plane with the horizontal
\pgfmathparse{\h/tan(\a)}
\let\b\pgfmathresult
\pgfmathparse{sqrt(1/cos(\a)/cos(\a)-1)}
\let\c\pgfmathresult %Center Focus distance of the section ellipse.
% Sphere
\shade [ball color=orange] (1.9,2) circle (1.2cm);
% Ellipse
\draw[blue!40,draw=blue,very thick,opacity=0.5]
(-0.91,0.5,{\h-tan(\a)}) % elliptical section
\foreach \t in {-45,-40,…,225}
{–({sin(\t)},{cos(\t)},{-tan(\a)*cos(\t)+\h})};
\end{tikzpicture}
\end{figure}
\end{document}
`
Alcuni comandi sono presi da http://www.texample.net/tikz/examples/dandelin-spheres/. Il “guaio” è che il disegno è fatto ad hoc: per creare più ellissi è necessario sia cambiare le definizioni di [tt]\h[/tt] ed [tt]\a[/tt] che l’angolo di inizio e fine ellisse (nel mio esempio da [tt]-45, 225[/tt]) più la corrispondente coordinata ([tt]-0.91[/tt]).
Per dirla tutta, l’approccio funziona, ma sulla sua validità non scommetto molto.
Ciao
Claudio