diff options
author | Karl Berry <karl@freefriends.org> | 2012-09-18 23:47:41 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2012-09-18 23:47:41 +0000 |
commit | 18bcd998ac1d2e58f992953b84366906ff3f86eb (patch) | |
tree | 4f22b1157bcbe1a28798b505c16f1a4b83637ca1 /Master/texmf-dist/dvips | |
parent | 1437f86d9a9ab519f98066f49b87beb08c1881ea (diff) |
pst-eucl (18sep12)
git-svn-id: svn://tug.org/texlive/trunk@27727 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/dvips')
-rw-r--r-- | Master/texmf-dist/dvips/pst-eucl/pst-eucl.pro | 5 |
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 { |