%@AUTEUR:Guillaume Connan
prologues:=2;
verbatimtex
%&latex
\documentclass{article}
\usepackage[upright]{fourier}
\begin{document}
etex
input geometriesyr16
numeric k;
k=1.8;
figure(-1.5u,-3.5u,10u,3u);
pair A,B,C,A',B',C',O;
path t,tt;
O=origin;
A=u*(2,-1.5); B=u*(3,-1); C=u*(2.2,1);
t=polygone(A,B,C);
A'=A scaled k; B':=B scaled k; C':=C scaled k;
tt=t scaled k;
trace t withpen pencircle scaled 1.3bp withcolor green;
trace tt withpen pencircle scaled 1.3bp withcolor blue;
trace segment (O,A') dashed evenly;
trace segment (O,B') dashed evenly;
trace segment (O,C') dashed evenly;
nomme.bot(A);
nomme.bot(A');
nomme.lft(O);
nomme.urt(B);
nomme.urt(B');
nomme.top(C);
nomme.top(C');
fillcolor:=jaune;
transparence t;
fillcolor:=ciel;
transparence tt;
fin;
end