\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 %%%%%%%%%%%%%%%%%%%%%%%%% \figdrawbegin{} % trace des axes \figdrawline[1,2]\figdrawline[3,4] %\figset arrowhead(fillmode=yes) \figdrawarrowhead[5,8]\figdrawarrowhead[5,13] % trace du cercle \figdrawcirc 5(1.5) % trace \figdrawline[6,7]\figdrawline[5,11,8] \figdrawend %%%%%%%%%%%%%%%%%%%%%%%%% % writing %%%%%%%%%%%%%%%%%%%%%%%%% \figvisu{\figBoxA}{}{ \figset write(mark=$\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