Présentation de cerc_005.jps

/syracuse/bbgraf/albums/geometrie_2nd/cerc_005.jpg
autocrop 30 setxunit /cerc {O 2} def /B {60 cerc cpoint} def B dupp 205 dir addv cerc interdroitecercle popp /A defpoint B dupp 0 dir addv cerc interdroitecercle popp /D defpoint A dupp -55 A B angle add dir addv cerc interdroitecercle popp /C defpoint A B C D interdroite /I defpoint C A B .65 (=) tripointarc D B A .65 (-) tripointarc cerc cercle [C A B D] polygone setTimesItalic (A) A cltext (B) B urtext (C) C drtext (D) D ultext (I) I (-1 -2) bltext 8 setfontsize setTimes (55) 0 A .95 cpoint cctext (25) 192.5 B .95 cpoint cctext #tex# $\cal C$ -135 O 2.35 cpoint cctexlabel