|
SmtC: Show me the Code
Ole Peter Smith
Instituto de Matemática e Estatística
Universidade Federal de Goiás
http://www.olesmith.com.br
|
|
E se Eva tinha optado pela cobra?
Facebook.
|
Angle
in left half-plane and -axis.
%Point A
\tikzmath{\xa=-1;};
\tikzmath{\ya=-1;};
%Point B
\tikzmath{\xb= 1;};
\tikzmath{\yb= 1;};
%Left and right limit for x
\tikzmath{\xleft=-3;};
\tikzmath{\xright= 3;};
\input{/usr/local/tikz/Common.tikz}
\input{/usr/local/tikz/Moulton/Calc.Moulton.tikz}
\input{/usr/local/tikz/Moulton/Styles.tikz}
\tikzmath{\ybottom=\m*\xleft+\k;};
\tikzmath{\ytop= 3;};
\draw [-Latex] (\xleft,0) -- (\xright,0) node [right] {$x$};
\draw [-Latex] (0,\ybottom) -- (0,\ytop) node [above] {$y$};
\input{/usr/local/tikz/Moulton/Draw.Line.tikz}
\coordinate (V) at (\xa,-\ya);
\coordinate (BB) at (\xb,\m*\xb+\k);
\coordinate (BBB) at (\xright,\m*\xright+\k);
\fill (V) circle(1pt) node [above] {$V$};
\fill (B) circle(1pt) node [below] {$B$};
\fill (C) circle(1pt) node [right] {$C$};
\fill (BB) circle(1pt) node [above] {$B'$};
\draw[dashed] (V) -- (C) -- (BBB);
\tkzMarkAngle[size=0.3](BB,C,V);
\tkzLabelAngle[pos=0.5](BB,C,V) {$\beta$};
\tkzMarkAngle[size=0.9](B,C,BBB);
\tkzLabelAngle[pos=1.1](B,C,BBB) {$\alpha$};
|
Showing: /usr/local/tikz/Moulton/Calc.Moulton.tikz:
TiKZ Listing: /usr/local/tikz/Moulton/Calc.Moulton.tikz.tex.
PDF
PNG
SVG
ZIP*
%Position of line titles
\tikzmath{\titlepos=-0.1;};
\tikzmath{\contpos=-0.2;};
\tikzmath{\contposleft=-0.5;};
\tikzmath{\contposright=-0.2;};
\tikzmath{\normalsize=1.5;};
\tikzmath{\tangentialfact=2.5;};
%Moulton parameters, y=\m*x+\k
\tikzmath{\m=(\yb-\ya)/(0.5*\xb-\xa);};
\tikzmath{\k=\ya-\m*\xa;};
%Nodes A, B and C
\coordinate (A) at ($(\xa,\ya)$);
\coordinate (B) at ($(\xb,\yb)$);
\coordinate (C) at ($(0,\k)$);
\coordinate (CX) at ($(-\k/\m,0)$);
%Points on left and right lines
\coordinate (CL) at ($(\xleft,\xleft*\m+\k)$);
\coordinate (CR) at ($(\xright,0.5*\xright*\m+\k)$);
\tikzmath{\x=\tangentialfact*\xleft;};
\coordinate (FCL) at ($(\x,\x*\m+\k)$);
\tikzmath{\x=\tangentialfact*\xright;};
\coordinate (FCR) at ($(\x,0.5*\x*\m+\k)$);
\coordinate (DL) at ($(\xleft,0.5*\xleft*\m+\k)$);
\coordinate (DR) at ($(\xright,\xright*\m+\k)$);
%Length to go along normals
\tikzmath{\LR=2;};
\tikzmath{\LL=2;};
%Length to go along normals for fills
\tikzmath{\FR=7;};
\tikzmath{\FL=7;};
%Unit normals
%Left normal is parallel to (-\m,1)
\tikzmath{\L=1/sqrt(1+\m*\m);};
\coordinate (NL) at ($\L*(-\m,1)$);
%Left normal is parallel to (-\m,2)
\tikzmath{\L=1/sqrt(4+\m*\m);};
\coordinate (NR) at ($\L*(-\m,2)$);
\input{/usr/local/tikz/Moulton/Calc.Left.tikz}
\input{/usr/local/tikz/Moulton/Calc.Right.tikz}
|
|
Messages:
0 secs.
|