summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/lapdf/cfamily.tex
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/lapdf/cfamily.tex')
-rw-r--r--macros/latex/contrib/lapdf/cfamily.tex124
1 files changed, 124 insertions, 0 deletions
diff --git a/macros/latex/contrib/lapdf/cfamily.tex b/macros/latex/contrib/lapdf/cfamily.tex
new file mode 100644
index 0000000000..49d36366ff
--- /dev/null
+++ b/macros/latex/contrib/lapdf/cfamily.tex
@@ -0,0 +1,124 @@
+\input preamble.tex
+
+\Defdim(\k,-0.7)
+\newdimen\a
+\newdimen\b
+\newdimen\x
+\newdimen\y
+
+\def\dsp{\displaystyle}
+
+% -------------------------------------------------------------------------
+\begin{document}
+\unitlength1.3cm
+
+\begin{center}
+{\huge \bf{Curve Family I}}
+\bigskip
+
+\begin{lapdf}(14,14)(-7,-7)
+ \Lingrid(10)(1,3)(-7,7)(-7,7)
+ \Rect(-7,-7,14,14)
+ \Setclip
+ \def\FamilyI(#1){\Polynom(-7,+7)(0.1,#1,0,#1) \Stroke}
+ \Whiledim{\k<0.8}{\Stepcol(0,23,2) \FamilyI(\Np\k) \Dadd(\k,0.1)}
+ \Setwidth(0.01)
+ \Black
+ \Dash(1)
+ \Polynom(-7,+7)(-0.05,0,-0.15,0) \Stroke
+ \Dash(0)
+ \Point(1)(+4.67,-5.78)
+ \Point(1)(+4.00,-3.80)
+ \Point(1)(+3.33,-2.35)
+ \Point(1)(+2.67,-1.35)
+ \Point(1)(+2.00,-0.70)
+ \Point(1)(+1.33,-0.32)
+ \Point(1)(+0.67,-0.11)
+ \Point(1)(+0.00,+0.00)
+ \Point(1)(-0.67,+0.11)
+ \Point(1)(-1.33,+0.32)
+ \Point(1)(-2.00,+0.70)
+ \Point(1)(-2.67,+1.35)
+ \Point(1)(-3.33,+2.35)
+ \Point(1)(-4.00,+3.80)
+ \Point(1)(-4.67,+5.78)
+ \Text(-5.8,5,rb){$k=7$}
+ \Text(5.8,-5,lt){$k=-7$}
+ \Text(-4.6,6.2,lb){$f_{e}(x)=-\dsp\frac{1}{20}(x^3+3x)$}
+\end{lapdf}
+
+$f_{k}(x)=\dsp\frac{1}{10}(x^3+kx^2+k)$ \qquad $k = -7 \dots +7$
+
+\newpage
+
+{\huge \bf{Curve Family II}}
+\bigskip
+
+\begin{lapdf}(14,14)(-7,-7)
+ \Lingrid(10)(1,3)(-7,7)(-7,7)
+ \Rect(-7,-7,14,14)
+ \Setclip
+ \def\FamilyII(#1){\Polynom(-7,+7)(0.1,#1,0.1,0) \Stroke}
+ \Whiledim{\k<0.8}{\Stepcol(0,23,2) \FamilyII(\Np\k) \Dadd(\k,0.1)}
+ \Setwidth(0.01)
+ \Black
+ \Dash(1)
+ \Polynom(-7,+7)(-0.05,0,0.05,0) \Stroke
+ \Dash(0)
+ \Point(1)(+4.59,-4.62)
+ \Point(1)(+3.91,-2.80)
+ \Point(1)(+3.23,-1.52)
+ \Point(1)(+2.54,-0.69)
+ \Point(1)(+1.82,-0.21)
+ \Point(1)(+1.00,+0.00)
+ \Point(1)(+0.00,+0.00)
+ \Point(1)(-1.00,+0.00)
+ \Point(1)(-1.82,+0.21)
+ \Point(1)(-2.54,+0.69)
+ \Point(1)(-3.23,+1.52)
+ \Point(1)(-3.91,+2.80)
+ \Point(1)(-4.59,+4.62)
+ \Text(-5.6,4.1,rb){$k=7$}
+ \Text(5.6,-4.1,lt){$k=-7$}
+ \Text(-4.9,6.2,lb){$f_{e}(x)=-\dsp\frac{1}{20}(x^3-x)$}
+\end{lapdf}
+
+$f_{k}(x)=\dsp\frac{1}{10}(x^3+kx^2+x)$ \qquad $k = -7 \dots +7$
+
+\newpage
+
+{\huge \bf{Curve Family III}}
+\bigskip
+
+\begin{lapdf}(13,11)(-5,-3)
+ \Lingrid(10)(1,3)(-5,8)(-3,8)
+ \Rect(-5,-3,13,11)
+ \Setclip
+ \def\Fx(#1,#2){\Dset(\x,#1) \y=2\k \Sub(\y,\x)
+ \Exp(\Np\y,#2) \Add(#2,\x) \y=3\k \Sub(#2,\y)}
+ \Dset(\k,-1)
+ \Whiledim{\k<3.5}{
+ \a=\k \Dsub(\a,3.25) \b=\k \Dadd(\b,8)
+ \Stepcol(0,23,2) \Fplot(96)(\Np\a,\Np\b) \Stroke \Dadd(\k,0.5)}
+ \Setwidth(0.01)
+ \Black
+ \Dash(1)
+ \Polynom(-4,+7)(0,0,-0.5,1) \Stroke
+ \Dash(0)
+ \Point(1)(-2.0,+2.0)
+ \Point(1)(-1.0,+1.5)
+ \Point(1)(+0.0,+1.0)
+ \Point(1)(+1.0,+0.5)
+ \Point(1)(+2.0,+0.0)
+ \Point(1)(+3.0,-0.5)
+ \Point(1)(+4.0,-1.0)
+ \Point(1)(+5.0,-1.5)
+ \Point(1)(+6.0,-2.0)
+ \Text(-4.7,7.7,lt){$k=-1$}
+ \Text(+2.9,7.7,lt){$k=+3$}
+ \Text(-4.9,2.1,lb){$y_e=1-\dsp\frac{x}{2}$}
+\end{lapdf}
+
+$f_{k}(x)=e^{\dsp{2k-x}}+x-3k$ \qquad $k = -1 \dots +3$
+\end{center}
+\end{document}