-3 3 setxrange
-3 3 setyrange

/A {0 -2} def
/B {0 2} def

16 setfontsize

%% on se donne la droite (AB) et une droite delta
/d {A B} def
/delta {-1 0 -2 1} def

%% M' est l'image de M par la symetrie orthogonale par rapport a d
/delta' {delta d axesymdroite} def

d droite
delta droite
delta' droite

bleu
setTimesItalic
   (d) B urtext
setSymbol
   (D) delta exchp popp dltext
   (D\242) delta' exchp popp drtext