From fca2d946bc4d3ef525c3a2c9016e3b88d6d09812 Mon Sep 17 00:00:00 2001 From: Hans Hagen Date: Sat, 24 Aug 2019 23:32:35 +0200 Subject: 2019-08-24 22:49:00 --- metapost/context/base/mpiv/mp-tool.mpiv | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'metapost/context/base/mpiv/mp-tool.mpiv') 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 ; -- cgit v1.2.3