summaryrefslogtreecommitdiff
path: root/metapost/context/base/mpiv/mp-tool.mpiv
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2019-08-24 23:32:35 +0200
committerContext Git Mirror Bot <phg@phi-gamma.net>2019-08-24 23:32:35 +0200
commitfca2d946bc4d3ef525c3a2c9016e3b88d6d09812 (patch)
treed0fb4d8a17342fcf08a4b033cf61a47fd6e0aa98 /metapost/context/base/mpiv/mp-tool.mpiv
parentf6e7648f6126ffe087071531f03c674be32930f1 (diff)
downloadcontext-fca2d946bc4d3ef525c3a2c9016e3b88d6d09812.tar.gz
2019-08-24 22:49:00
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 ;