-5 8 setxrange -3 8 setyrange .5 .5 setquadrillagestep quadrillage currentlinewidth 2 mul setlinewidth tracerepere marks 1 setlinewidth 0 3 2 3 droite %% D3 0 3 3 0 droite %% D2 O 1 2 droite %% D1 0 -1 1 0 droite %% D4 -1 1 2 0 droite %% D5 setTimesItalic (D) -2 3 ultext (3) indice (D) -2 5 urtext (2) indice (D) 3 5 urtext (1) indice (D) 6 5 drtext (4) indice (D) -4 1 text (5) indice