% Cercle d'Euler
% 1. Definition des points caracteristiques de la geometrie
\figinit{0.8cm}
% Sommets
\figpt 1:$A$(0,3)
\figpt 2:$B$(-1,-2)
\figpt 3:$C$(5,-2)
\figptbary 11:$A'$[2,3;1,1]
\figptbary 12:$B'$[1,3;1,1]
\figptbary 13:$C'$[1,2;1,1]
\figptcircumcenter 4:$O$[1,2,3]\figget distance=\Rcc[1,4]
\figptorthocenter 5 :$H$[1,2,3]
\figptbary 21:$m_a$[1,5;1,1]
\figptbary 6:$\omega$[4,5;1,1]\figget distance=\Rce[11,6]
\figptbary 7:$G$[1,2,3;1,1,1]
\figptorthoprojline 31 :$a$=1/2,3/
% 2. Creation du fichier graphique
\figdrawbegin{}
\figdrawline[1,2,3,1]\figdrawline[1,31]\figdrawline[1,11]\figdrawline[11,4]
\figdrawcirc 4(\Rcc)\figdrawcirc 6(\Rce)
\figptbary 40:[4,5;2,-1]\figptbary 41:[4,5;-2,5]\figdrawline[40,41]
\figdrawend
% 3. Inscription du texte sur le dessin
\def\dist{2pt}
\figvisu{\figBoxA}{\it Le cercle d'Euler \rm(p. 108)}{%
\figwritenw 1,13:(\dist)\figwritesw 2:(\dist)\figwritese 3,5:(\dist)
\figwritene 12:(\dist)\figwrites 11,31:(\dist)\figwriten 4:(\dist)
\figwritegce 7:(\dist,-1pt)\figwritege 21:(\dist,-0.1pt)
\figptcirc 0 :$(\Gamma)$: 4;\Rcc (45)\figwritene 0:(\dist)
\figptcirc 0 :$(\gamma)$: 6;\Rce (-15)\figwritese 0:(\dist)
\figset write(mark=$\figBullet$)\figwritenw 6:(\dist)
}
\centerline{\box\figBoxA}