%%! Skeleton File:      Fig.tikz.tex
%%! Destination File:   Fig-000045_0.tikz.tex
%%! Variation Command:  /usr/local/bin/variation Fig.tikz.tex Angle 0 180 37
%%! Generating Command: /usr/local/bin/tikz2svg Fig-000045_0.tikz.tex
%%! n:                  10 of 37
%%! From/to:            0-180
%%! t:                  45.0

%Size and angle of segment. Angle between 0 and pi.
\tikzmath{\L=sqrt(2);};
\tikzmath{\Angle=45.0;};

\input{/usr/local/tikz/Common.tikz}
\input{/usr/local/tikz/Taxist/Ellipsis.tikz}

%Cases, classification used by other parts:
%
%   Case 1 (I):    0   < \Angle 90
%   Case 2 (II):  90  < \Angle 180
%
%   Case 10: 0, horisontal
%   Case 11: 90, vertical
%
%Sets \Case to a case number and \CaseText to a text.
%

%Limit: 0 \leq Angle < pi.
\tikzmath{\TINY=0.001;};
\tikzmath{\LIMIT=\TINY;};


%Initial values, default case (90<<180)
\tikzmath{\Case=2;};
\def\CaseText{II};

%0<<90?
\tikzmath{\LIMIT=90;};
\ifthenelse{\lengthtest{ \Angle pt < \LIMIT pt}}{
    \tikzmath{\Case=1;};
    \def\CaseText{I};
}{}

\tikzmath{\ABS=abs(\Angle);};
%Horisontal?
\ifthenelse{\lengthtest{ \ABS pt < \LIMIT pt}}{
    \tikzmath{\Case=10;};
    \def\CaseText{Horisontal};
}{}

\tikzmath{\ABS=abs(\Angle-90);};
%Vertical?
\ifthenelse{\lengthtest{ \ABS pt < \TINY pt}}{
    \tikzmath{\Case=11;};
    \def\CaseText{Vertical};
}{}

%Draw the actual Taxist Ellipse


\definecolor{curve1}{rgb}{1,0.5,0}
\definecolor{curve2}{rgb}{0,0,1}

%Calculate color factor
\newcommand{\ColorRel}[2]{
  \tikzmath{\crel=int(round(#2/#1*100));};
}



\tikzmath{\N=10;};
\tikzmath{\C=\L;};
\tikzmath{\CC=2*\L;};
\tikzmath{\dC=(\CC-\C)/\N;};
\foreach \n in {0,1,...,\N}
{
     %Change color
     \ColorRel{\N}{\n}
     \tikzstyle{Taxist_Ellipse}=[color=curve1!\crel!curve2]
     
     \tikzmath{\c=\C+\n*\dC;};
   \input{/usr/local/tikz/Taxist/Ellipse/Draw/Curve.tikz}
}