1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
%
% ellcommon.tex -- common macros/definitions for elliptic function
% values display
%
% (c) 2022 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
%
\definecolor{rot}{rgb}{0.8,0,0}
\definecolor{blau}{rgb}{0,0,1}
\definecolor{gruen}{rgb}{0,0.6,0}
\def\l{0.2}
\def\pol#1#2{
\draw[color=#2!50,line width=3.0pt]
($#1+(-\l,-\l)$) -- ($#1+(\l,\l)$);
\draw[color=#2!50,line width=3.0pt]
($#1+(-\l,\l)$) -- ($#1+(\l,-\l)$);
}
\def\nullstelle#1#2{
\draw[color=#2!50,line width=3.0pt] #1 circle[radius=\l];
}
\def\rechteck#1#2{
\fill[color=#1!20] (-1,-1) rectangle (1,1);
\node[color=#1] at (0,0) {$#2\mathstrut$};
}
|
