diff options
Diffstat (limited to 'macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp')
-rw-r--r-- | macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp b/macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp index 2e3cc54dd2..604373e716 100644 --- a/macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp +++ b/macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp @@ -124,6 +124,20 @@ vardef milieu(expr AA,BB)= $ enddef; +vardef CentreCercleC(expr a, b ,c) = + save o; pair o; + o - .5[a,b] = whatever * (b-a) rotated 90; + o - .5[b,c] = whatever * (c-b) rotated 90; + o +enddef; + +vardef Orthocentre(expr a, b, c) = + save h; pair h; + h - a = whatever * (c-b) rotated 90; + h - b = whatever * (a-c) rotated 90; + h +enddef; + vardef CentreCercleI(expr aa,bb,cc)= save $,a,c; pair $; |