summaryrefslogtreecommitdiff
path: root/metapost/context/base/mpiv/mp-tool.mpiv
diff options
context:
space:
mode:
Diffstat (limited to 'metapost/context/base/mpiv/mp-tool.mpiv')
-rw-r--r--metapost/context/base/mpiv/mp-tool.mpiv11
1 files changed, 11 insertions, 0 deletions
diff --git a/metapost/context/base/mpiv/mp-tool.mpiv b/metapost/context/base/mpiv/mp-tool.mpiv
index 2442beb1c..3bae73aad 100644
--- a/metapost/context/base/mpiv/mp-tool.mpiv
+++ b/metapost/context/base/mpiv/mp-tool.mpiv
@@ -3638,3 +3638,14 @@ vardef mfun_timestamp =
if ((time-(time div 60)*60) < 10) : "0" & fi
decimal (time-(time div 60)*60)
enddef ;
+
+vardef totransform(expr x, y, xx, xy, yx, yy) =
+ save t ; transform t ;
+ xpart t = x ;
+ ypart t = y ;
+ xxpart t = xx ;
+ xypart t = xy ;
+ yxpart t = yx ;
+ yypart t = yy ;
+ t
+enddef ;