aboutsummaryrefslogtreecommitdiffstats
path: root/buch/papers/fresnel/images
diff options
context:
space:
mode:
authorAndreas Müller <andreas.mueller@ost.ch>2022-05-19 17:28:33 +0200
committerAndreas Müller <andreas.mueller@ost.ch>2022-05-19 17:28:33 +0200
commit32f1a1d818f0fe28b2ae97071e31a773ee2d028a (patch)
tree4615672911c7c79223bd8c4819c7ed9c31ef6d67 /buch/papers/fresnel/images
parenttypos (diff)
downloadSeminarSpezielleFunktionen-32f1a1d818f0fe28b2ae97071e31a773ee2d028a.tar.gz
SeminarSpezielleFunktionen-32f1a1d818f0fe28b2ae97071e31a773ee2d028a.zip
some local changes
Diffstat (limited to '')
-rw-r--r--buch/papers/fresnel/images/Makefile38
-rw-r--r--buch/papers/fresnel/images/apfel.jpgbin0 -> 139884 bytes
-rw-r--r--buch/papers/fresnel/images/apfel.pdfbin0 -> 157895 bytes
-rw-r--r--buch/papers/fresnel/images/apfel.tex49
-rw-r--r--buch/papers/fresnel/images/eulerspirale.m (renamed from buch/papers/fresnel/eulerspirale.m)0
-rw-r--r--buch/papers/fresnel/images/eulerspirale.pdf (renamed from buch/papers/fresnel/eulerspirale.pdf)bin22592 -> 22592 bytes
-rw-r--r--buch/papers/fresnel/images/eulerspirale.tex (renamed from buch/papers/fresnel/eulerspirale.tex)0
-rw-r--r--buch/papers/fresnel/images/fresnelgraph.pdf (renamed from buch/papers/fresnel/fresnelgraph.pdf)bin30018 -> 30018 bytes
-rw-r--r--buch/papers/fresnel/images/fresnelgraph.tex (renamed from buch/papers/fresnel/fresnelgraph.tex)0
-rw-r--r--buch/papers/fresnel/images/kruemmung.pdfbin0 -> 10179 bytes
-rw-r--r--buch/papers/fresnel/images/kruemmung.tex51
-rw-r--r--buch/papers/fresnel/images/pfad.pdf (renamed from buch/papers/fresnel/pfad.pdf)bin19126 -> 19264 bytes
-rw-r--r--buch/papers/fresnel/images/pfad.tex (renamed from buch/papers/fresnel/pfad.tex)3
-rw-r--r--buch/papers/fresnel/images/schale.pdfbin0 -> 352570 bytes
-rw-r--r--buch/papers/fresnel/images/schale.pov191
-rw-r--r--buch/papers/fresnel/images/schale.tex77
16 files changed, 409 insertions, 0 deletions
diff --git a/buch/papers/fresnel/images/Makefile b/buch/papers/fresnel/images/Makefile
new file mode 100644
index 0000000..eb7dc57
--- /dev/null
+++ b/buch/papers/fresnel/images/Makefile
@@ -0,0 +1,38 @@
+#
+# Makefile
+#
+# (c) 2022 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
+#
+all: schale.pdf \
+ fresnelgraph.pdf \
+ eulerspirale.pdf \
+ pfad.pdf \
+ apfel.pdf \
+ kruemmung.pdf
+
+schale.png: schale.pov
+ povray +A0.1 -W1920 -H1080 -Oschale.png schale.pov
+
+schale.jpg: schale.png Makefile
+ convert -extract 1240x1080+340 schale.png -density 300 -units PixelsPerInch schale.jpg
+
+schale.pdf: schale.tex schale.jpg
+ pdflatex schale.tex
+
+eulerpath.tex: eulerspirale.m
+ octave eulerspirale.m
+
+fresnelgraph.pdf: fresnelgraph.tex eulerpath.tex
+ pdflatex fresnelgraph.tex
+
+eulerspirale.pdf: eulerspirale.tex eulerpath.tex
+ pdflatex eulerspirale.tex
+
+pfad.pdf: pfad.tex
+ pdflatex pfad.tex
+
+apfel.pdf: apfel.tex apfel.jpg eulerpath.tex
+ pdflatex apfel.tex
+
+kruemmung.pdf: kruemmung.tex
+ pdflatex kruemmung.tex
diff --git a/buch/papers/fresnel/images/apfel.jpg b/buch/papers/fresnel/images/apfel.jpg
new file mode 100644
index 0000000..76e48e7
--- /dev/null
+++ b/buch/papers/fresnel/images/apfel.jpg
Binary files differ
diff --git a/buch/papers/fresnel/images/apfel.pdf b/buch/papers/fresnel/images/apfel.pdf
new file mode 100644
index 0000000..69e5092
--- /dev/null
+++ b/buch/papers/fresnel/images/apfel.pdf
Binary files differ
diff --git a/buch/papers/fresnel/images/apfel.tex b/buch/papers/fresnel/images/apfel.tex
new file mode 100644
index 0000000..754886b
--- /dev/null
+++ b/buch/papers/fresnel/images/apfel.tex
@@ -0,0 +1,49 @@
+%
+% apfel.tex
+%
+% (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
+%
+\documentclass[tikz]{standalone}
+\usepackage{times}
+\usepackage{amsmath}
+\usepackage{txfonts}
+\usepackage[utf8]{inputenc}
+\usepackage{graphics}
+\usetikzlibrary{arrows,intersections,math}
+\usepackage{ifthen}
+\begin{document}
+
+\newboolean{showgrid}
+\setboolean{showgrid}{false}
+\def\breite{7}
+\def\hoehe{4}
+
+\input{eulerpath.tex}
+
+\begin{tikzpicture}[>=latex,thick]
+
+% Povray Bild
+\begin{scope}
+\clip(-0.6,-0.6) rectangle (7,6);
+\node at (3.1,2.2) [rotate=-3] {\includegraphics[width=9.4cm]{apfel.jpg}};
+\end{scope}
+
+% Gitter
+\ifthenelse{\boolean{showgrid}}{
+\draw[step=0.1,line width=0.1pt] (-\breite,-\hoehe) grid (\breite, \hoehe);
+\draw[step=0.5,line width=0.4pt] (-\breite,-\hoehe) grid (\breite, \hoehe);
+\draw (-\breite,-\hoehe) grid (\breite, \hoehe);
+\fill (0,0) circle[radius=0.05];
+}{}
+
+\draw[color=gray!50] (0,0) rectangle (4,4);
+\draw[->] (-0.5,0) -- (7.5,0) coordinate[label={$C(t)$}];
+\draw[->] (0,-0.5) -- (0,6.0) coordinate[label={left:$S(t)$}];
+\begin{scope}[scale=8]
+\draw[color=red,opacity=0.5,line width=1.4pt] \fresnela;
+\end{scope}
+
+\end{tikzpicture}
+
+\end{document}
+
diff --git a/buch/papers/fresnel/eulerspirale.m b/buch/papers/fresnel/images/eulerspirale.m
index 84e3696..84e3696 100644
--- a/buch/papers/fresnel/eulerspirale.m
+++ b/buch/papers/fresnel/images/eulerspirale.m
diff --git a/buch/papers/fresnel/eulerspirale.pdf b/buch/papers/fresnel/images/eulerspirale.pdf
index 4a85a50..db74e4b 100644
--- a/buch/papers/fresnel/eulerspirale.pdf
+++ b/buch/papers/fresnel/images/eulerspirale.pdf
Binary files differ
diff --git a/buch/papers/fresnel/eulerspirale.tex b/buch/papers/fresnel/images/eulerspirale.tex
index 38ef756..38ef756 100644
--- a/buch/papers/fresnel/eulerspirale.tex
+++ b/buch/papers/fresnel/images/eulerspirale.tex
diff --git a/buch/papers/fresnel/fresnelgraph.pdf b/buch/papers/fresnel/images/fresnelgraph.pdf
index 9ccad56..c658901 100644
--- a/buch/papers/fresnel/fresnelgraph.pdf
+++ b/buch/papers/fresnel/images/fresnelgraph.pdf
Binary files differ
diff --git a/buch/papers/fresnel/fresnelgraph.tex b/buch/papers/fresnel/images/fresnelgraph.tex
index 20df951..20df951 100644
--- a/buch/papers/fresnel/fresnelgraph.tex
+++ b/buch/papers/fresnel/images/fresnelgraph.tex
diff --git a/buch/papers/fresnel/images/kruemmung.pdf b/buch/papers/fresnel/images/kruemmung.pdf
new file mode 100644
index 0000000..1180116
--- /dev/null
+++ b/buch/papers/fresnel/images/kruemmung.pdf
Binary files differ
diff --git a/buch/papers/fresnel/images/kruemmung.tex b/buch/papers/fresnel/images/kruemmung.tex
new file mode 100644
index 0000000..af0a1a9
--- /dev/null
+++ b/buch/papers/fresnel/images/kruemmung.tex
@@ -0,0 +1,51 @@
+%
+% kruemmung.tex -- Krümmung einer ebenen Kurve
+%
+% (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,calc}
+\begin{document}
+\def\skala{1}
+\begin{tikzpicture}[>=latex,thick,scale=\skala]
+
+\begin{scope}
+\clip (-1,-1) rectangle (4,4);
+
+\def\r{3}
+\def\winkel{30}
+
+\fill[color=blue!20] (0,0) -- (0:{0.6*\r}) arc (0:\winkel:{0.6*\r}) -- cycle;
+\fill[color=blue!20] (\winkel:\r)
+ -- ($(\winkel:\r)+(0,{0.6*\r})$) arc (90:{90+\winkel}:{0.6*\r}) -- cycle;
+\node[color=blue] at ({0.5*\winkel}:{0.45*\r}) {$\Delta\varphi$};
+
+\node[color=blue] at ($(\winkel:\r)+({90+0.5*\winkel}:{0.45*\r})$)
+ {$\Delta\varphi$};
+
+\draw[line width=0.3pt] (0,0) circle[radius=\r];
+
+\draw[->] (0,0) -- (0:\r);
+\draw[->] (0,0) -- (\winkel:\r);
+
+\draw[->] (0:\r) -- ($(0:\r)+(90:0.7*\r)$);
+\draw[->] (\winkel:\r) -- ($(\winkel:\r)+({90+\winkel}:0.7*\r)$);
+\draw[->,color=gray] (\winkel:\r) -- ($(\winkel:\r)+(0,0.7*\r)$);
+
+\draw[color=red,line width=1.4pt] (0:\r) arc (0:\winkel:\r);
+\node[color=red] at ({0.5*\winkel}:\r) [left] {$\Delta s$};
+\fill[color=red] (0:\r) circle[radius=0.05];
+\fill[color=red] (\winkel:\r) circle[radius=0.05];
+
+\node at (\winkel:{0.5*\r}) [above] {$r$};
+\node at (0:{0.5*\r}) [below] {$r$};
+\end{scope}
+
+\end{tikzpicture}
+\end{document}
+
diff --git a/buch/papers/fresnel/pfad.pdf b/buch/papers/fresnel/images/pfad.pdf
index ff514cc..df3c7af 100644
--- a/buch/papers/fresnel/pfad.pdf
+++ b/buch/papers/fresnel/images/pfad.pdf
Binary files differ
diff --git a/buch/papers/fresnel/pfad.tex b/buch/papers/fresnel/images/pfad.tex
index 5439a71..680cd78 100644
--- a/buch/papers/fresnel/pfad.tex
+++ b/buch/papers/fresnel/images/pfad.tex
@@ -15,6 +15,9 @@
\definecolor{darkgreen}{rgb}{0,0.6,0}
\begin{tikzpicture}[>=latex,thick,scale=\skala]
+\fill[color=gray!40] (0,0) -- (2,0) arc (0:45:2) -- cycle;
+\node at (22.5:1.4) {$\displaystyle\frac{\pi}4$};
+
\draw[->] (-1,0) -- (9,0) coordinate[label={$\operatorname{Re}$}];
\draw[->] (0,-1) -- (0,6) coordinate[label={left:$\operatorname{Im}$}];
diff --git a/buch/papers/fresnel/images/schale.pdf b/buch/papers/fresnel/images/schale.pdf
new file mode 100644
index 0000000..9c21951
--- /dev/null
+++ b/buch/papers/fresnel/images/schale.pdf
Binary files differ
diff --git a/buch/papers/fresnel/images/schale.pov b/buch/papers/fresnel/images/schale.pov
new file mode 100644
index 0000000..085a6a4
--- /dev/null
+++ b/buch/papers/fresnel/images/schale.pov
@@ -0,0 +1,191 @@
+//
+// schale.pov --
+//
+// (c) 2022 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
+//
+#version 3.7;
+#include "colors.inc"
+
+#declare O = <0,0,0>;
+
+global_settings {
+ assumed_gamma 1
+}
+
+#declare imagescale = 0.036;
+
+camera {
+ location <40, 20, -20>
+ look_at <0, 0.5, 0>
+ right 16/9 * x * imagescale
+ up y * imagescale
+}
+
+light_source {
+ <10, 10, -40> color White
+ area_light <1,0,0> <0,0,1>, 10, 10
+ adaptive 1
+ jitter
+}
+
+sky_sphere {
+ pigment {
+ color rgb<1,1,1>
+ }
+}
+
+sphere {
+ <0, 0, 0>, 1
+ pigment {
+ color rgb<0.8,0.8,0.8>
+ }
+ finish {
+ specular 0.95
+ metallic
+ }
+}
+
+#declare stripcolor = rgb<0.2,0.2,0.8>;
+
+#declare R = 1.002;
+
+#macro punkt(phi,theta)
+R * < cos(phi) * cos(theta), sin(theta), sin(phi) * cos(theta) >
+#end
+
+#declare N = 24;
+#declare thetaphi = 0.01;
+#declare thetawidth = pi * 0.008;
+#declare theta = function(phi) { phi * thetaphi }
+
+#declare axisdiameter = 0.007;
+
+cylinder {
+ < 0, -2, 0>, < 0, 2, 0>, axisdiameter
+ pigment {
+ color White
+ }
+ finish {
+ specular 0.95
+ metallic
+ }
+}
+
+#declare curvaturecircle = 0.008;
+#declare curvaturecirclecolor = rgb<0.4,0.8,0.4>;
+
+#declare phit = 12.8 * 2 * pi;
+#declare P = punkt(phit, theta(phit));
+#declare Q = <0, R / sin(theta(phit)), 0>;
+
+#declare e1 = vnormalize(P - Q) / tan(theta(phit));
+#declare e2 = vnormalize(vcross(e1, <0,1,0>)) / tan(theta(phit));
+#declare psimin = -0.1 * pi;
+#declare psimax = 0.1 * pi;
+#declare psistep = (psimax - psimin) / 30;
+
+union {
+ #declare psi = psimin;
+ #declare K = Q + cos(psi) * e1 + sin(psi) * e2;
+ #while (psi < psimax - psistep/2)
+ sphere { K, curvaturecircle }
+ #declare psi = psi + psistep;
+ #declare K2 = Q + cos(psi) * e1 + sin(psi) * e2;
+ cylinder { K, K2, curvaturecircle }
+ #declare K = K2;
+ #end
+ sphere { K, curvaturecircle }
+ pigment {
+ color curvaturecirclecolor
+ }
+ finish {
+ specular 0.95
+ metallic
+ }
+}
+
+object {
+ mesh {
+ #declare psi = psimin;
+ #declare K = Q + cos(psi) * e1 + sin(psi) * e2;
+ #while (psi < psimax - psistep/2)
+ #declare psi = psi + psistep;
+ #declare K2 = Q + cos(psi) * e1 + sin(psi) * e2;
+ triangle { K, K2, Q }
+ #declare K = K2;
+ #end
+ }
+ pigment {
+ color rgbt<0.4,0.8,0.4,0.5>
+ }
+ finish {
+ specular 0.95
+ metallic
+ }
+}
+
+union {
+ sphere { P, 0.02 }
+ sphere { Q, 0.02 }
+ cylinder { P, Q, 0.01 }
+ pigment {
+ color Red
+ }
+ finish {
+ specular 0.95
+ metallic
+ }
+}
+
+#declare phisteps = 300;
+#declare phistep = 2 * pi / phisteps;
+#declare phimin = 0;
+#declare phimax = N * 2 * pi;
+
+object {
+ mesh {
+ #declare phi = phimin;
+ #declare Poben = punkt(phi, theta(phi) + thetawidth);
+ #declare Punten = punkt(phi, theta(phi) - thetawidth);
+ triangle { O, Punten, Poben }
+ #while (phi < phimax - phistep/2)
+ #declare phi = phi + phistep;
+ #declare Poben2 = punkt(phi, theta(phi) + thetawidth);
+ #declare Punten2 = punkt(phi, theta(phi) - thetawidth);
+ triangle { O, Punten, Punten2 }
+ triangle { O, Poben, Poben2 }
+ triangle { Punten, Punten2, Poben }
+ triangle { Punten2, Poben2, Poben }
+ #declare Poben = Poben2;
+ #declare Punten = Punten2;
+ #end
+ triangle { O, Punten, Poben }
+ }
+ pigment {
+ color stripcolor
+ }
+ finish {
+ specular 0.8
+ metallic
+ }
+}
+
+union {
+ #declare phi = phimin;
+ #declare P = punkt(phi, theta(phi));
+ #while (phi < phimax - phistep/2)
+ sphere { P, 0.003 }
+ #declare phi = phi + phistep;
+ #declare P2 = punkt(phi, theta(phi));
+ cylinder { P, P2, 0.003 }
+ #declare P = P2;
+ #end
+ sphere { P, 0.003 }
+ pigment {
+ color stripcolor
+ }
+ finish {
+ specular 0.8
+ metallic
+ }
+}
diff --git a/buch/papers/fresnel/images/schale.tex b/buch/papers/fresnel/images/schale.tex
new file mode 100644
index 0000000..577ede4
--- /dev/null
+++ b/buch/papers/fresnel/images/schale.tex
@@ -0,0 +1,77 @@
+%
+% schlange.tex
+%
+% (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
+%
+\documentclass[tikz]{standalone}
+\usepackage{times}
+\usepackage{amsmath}
+\usepackage{txfonts}
+\usepackage[utf8]{inputenc}
+\usepackage{graphics}
+\usetikzlibrary{arrows,intersections,math,calc}
+\usepackage{ifthen}
+\begin{document}
+
+\newboolean{showgrid}
+\setboolean{showgrid}{false}
+\def\breite{4}
+\def\hoehe{4}
+\def\a{47}
+\def\r{3.3}
+\def\skala{0.95}
+
+\begin{tikzpicture}[>=latex,thick,scale=\skala]
+
+\begin{scope}[xshift=-7.4cm,yshift=-1.2cm]
+ \clip (-3.6,-2.2) rectangle (3.6,5.1);
+
+ \fill[color=blue!20] (0,0)
+ -- ({180-\a}:{0.4*\r}) arc ({180-\a}:180:{0.4*\r})
+ -- cycle;
+ \node[color=blue] at ({180-\a/2}:{0.3*\r}) {$\vartheta$};
+
+ \fill[color=blue!20] (0,{\r/sin(\a)})
+ -- ($(0,{\r/sin(\a)})+({270-\a}:{0.3*\r})$)
+ arc ({270-\a}:270:{0.3*\r})
+ -- cycle;
+ \node[color=blue] at ($(0,{\r/sin(\a)})+({270-\a/2}:{0.2*\r})$)
+ {$\vartheta$};
+
+
+ \draw (0,0) circle[radius=\r];
+ \draw[->] (0,-3.0) -- (0,5);
+ \draw ({-\r-0.2},0) -- ({\r+0.2},0);
+ \fill (0,0) circle[radius=0.06];
+
+ \draw (0,0) -- ({180-\a}:\r);
+ \node at ({180-\a+3}:{0.65*\r}) [above right] {$1$};
+
+ \draw[color=red,line width=1.4pt]
+ ({180-\a}:\r) -- (0,{\r/cos(90-\a)});
+ \fill[color=red] ({180-\a}:\r) circle[radius=0.08];
+ \fill[color=red] (0,{\r/cos(90-\a)}) circle[radius=0.08];
+ \node[color=red] at (-1.0,3.7) [left] {$r=\cot\vartheta$};
+ \node[color=red] at ({180-\a}:\r) [above left] {$P$};
+ \node[color=red] at (0,{\r/sin(\a)}) [right] {$Q$};
+\end{scope}
+
+% Povray Bild
+\node at (0,0) {\includegraphics[width=7.6cm]{schale.jpg}};
+
+% Gitter
+\ifthenelse{\boolean{showgrid}}{
+\draw[step=0.1,line width=0.1pt] (-\breite,-\hoehe) grid (\breite, \hoehe);
+\draw[step=0.5,line width=0.4pt] (-\breite,-\hoehe) grid (\breite, \hoehe);
+\draw (-\breite,-\hoehe) grid (\breite, \hoehe);
+\fill (0,0) circle[radius=0.05];
+}{}
+
+\node[color=red] at (-1.4,1.4) {$r$};
+\node[color=red] at (-2.2,-0.2) {$P$};
+\node[color=red] at (0,3.3) [right] {$Q$};
+
+\end{tikzpicture}
+
+\end{document}
+