%% syntaxe : I A IAcercle --> le cercle de centre I passant par A /IAcercle { 4 copy popp distance } def