From 820657bb1e9acfb36f24dfa8801526b0d5f2b464 Mon Sep 17 00:00:00 2001 From: Hans Hagen Date: Thu, 24 Jun 2021 19:37:45 +0200 Subject: 2021-06-24 18:52:00 --- metapost/context/base/mpiv/mp-tres.mpiv | 4 ++++ metapost/context/base/mpxl/minifun.mpxl | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) (limited to 'metapost') 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" ; -- cgit v1.2.3