summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/dvips/pst-eucl/pst-eucl.pro
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/dvips/pst-eucl/pst-eucl.pro')
-rw-r--r--Master/texmf-dist/dvips/pst-eucl/pst-eucl.pro5
1 files changed, 3 insertions, 2 deletions
diff --git a/Master/texmf-dist/dvips/pst-eucl/pst-eucl.pro b/Master/texmf-dist/dvips/pst-eucl/pst-eucl.pro
index 64f01641148..0cf220ee4dc 100644
--- a/Master/texmf-dist/dvips/pst-eucl/pst-eucl.pro
+++ b/Master/texmf-dist/dvips/pst-eucl/pst-eucl.pro
@@ -42,8 +42,9 @@
%% x1 y1 x2 y2 -> Dist
/ABDist { 3 -1 roll sub dup mul 3 1 roll sub dup mul add sqrt } bind def
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%% x1 y1 x2 y2 -> x1-x2 y1-y2
-/ABVect { 3 -1 roll exch sub 3 1 roll sub exch } bind def
+%% x1 y1 x2 y2 -> x2-x1 y2-y1
+%/ABVect { 3 -1 roll exch sub 3 1 roll sub exch } bind def
+/ABVect { 3 -1 roll sub 3 1 roll exch sub exch } bind def
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% x1 y1 x2 y2 x3 y3 x4 y4 -> x y
/InterLines {