%@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