summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2021-11-08 03:02:49 +0000
committerNorbert Preining <norbert@preining.info>2021-11-08 03:02:49 +0000
commitf3bd7117b5dfa4a51d51c4e416c8a656651f1ce2 (patch)
tree5053c95dab175775cc85badf7990ffa535676f23 /macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp
parent8389f0bb8e6af2c5dcbfe3cdad746a9c170d1157 (diff)
CTAN sync 202111080302
Diffstat (limited to 'macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp')
-rw-r--r--macros/latex/contrib/profcollege/metapost/PfCGeometrie.mp14
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 $;