%Point A
\tikzmath{\xa=-1;};
\tikzmath{\ya=-1;};

%Point B
\tikzmath{\xb= 1;};
\tikzmath{\yb= 1;};

%Left and right limit for x
\tikzmath{\xleft=-2;};
\tikzmath{\xright= 2;};

\tikzmath{\ybottom=-3;};
\tikzmath{\ytop= 3;};


\input{/usr/local/tikz/Common.tikz}
\input{/usr/local/tikz/Moulton/Calc.Moulton.tikz}
\input{/usr/local/tikz/Moulton/Styles.tikz}
\input{/usr/local/tikz/Moulton/Draw.Line.tikz}
\input{/usr/local/tikz/Moulton/Draw.ABC.tikz}

\draw [-Latex] (1.5*\xleft,0)    -- (1.5*\xright,0) node [right] {$x$};
\draw [-Latex] (0,\ybottom)  -- (0,\ytop)   node [above] {$y$};


%Point P with x>0 for parallel
\tikzmath{\xp=0.5;};
\tikzmath{\yp=2;};

\input{/usr/local/tikz/Moulton/Draw.Parallel.tikz}
\fill (\xp,\yp) circle(1.5pt) node [above]{$P$};


%Point P with x<0 for parallel
\tikzmath{\xp=-0.5;};
\tikzmath{\yp=-1.5;};

\input{/usr/local/tikz/Moulton/Draw.Parallel.tikz}
\fill (\xp,\yp) circle(1.5pt) node [below]{$P'$};

%Path to Taxist tikz files
\def\TiKZPath{/usr/local/tikz}

\input{/usr/local/tikz/Styles.tikz}