traceaxes marks /A {2.9 2} def /B {-2.9 2} def B 3 /C1 defcercle [A B 0 -3] points A 3 cercle -45 45 B 2 Cercle 135 225 B 2 Cercle pointilles C1 cercle 60 C1 cpoint point 1.5 setlinewidth continu 0 -3 1 cercle