From 1ed828da721157115f5620c23b15662a2fb0de05 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andreas=20M=C3=BCller?= <andreas.mueller@ost.ch>
Date: Mon, 3 Jan 2022 16:56:27 +0100
Subject: Mantellinien zur Kegelschnittgraphik

---
 .../030-geometrie/images/kegelschnitte.tex         | 88 ++++++++++++++--------
 1 file changed, 55 insertions(+), 33 deletions(-)

(limited to 'buch/chapters/030-geometrie/images/kegelschnitte.tex')

diff --git a/buch/chapters/030-geometrie/images/kegelschnitte.tex b/buch/chapters/030-geometrie/images/kegelschnitte.tex
index b8067ad..bb91d0d 100644
--- a/buch/chapters/030-geometrie/images/kegelschnitte.tex
+++ b/buch/chapters/030-geometrie/images/kegelschnitte.tex
@@ -18,6 +18,7 @@
 \definecolor{fokusfarbe}{rgb}{0.8,0.0,0.0}
 \definecolor{scheitelfarbe}{rgb}{0,0.6,0}
 \definecolor{leitfarbe}{rgb}{0.8,0.2,0.8}
+\definecolor{mantelfarbe}{rgb}{0.2,0.6,1.0}
 
 \newboolean{showgrid}
 \setboolean{showgrid}{false}
@@ -37,38 +38,56 @@
 \fill (0,0) circle[radius=0.05];
 }{}
 
+%
+% Lage der Schnittebene
+%
 \begin{scope}[yshift=-7.5cm]
-
-\begin{scope}
-\clip (-2,-2.5) rectangle (2,1.5);
-\fill[color=kegelfarbe!40]
-	(-1.4,-3) -- (1.4,-3) -- (-1.4,3) -- (1.4,3) -- cycle;
-\begin{scope}[xshift=0.5cm]
-\draw[color=ebenenfarbe,line width=1.4pt]
-	(-1.4,-3) -- (1.4,3);
-\end{scope}
-\end{scope}
-
-\begin{scope}[xshift=-4.5cm]
-\clip (-2,-2.5) rectangle (2,1.5);
-\fill[color=kegelfarbe!40]
-	(-1.4,-3) -- (1.4,-3) -- (-1.4,3) -- (1.4,3) -- cycle;
-\begin{scope}[xshift=-0.3cm]
-\draw[color=ebenenfarbe,line width=1.4pt] (-0.4,-3) -- (0.4,3);
-\end{scope}
-\end{scope}
-
-\begin{scope}[xshift=4.5cm]
-\clip (-2,-2.5) rectangle (2,1.5);
-\fill[color=kegelfarbe!40]
-	(-1.4,-3) -- (1.4,-3) -- (-1.4,3) -- (1.4,3) -- cycle;
-\begin{scope}[xshift=0.9cm]
-\draw[color=ebenenfarbe,line width=1.4pt] (-3.4,-3) -- (3.4,3);
-\end{scope}
-\end{scope}
+	% Hyperbel
+	\begin{scope}[xshift=-4.5cm]
+		\clip (-2,-2.5) rectangle (2,1.5);
+		\fill[color=kegelfarbe!40]
+			(-1.4,-3) -- (1.4,-3) -- (-1.4,3) -- (1.4,3) -- cycle;
+		\begin{scope}[xshift=-0.3cm]
+			\draw[color=ebenenfarbe,line width=1.4pt]
+				(-0.4,-3) -- (0.4,3);
+		\end{scope}
+		\begin{scope}
+			\draw[color=mantelfarbe,line width=1.2pt]
+				(-0.4,-3) -- (0.4,3);
+		\end{scope}
+	\end{scope}
+
+	% Parabel
+	\begin{scope}
+		\clip (-2,-2.5) rectangle (2,1.5);
+		\fill[color=kegelfarbe!40]
+			(-1.4,-3) -- (1.4,-3) -- (-1.4,3) -- (1.4,3) -- cycle;
+		\begin{scope}[xshift=0.5cm]
+			\draw[color=ebenenfarbe,line width=1.4pt]
+				(-1.4,-3) -- (1.4,3);
+		\end{scope}
+		\begin{scope}
+			\draw[color=mantelfarbe,line width=1.2pt]
+				(-1.4,-3) -- (1.4,3);
+		\end{scope}
+	\end{scope}
+
+	% Ellipse
+	\begin{scope}[xshift=4.5cm]
+		\clip (-2,-2.5) rectangle (2,1.5);
+		\fill[color=kegelfarbe!40]
+			(-1.4,-3) -- (1.4,-3) -- (-1.4,3) -- (1.4,3) -- cycle;
+		\begin{scope}[xshift=0.9cm]
+			\draw[color=ebenenfarbe,line width=1.4pt]
+				(-3.4,-3) -- (3.4,3);
+		\end{scope}
+	\end{scope}
 
 \end{scope}
 
+%
+% Beschriftung der 3D-Abbildung
+%
 \def\marke#1#2#3#4{
 	\fill[color=white,opacity=0.5]
 		({#1-0.25},{#2-0.2}) rectangle ({#1+0.20},{#2+0.2});
@@ -97,15 +116,18 @@
 \marke{5.3}{-0.0}{scheitelfarbe}{$S_2$}
 \node[color=yellow] at (4.8,-2.7) [below right] {$P$};
 
+%
+% Beschriftung und geometrische Örter
+%
 \begin{scope}[yshift=-5.5cm]
-\node at (-4.5,0)
+	\node at (-4.5,0)
 	{Hyperbel: $\overline{F_1P}-\overline{F_2P}=\text{const}$\strut};
 
-\fill[color=white,opacity=0.7] (-1.3,-0.25) rectangle (1.3,0.25);
-\node at (0,0) {Parabel: $\overline{FP}=\overline{lP}$\strut};
+	\fill[color=white,opacity=0.7] (-1.3,-0.25) rectangle (1.3,0.25);
+	\node at (0,0) {Parabel: $\overline{FP}=\overline{lP}$\strut};
 
-\fill[color=white,opacity=0.7] (2.4,-0.25) rectangle (6.6,0.25);
-\node at (4.5,0)
+	\fill[color=white,opacity=0.7] (2.4,-0.25) rectangle (6.6,0.25);
+	\node at (4.5,0)
 	{Ellipse: $\overline{F_1P}+\overline{F_2P}=\text{const}$\strut};
 \end{scope}
 
-- 
cgit v1.2.1