Présentation de orthocentre.jps

/syracuse/bbgraf/albums/geometrie_01/orthocentre.jpg
/A {-3 -3} def /B {-1 4} def /C {4 0} def %% les projetes orthogonaux /A' {A B C orthoproj} def /B' {B A C orthoproj} def /C' {C B A orthoproj} def %% les hauteurs /dA {A' A} def /dB {B' B} def %% l'orthocentre /H {dA dB interdroite} def %% les angles droits H A' C angledroit H B' A angledroit H C' B angledroit 1.7 setcurvelinewidth [A B C] polygone pointilles .7 setcurvelinewidth [A' A] ligne [B' B] ligne [C' C] ligne H point bleu setTimesItalic (H) H rtext (A) A dltext (B) B urtext (C) C drtext (A') A' urtext (B') B' drtext (C') C' ultext