diff options
| author | Hans Hagen <pragma@wxs.nl> | 2021-06-24 19:37:45 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2021-06-24 19:37:45 +0200 |
| commit | 820657bb1e9acfb36f24dfa8801526b0d5f2b464 (patch) | |
| tree | fc93fd3936e84b9b0a6402719e185d35e332eee9 /metapost | |
| parent | 4272a26c49cbfee8917e5272fc0f964cbcfc4b03 (diff) | |
| download | context-820657bb1e9acfb36f24dfa8801526b0d5f2b464.tar.gz | |
2021-06-24 18:52:00
Diffstat (limited to 'metapost')
| -rw-r--r-- | metapost/context/base/mpiv/mp-tres.mpiv | 4 | ||||
| -rw-r--r-- | metapost/context/base/mpxl/minifun.mpxl | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/metapost/context/base/mpiv/mp-tres.mpiv b/metapost/context/base/mpiv/mp-tres.mpiv index ccc6e6dba..5d8b942c3 100644 --- a/metapost/context/base/mpiv/mp-tres.mpiv +++ b/metapost/context/base/mpiv/mp-tres.mpiv @@ -114,6 +114,10 @@ vardef Abs primary p = fi enddef ; +vardef Unitvector primary z = + z/Abs z +enddef ; + primarydef p dotproduct q = ((Xpart p)*(Xpart q) + (Ypart p)*(Ypart q) + (Zpart p)*(Zpart q)) enddef ; diff --git a/metapost/context/base/mpxl/minifun.mpxl b/metapost/context/base/mpxl/minifun.mpxl index e1b1cda36..97bdd7bb7 100644 --- a/metapost/context/base/mpxl/minifun.mpxl +++ b/metapost/context/base/mpxl/minifun.mpxl @@ -26,8 +26,8 @@ newinternal boolean contextlmtxmode ; contextlmtxmode := true ; immutable contex input "mp-base.mpiv" ; input "mp-tool.mpxl" ; -input "mp-mlib.mpxl" ; input "mp-luas.mpxl" ; +input "mp-mlib.mpxl" ; input "mp-math.mpxl" ; input "mp-cont.mpxl" ; input "mp-page.mpxl" ; |