LaTeX-examples/documents/GeoTopo/figures/torus-gauss-kruemmung.tex

\begin{tikzpicture}
\tikzstyle{point}=[circle,thick,draw=black,fill=black,inner sep=0pt,minimum width=4pt,minimum height=4pt]
\draw (-3.5,0) .. controls (-3.5,2) and (-1.5,2.5) .. (0,2.5);
\draw[xscale=-1] (-3.5,0) .. controls (-3.5,2) and (-1.5,2.5) .. (0,2.5);
\draw[rotate=180] (-3.5,0) .. controls (-3.5,2) and (-1.5,2.5) .. (0,2.5);
\draw[yscale=-1] (-3.5,0) .. controls (-3.5,2) and (-1.5,2.5) .. (0,2.5);

\draw (-2,.2) .. controls (-1.5,-0.3) and (-1,-0.5) .. (0,-.5) .. controls (1,-0.5) and (1.5,-0.3) .. (2,0.2);
\draw (-1.75,0) .. controls (-1.5,0.3) and (-1,0.5) .. (0,.5) .. controls (1,0.5) and (1.5,0.3) .. (1.75,0);

\draw[dashed] (0,-1.5) ellipse (0.5cm and 1cm);
\draw (0,-0.5) arc (-270:-90:0.5 and 1);

\node (s1)[point,orange,label={[label distance=0mm]90:\color{orange}$s_1$}] at (0,-0.5) {};
\node (s2)[point,red,label={[label distance=0mm]120:\color{red}$s_2$}] at (-0.5,-1.4) {};
\node (s3)[point,green,label={[label distance=0mm]90:\color{green}$s_3$}] at (0,-2.5) {};
\draw[red] (0,0.07) ellipse (3cm and 1.5cm);
\end{tikzpicture}