\input fig4tex.tex %%%%%%%%%%%%%%%% debut du dessin %%%%%%%%%%%%%%%%%%%%%%%%% % pts caracteristiques %%%%%%%%%%%%%%%%%%%%%%%%% % axes et origine \figinit{truecm} \figpt 1:(-2,0)\figpt 2:(2,0)\figpt 3:(0,2)\figpt 4:(0,-2) \figpt 5:(0,0)\figpt 13:(0,1.5) % pt du cercle \figptell 6::5;1.5,1.5(60,0) % sa proj. ortho sur l'axe ds abscisses \figptorthoprojline 7:=6/1,2/ % \figpt 8:(1.5,0)\figvectP 9[4,3]\figvectP 10[5,6] \figptinterlines 11:[8,9;5,10] %%%%%%%%%%%%%%%%%%%%%%%%% % fichier graphique %%%%%%%%%%%%%%%%%%%%%%%%% \psbeginfig{} % trace des axes \psline[1,2]\psline[3,4] %\pssetarrowheadfill{yes} \psarrowhead[5,8]\psarrowhead[5,13] % trace du cercle \pscirc 5(1.5) % trace \psline[6,7]\psline[5,11,8] \psendfig %%%%%%%%%%%%%%%%%%%%%%%%% % writing %%%%%%%%%%%%%%%%%%%%%%%%% \figvisu{\figBoxA}{}{ \figsetmark{$\bullet$} \figwritese 5:$O$(0.1)\figwritee 6:$M$(0.1)\figwrites 7:$H$(0.1) \figwritee 11:$T$(0.1)\figwritese 8:$A$(0.1) } %%%%%%%%%%%%%%%%%%%%%%% fin du dessin \centerline{\box\figBoxA} \bye