From 09e2c20b0a41a36161547b2628366db1e048eaf8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andreas=20M=C3=BCller?= <andreas.mueller@ost.ch>
Date: Tue, 12 Oct 2021 07:44:15 +0200
Subject: add some info on elliptic functions

---
 .../030-geometrie/images/hyperbelflaeche.tex       | 49 ++++++++++++++++++++++
 1 file changed, 49 insertions(+)
 create mode 100644 buch/chapters/030-geometrie/images/hyperbelflaeche.tex

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

diff --git a/buch/chapters/030-geometrie/images/hyperbelflaeche.tex b/buch/chapters/030-geometrie/images/hyperbelflaeche.tex
new file mode 100644
index 0000000..11e865f
--- /dev/null
+++ b/buch/chapters/030-geometrie/images/hyperbelflaeche.tex
@@ -0,0 +1,49 @@
+%
+% hyperbelflaeche.tex -- Argument der Hyperbelfunktionen
+%
+% (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
+%
+\documentclass[tikz]{standalone}
+\usepackage{amsmath}
+\usepackage{times}
+\usepackage{txfonts}
+\usepackage{pgfplots}
+\usepackage{csvsimple}
+\usetikzlibrary{arrows,intersections,math}
+\begin{document}
+\def\skala{2}
+\begin{tikzpicture}[>=latex,thick,scale=\skala]
+
+\fill[color=blue!20]
+	(0,0)
+	--
+	plot[domain=0:1,samples=100] ({cosh(\x)},{sinh(\x)})
+	-- cycle;
+\draw[color=blue] 
+	(0,0)
+	--
+	plot[domain=0:1,samples=100] ({cosh(\x)},{sinh(\x)})
+	-- cycle;
+
+\begin{scope}
+\clip (-1.8,-2) rectangle (2.5,2);
+\draw[color=red,line width=1.4pt] plot[domain=-2:2,samples=100]
+	({cosh(\x)},{sinh(\x)});
+\draw[color=red,line width=1.4pt] plot[domain=-2:2,samples=100]
+	({-cosh(\x)},{sinh(\x)});
+\end{scope}
+
+\fill[color=white] ({cosh(1)},{sinh(1)}) circle[radius=0.03];
+\draw ({cosh(1)},{sinh(1)}) circle[radius=0.03];
+
+\node at ({cosh(1)},{sinh(1)}) [right] {$\gamma(t)=(\cosh t,\sinh t)$};
+
+\draw[->] (-1.8,0) -- (3.1,0) coordinate[label={$x$}];
+\draw[->] (0,-2) -- (0,2.1) coordinate[label={right:$y$}];
+
+\node[color=blue] at (0.8,0.3) {$t$};
+\node at (0,0) [below left] {$O$};
+
+\end{tikzpicture}
+\end{document}
+
-- 
cgit v1.2.1

