summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/curves/curves.sty
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2008-09-08 00:01:08 +0000
committerKarl Berry <karl@freefriends.org>2008-09-08 00:01:08 +0000
commitafcd1593272b9e2b915b9677229483d6b687c85d (patch)
treeca5e145debf778639fc9c02976466e532c885dbb /Master/texmf-dist/tex/latex/curves/curves.sty
parent4408b5988380b6439238e57c784051169addd06c (diff)
curves 1.52 (1sep08)
git-svn-id: svn://tug.org/texlive/trunk@10456 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/curves/curves.sty')
-rw-r--r--Master/texmf-dist/tex/latex/curves/curves.sty7
1 files changed, 5 insertions, 2 deletions
diff --git a/Master/texmf-dist/tex/latex/curves/curves.sty b/Master/texmf-dist/tex/latex/curves/curves.sty
index 17e0110298e..a57cd0bbd87 100644
--- a/Master/texmf-dist/tex/latex/curves/curves.sty
+++ b/Master/texmf-dist/tex/latex/curves/curves.sty
@@ -12,7 +12,7 @@
%% Internet: ilm@patch.bpa.nu
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{curves}
- [2008/04/24 1.51 Curves for LaTeX picture environment]
+ [2008/08/29 1.52 Curves for LaTeX picture environment]
\catcode`\;=11
@@ -52,6 +52,7 @@
\newif\if;noopt \;noopttrue
\newif\ifcurvewarn \curvewarntrue
+\newif\ifstraight
\newif\if;ccn
\newif\if;pt
\newif\if;csym
@@ -334,7 +335,8 @@
\newcommand\;slbez{\divide\;dx\tw@ \;ddx\;dx \divide\;dy\tw@
\;ddy\;dy \;bezier}
-\newcommand\;bezier{\;scale\;dx\;dy \;scp\;rc \;scale\;ddx\;ddy
+\newcommand\;bezier{\ifstraight \av;d\;dx\;ddx \av;d\;dy\;ddy \fi
+ \;scale\;dx\;dy \;scp\;rc \;scale\;ddx\;ddy
\advance\;scp\;rc \;bezc\;dx\;ddx \;bezc\;dy\;ddy \;rxy\;ddx\;ddy
\divide\;rc\p@ \advance\;rc\thr@@
\;tc\;rc \ifnum\;rc>\sixt@@n\;rc\sixt@@n\fi
@@ -361,6 +363,7 @@
\advance\;rtc\m@ne \multiply\;rtc\;t \;tc\;t \advance\;tc\;tc
\;bezd\;dx\;ddx \;bezd\;dy\;ddy
\ifdim\;pl>\z@ \;dashes \else \let\n;xt\;spoints \;spoints \fi}
+\newcommand\av;d[2]{\advance#1#2\divide#1\tw@#2#1}
\newcommand\;scale[2]{\;td\xscale#1\advance\;td\xscaley#2%
#2\yscale#2\advance#2\yscalex#1#1\;td \;rxy#1#2}
\newcommand\;bezc[2]{\advance#1#1\advance#2#2%