28.4527 setxunit %% 10 mm 14.2 setxunit 0 10 setxrange 0 8 setyrange %[1 1 .5 .5 .1 .1] {orange} Quadrillage %tracerepere marks /A1 {2.5 0.5} def /u1 {2.2 1} def /A2 {2 2.7} def /u2 {2.7 -1.2} def /v {0 2.4} def /Ba {A1 u1 addv} def /B1 {Ba u1 addv} def /M1 {B1 v addv} def /C1 {M1 v addv} def /m1 {A1 v addv} def /D1 {m1 v addv} def /Ho {D1 u1 addv} def /O {m1 u1 addv} def /B2 {Ba u2 addv} def /M2 {B2 v addv} def /C2 {M2 v addv} def /m2 {A2 v addv} def /D2 {m2 v addv} def /I {O m2 A1 D1 interdroite} def /J {C2 D2 B1 C1 interdroite} def /K {A2 B2 A1 D1 interdroite} def [K A2 D2 C2 B2 Ba A1 D1 C1 J] ligne Ba Ho droite m1 O M2 0.5 (<-) tripointarcarrow pointilles [M1 B1 Ba K] ligne [J M1] ligne 1.5 setlinewidth continu [O O 1.8 -0.8 addv] (->) ligne [O O -1.64 -0.8 addv] (->) ligne [O O 0 1.8 addv] (->) ligne