Présentation de cerc_006.jps

/syracuse/bbgraf/albums/geometrie_2nd/cerc_006.jpg
autocrop 30 setxunit /cerc {O 2} def /B {60 cerc cpoint} def B dupp 215 dir addv cerc interdroitecercle popp /A defpoint B dupp 0 dir addv cerc interdroitecercle popp /D defpoint A dupp -47 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 (D) A cltext (C) B urtext (A) C drtext (B) D ultext (I) I (-2 -3) bltext 8 setfontsize setTimes (47) 15 A .95 cpoint cctext (35) 197.5 B .95 cpoint cctext #tex# $\cal C$ -135 O 2.35 cpoint cctexlabel