t-angles update (author says GPL)

git-svn-id: svn://tug.org/texlive/trunk@1772 c570f23f-e606-0410-a88d-b1316a301751

5 files changed, 79 insertions, 482 deletions

diff --git a/Master/texmf-dist/doc/latex/t-angles/README b/Master/texmf-dist/doc/latex/t-angles/README
new file mode 100644
index 00000000000..a49eaaad762
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/t-angles/README
@@ -0,0 +1,18 @@
+                t-angles.sty

+is a LaTeX style for drawing tangles, trees,

+Hopf algebra operations and other pictures.

+

+It is based on emTeX, TPIC or pdfLaTeX \special's.

+Therefore, it can be used with the most popular drivers:

+        emTeX drivers, dviwin, xdvi, dvips, yap, dvipdfm, kdvi

+and (new feature!) with pdfLaTeX.

+

+The manual t-manual.tex describes the style file 

+t-angles.sty of 22.04.2006.

+t-manual.pdf is produced with pdfLaTeX.

+

+You can contact the authors:

+        Yu. Bespalov, V. Lyubashenko

+via e-mail:

+bespalov@imath.kiev.ua

+lub@imath.kiev.ua

diff --git a/Master/texmf-dist/doc/latex/t-angles/readme b/Master/texmf-dist/doc/latex/t-angles/readme
deleted file mode 100644
index 4a646e75498..00000000000
--- a/Master/texmf-dist/doc/latex/t-angles/readme
+++ /dev/null
@@ -1,16 +0,0 @@
-                t-angles.sty
-is a LaTeX2e style for drawing tangles, trees,
-Hopf algebra operations and other pictures.
-
-It is based on emTeX or TPIC \special's.
-Therefore, it can be used with the most popular drivers:
-        emTeX drivers, dviwin, yap, xdvi and dvips.
-
-The manual t-manual.tex contains the style file (10.09.2000)
-t-angles.sty as well, so you may download only the manual.
-
-You can contact the authors:
-        Yu. Bespalov, V. Lyubashenko
-via e-mail:
-lub@imath.kiev.ua
-
diff --git a/Master/texmf-dist/doc/latex/t-angles/t-manual.dvi b/Master/texmf-dist/doc/latex/t-angles/t-manual.dvi
deleted file mode 100644
index 457d8706afc..00000000000
--- a/Master/texmf-dist/doc/latex/t-angles/t-manual.dvi
+++ /dev/null
diff --git a/Master/texmf-dist/doc/latex/t-angles/t-manual.pdf b/Master/texmf-dist/doc/latex/t-angles/t-manual.pdf
new file mode 100644
index 00000000000..9d3a70f592e
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/t-angles/t-manual.pdf
diff --git a/Master/texmf-dist/doc/latex/t-angles/t-manual.tex b/Master/texmf-dist/doc/latex/t-angles/t-manual.tex
index 35e08fe1743..2733ae25151 100644
--- a/Master/texmf-dist/doc/latex/t-angles/t-manual.tex
+++ b/Master/texmf-dist/doc/latex/t-angles/t-manual.tex
@@ -1,460 +1,16 @@
 
      %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
      %                                                                 %
-     %    This is file    t-manual.tex    ( version 10.09.00 )         %
+     %     This is file    t-manual.tex    ( version 22.04.2006 )      %
      %                                                                 %
-     %    Diagrammatic macros for tangles and braided Hopf algebras    %
+     %      Diagram macros for tangles and braided Hopf algebras       %
      %                                                                 %
      %                 (Yu. Bespalov, V. Lyubashenko)                  %
      %                                                                 %
-     %       available from      http://www.math.ksu.edu/~lub/         %
+     %       available from CTAN and http://www.math.ksu.edu/~lub/     %
      %                                                                 %
      %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-\begin{filecontents*}{t-angles.sty}
-% a manual is available from       http://www.math.ksu.edu/~lub/
-% \usepackage[emtex]{t-angles}  % for emtex drivers, dviwin and dvips or
-% \usepackage{t-angles} = \usepackage[TPIC]{t-angles}
-%                       % for TPIC drivers such as dviwin, xdvi, dvips
-% \usepackage[kluwer]{t-angles} or \usepackage[emtex,kluwer]{t-angles}
-%                       % to use with kluwer.cls
-
-     %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-     %                                                                 %
-     %    This is file    t-angles.sty    ( version 10.09.00 )         %
-     %                                                                 %
-     %    Diagrammatic macros for tangles and braided Hopf algebras    %
-     %                                                                 %
-     %                 (Yu. Bespalov, V. Lyubashenko)                  %
-     %                                                                 %
-     %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-\newcount{\hstretch} \hstretch 100
-\newcount{\vstretch} \vstretch 100
-\newlength{\unitlens} \unitlens 10pt
-\def\FillCircDiam{3}
-
-\DeclareOption{emtex}{%
-\gdef\thinlines{\let\@linefnt\tenln \let\@circlefnt\tencirc
-  \@wholewidth\fontdimen8\tenln \@halfwidth .5\@wholewidth
-        \special{em:linewidth \the\@wholewidth}}    %\@wholewidth=0.4pt
-\gdef\thicklines{\let\@linefnt\tenlnw \let\@circlefnt\tencircw
-  \@wholewidth\fontdimen8\tenlnw \@halfwidth .5\@wholewidth
-        \special{em:linewidth \the\@wholewidth}}    %\@wholewidth=0.8pt
-\def\emline#1#2#3#4#5#6{%
-       \put(#1,#2){\special{em:moveto}}%
-       \put(#4,#5){\special{em:lineto}}}%
-\def\drawpath#1#2#3#4{\emline{#1}{#2}1{#3}{#4}2} % graphics for *.lp
-}
-%
-\newcount\@gphlinewidth
-%
-\DeclareOption{TPIC}{%
-\@gphlinewidth\@wholewidth \divide\@gphlinewidth 4736
-        \advance\@gphlinewidth\@ne      %\@gphlinewidth=6
-\gdef\thinlines{\let\@linefnt\tenln \let\@circlefnt\tencirc
-  \@wholewidth\fontdimen8\tenln \@halfwidth .5\@wholewidth
-        \@gphlinewidth\@wholewidth \divide\@gphlinewidth 4736
-        \advance\@gphlinewidth\@ne}     %\@gphlinewidth=6
-\gdef\thicklines{\let\@linefnt\tenlnw \let\@circlefnt\tencircw
-  \@wholewidth\fontdimen8\tenlnw \@halfwidth .5\@wholewidth
-        \@gphlinewidth\@wholewidth \divide\@gphlinewidth 4736}
-                                        %\@gphlinewidth=11
-\def\@paspecial#1#2{%
-    \special{pa #1 #2}}
-\def\path(#1,#2){%
-    \special{pn \the\@gphlinewidth}%
-    \@path(#1,#2)}
-\def\@path(#1,#2){%
-    \@tempdima #1\unitlength
-    \@tempdimb #2\unitlength
-    \@tempcnta \@tempdima \advance\@tempcnta 2368 \divide\@tempcnta 4736
-    \@tempcntb -\@tempdimb \advance\@tempcntb -2368 \divide\@tempcntb 4736
-    \@paspecial{\the\@tempcnta}{\the\@tempcntb}%
-    \@ifnextchar ({\@path}{\special{fp}}}
-\providecommand{\drawpath}[4]{\path(#1,#2)(#3,#4)} % TPIC graphics for *.lp
-\providecommand{\emline}[6]{\path(#1,#2)(#4,#5)}   % TPIC graphics for *.pic
-}
-\DeclareOption{kluwer}{%
-\def\tangle{\begingroup\let\hline\savehline\t@ngle\array{l}}
-\def\tanglec{\begingroup\let\hline\savehline\t@ngle\array{c}}
-\def\tangler{\begingroup\let\hline\savehline\t@ngle\array{r}}
-\def\tangles{\begingroup\let\hline\savehline\t@ngle\array}
-}
-\ExecuteOptions{TPIC}
-
-\newcount{\h@r}
-\newcount{\v@r}
-\newcount{\h@z}
-\newcount{\v@t}
-\newlength{\unith}
-\newlength{\unitv}
-\newlength{\textwd}
-%
-\let\kilglu\@killglue
-%
-\def\@step[#1]{\unith\unitlens
-\divide\unith 1000 \multiply\unith 10 \multiply\unith\hstretch
-\@killglue\kern #1\unith}
-\def\step{\@ifnextchar[{\@step}{\@step[1]}}
-\def\hhstep{\step[-.5]}  \def\hstep{\step[.5]}  \def\Step{\step[2]}
-%
-\def\object#1{\settowidth{\textwd}{${#1}$}
-\hbox{\put(0,0){\kern -.5\textwd${#1}$}\hss}}
-%
-\def\t@ngl@{%
-\gdef\hm@dehalf{1}\gdef\hm@de{2}\gdef\hm@defives{10}\gdef\hm@detens{20}
-\gdef\hm@dethree{7}\gdef\hm@deseven{13}\gdef\hm@defiveteen{15}}
-%
-\def\t@ngle{\t@ngl@
-\gdef\above@bjectskip{0pt}\gdef\below@bjectskip{4pt}
-%
-\def\object##1{{\settowidth{\textwd}{${##1}$}
-\@killglue\setbox0=\hbox{\kern -.5\textwd${##1}$}%
-\unith\ht0\unitv\dp0%
-\advance\unith\above@bjectskip\advance\unitv\below@bjectskip%
-\ht0=\unith\dp0=\unitv\wd0=0pt\box0}}
-%
-\unitlength\unitlens\divide\unitlength 1000
-\unith\unitlength \multiply\unith10 \multiply\unith\hstretch
-\unitv\unitlength \multiply\unitv10 \multiply\unitv\vstretch
-\def\@step[##1]{\@killglue\kern ##1\unith}
-%
-\def\hbx(##1,##2)##3{%
-\@killglue\setbox0=\hbox{##3}\ht0=##2\unitv\dp0=0pt\wd0=##1\unith\box0}
-\def\hln##1{\hbx(##1,0){\hbox to ##1\unith{\hrulefill}}}
-%
-\def\hstr##1{\unith\unitlength \multiply\unith10
-\hstretch ##1 \multiply\unith\hstretch}
-\def\vstr##1{\unitv\unitlength \multiply\unitv10
-\vstretch ##1 \multiply\unitv\vstretch}
-%
-\def\c@@rds(##1,##2,##3,##4){%
-\h@r\hstretch\v@r\vstretch\h@z\hstretch\v@t\vstretch%
-\multiply\h@r ##1 \multiply\v@r ##2 \multiply\h@z ##3 \multiply\v@t ##4%
-\put(\h@r,\v@r)}
-\def\EMl@ne(##1,##2,##3,##4){%
-\h@r\hstretch\v@r\vstretch\h@z\hstretch\v@t\vstretch%
-\multiply\h@r ##1 \multiply\v@r ##2 \multiply\h@z ##3 \multiply\v@t ##4%
-\emline{\h@r}{\v@r}1{\h@z}{\v@t}2}
-%
-%                      N O D E S   A N D   L I N E S
-\def\id{\hbx(0,\hm@de){\c@@rds(0,0,0,\hm@detens){\line(0,1){\v@t}}}}
-\def\idash{\hbx(0,2){\c@@rds(0,0,0,3){\line(0,1){\v@t}}%
-\c@@rds(0,5,0,2){\line(0,1){\v@t}}\c@@rds(0,9,0,2){\line(0,1){\v@t}}%
-\c@@rds(0,13,0,2){\line(0,1){\v@t}}\c@@rds(0,17,0,3){\line(0,1){\v@t}}}}
-\def\node{\hbx(0,0){\c@@rds(0,0,\FillCircDiam,0){\circle*{\h@z}}}}
-\def\n{\hbx(0,\hm@de){\c@@rds(0,0,0,\hm@detens){\line(0,1){\v@t}}%
-\c@@rds(0,0,\FillCircDiam,0){\circle*{\h@z}}}}
-\def\s{\hbx(0,\hm@de){\c@@rds(0,0,0,\hm@detens){\line(0,1){\v@t}}%
-\c@@rds(0,\hm@detens,\FillCircDiam,0){\circle*{\h@z}}}}
-\def\unit{\hbx(0,\hm@de){\c@@rds(0,0,0,10){\line(0,1){\v@t}}%
-\c@@rds(0,12,4,0){\circle{\h@z}}}}
-\def\counit{\hbx(0,\hm@de){\c@@rds(0,10,0,10){\line(0,1){\v@t}}%
-\c@@rds(0,8,4,0){\circle{\h@z}}}}
-%
-%%%% ARGUMENT OF \ne,\nw,\se,\sw,\ned,\nwd,\sed,\swd IS 0,1,2,3 OR 4;
-%%%% 0 PRODUCES EMPTY BOX AND
-%%%% OTHER PRODUCE LINES WITH HORIZONTAL PROJECTIONS =##1
-\def\@nsew##1##2##3##4##5{\hbx(1,\hm@de){\ifcase##1
-\or\EMl@ne(##2)\or\EMl@ne(##3)\or\EMl@ne(##4)\or\EMl@ne(##5)\fi}}
-\def\ne##1{\@nsew{##1}{0,0,10,\hm@detens}{-10,0,10,\hm@detens}%
-{-20,0,10,\hm@detens}{-30,0,10,\hm@detens}}
-\def\nw##1{\@nsew{##1}{0,\hm@detens,10,0}{0,\hm@detens,20,0}%
-{0,\hm@detens,30,0}{0,\hm@detens,40,0}}
-\def\se##1{\@nsew{##1}{10,0,0,\hm@detens}{10,0,-10,\hm@detens}%
-{10,0,-20,\hm@detens}{10,0,-30,\hm@detens}}
-\def\sw##1{\@nsew{##1}{0,0,10,\hm@detens}{0,0,20,\hm@detens}%
-{0,0,30,\hm@detens}{0,0,40,\hm@detens}}
-%
-\def\nd{\hbx(0,2){\c@@rds(0,0,0,3){\line(0,1){\v@t}}%
-\c@@rds(0,5,0,2){\line(0,1){\v@t}}\c@@rds(0,9,0,2){\line(0,1){\v@t}}%
-\c@@rds(0,13,0,2){\line(0,1){\v@t}}\c@@rds(0,17,0,3){\line(0,1){\v@t}}%
-\c@@rds(0,0,\FillCircDiam,0){\circle*{\h@z}}}}
-\def\ned##1{\hbx(1,2){\ifcase##1\or%
-\EMl@ne(0,0,1,2)\EMl@ne(2,4,4,8)\EMl@ne(5,10,7,14)\EMl@ne(8,16,10,20)\or%
-\EMl@ne(-10,0,-7,3)\EMl@ne(-5,5,-3,7)\EMl@ne(-1,9,1,11)%
-\EMl@ne(3,13,5,15)\EMl@ne(7,17,10,20)\or%
-\EMl@ne(-20,0,-14,4)\EMl@ne(-11,6,-8,8)\EMl@ne(-5,10,-2,12)
-\EMl@ne(1,14,4,16)\EMl@ne(7,18,10,20)\or%
-\EMl@ne(-30,0,-26,2)\EMl@ne(-24,3,-20,5)\EMl@ne(-18,6,-14,8)%
-\EMl@ne(-12,9,-8,11)\EMl@ne(-6,12,-2,14)\EMl@ne(0,15,4,17)%
-\EMl@ne(6,18,10,20)\fi}}
-\def\nwd##1{\hbx(1,2){\ifcase##1\or%
-\EMl@ne(0,20,2,16)\EMl@ne(3,14,5,10)\EMl@ne(6,8,8,4)\EMl@ne(9,2,10,0)\or%
-\EMl@ne(0,20,3,17)\EMl@ne(5,15,7,13)\EMl@ne(9,11,11,9)%
-\EMl@ne(13,7,15,5)\EMl@ne(17,3,20,0)\or%
-\EMl@ne(0,20,3,18)\EMl@ne(6,16,9,14)\EMl@ne(12,12,15,10)%
-\EMl@ne(18,8,21,6)\EMl@ne(24,4,30,0)\or%
-\EMl@ne(0,20,4,18)\EMl@ne(6,17,10,15)\EMl@ne(12,14,16,12)\EMl@ne(18,11,22,9)%
-\EMl@ne(24,8,28,6)\EMl@ne(30,5,34,3)\EMl@ne(36,2,40,0)\fi}}
-\def\sd{\hbx(0,2){\c@@rds(0,0,0,3){\line(0,1){\v@t}}%
-\c@@rds(0,5,0,2){\line(0,1){\v@t}}\c@@rds(0,9,0,2){\line(0,1){\v@t}}%
-\c@@rds(0,13,0,2){\line(0,1){\v@t}}\c@@rds(0,17,0,3){\line(0,1){\v@t}}%
-\c@@rds(0,20,\FillCircDiam,0){\circle*{\h@z}}}}
-\def\sed##1{\hbx(1,2){\ifcase##1\or%
-\EMl@ne(10,0,8,4)\EMl@ne(7,6,5,10)\EMl@ne(4,12,2,16)\EMl@ne(1,18,0,20)\or%
-\EMl@ne(10,0,7,3)\EMl@ne(5,5,3,7)\EMl@ne(1,9,-1,11)%
-\EMl@ne(-3,13,-5,15)\EMl@ne(-7,17,-10,20)\or%
-\EMl@ne(10,0,7,2)\EMl@ne(4,4,1,6)\EMl@ne(-2,8,-5,10)%
-\EMl@ne(-8,12,-11,14)\EMl@ne(-14,16,-20,20)\or%
-\EMl@ne(10,0,6,2)\EMl@ne(4,3,0,5)\EMl@ne(-2,6,-6,8)\EMl@ne(-8,9,-12,11)%
-\EMl@ne(-14,12,-18,14)\EMl@ne(-20,15,-24,17)\EMl@ne(-26,18,-30,20)\fi}}
-\def\swd##1{\hbx(1,2){\ifcase##1\or%
-\EMl@ne(0,0,2,4)\EMl@ne(3,6,5,10)\EMl@ne(6,12,8,16)\EMl@ne(9,18,10,20)\or%
-\EMl@ne(0,0,3,3)\EMl@ne(5,5,7,7)\EMl@ne(9,9,11,11)%
-\EMl@ne(13,13,15,15)\EMl@ne(17,17,20,20)\or%
-\EMl@ne(0,0,3,2)\EMl@ne(6,4,9,6)\EMl@ne(12,8,15,10)%
-\EMl@ne(18,12,21,14)\EMl@ne(24,16,30,20)\or%
-\EMl@ne(0,0,4,2)\EMl@ne(6,3,10,5)\EMl@ne(12,6,16,8)\EMl@ne(18,9,22,11)%
-\EMl@ne(24,12,28,14)\EMl@ne(30,15,34,17)\EMl@ne(36,18,40,20)\fi}}
-%
-%                      D A S H E D   C R O S S E S
-\def\xd{\hbx(2,2){\EMl@ne(0,0,4,4)\EMl@ne(6,6,8,8)\EMl@ne(12,12,14,14)%
-\EMl@ne(16,16,20,20)\EMl@ne(0,20,4,16)\EMl@ne(6,14,14,6)\EMl@ne(16,4,20,0)}}
-\def\xxd{\hbx(2,2){\EMl@ne(0,0,4,4)\EMl@ne(6,6,14,14)\EMl@ne(16,16,20,20)%
-\EMl@ne(0,20,4,16)\EMl@ne(6,14,8,12)\EMl@ne(12,8,14,6)\EMl@ne(16,4,20,0)}}
-\def\hxd{\hbx(1,2){\EMl@ne(0,0,2,4)\EMl@ne(3,6,4,8)\EMl@ne(6,12,7,14)%
-\EMl@ne(8,16,10,20)\EMl@ne(0,20,2,16)\EMl@ne(3,14,7,6)\EMl@ne(8,4,10,0)}}
-\def\hxxd{\hbx(1,2){\EMl@ne(0,0,2,4)\EMl@ne(3,6,7,14)\EMl@ne(8,16,10,20)%
-\EMl@ne(0,20,2,16)\EMl@ne(3,14,4,12)\EMl@ne(6,8,7,6)\EMl@ne(8,4,10,0)}}
-%
-%                        O T H E R   L I N E S
-\def\@d##1##2{\hbx(\hm@dehalf,\hm@de){%
-\EMl@ne(##1\hm@defives,##2\hm@detens)}}
-\def\d{\@d{}{0,0,}}   \def\dd{\@d{0,0,}{}}
-\def\@hd##1##2##3{\hbx(.5,\hm@de){\EMl@ne(##1,\hm@defives,##2)%
-\c@@rds(##1,\hm@defives,0,\hm@defives){\line(0,##31){\v@t}}}}
-\def\hd{\@hd{5}{0,\hm@detens}{-}}     \def\dh{\@hd{0}{5,0}{}}
-\def\hdd{\@hd{0}{5,\hm@detens}{-}}    \def\ddh{\@hd{5}{0,0}{}}
-%
-%             P U T   S O M E T H I N G   A N Y W H E R E
-\def\n@de##1##2##3{\hbx(0,0){%
-\c@@rds(##1,0,0){\makebox(0,0)[##2]{$\scriptstyle ##3$}}}}
-\def\nodeu##1{\hbx(0,0){\n@de{0,3}{cb}{##1}}}
-\def\noded##1{\hbx(0,0){\n@de{0,-3}{ct}{##1}}}
-\def\nodel##1{\hbx(0,0){\n@de{-2,0}{rc}{##1}}}
-\def\noder##1{\hbx(0,0){\n@de{2,0}{lc}{##1}}}
-\def\noderu##1{\hbx(0,0){\n@de{5,2}{lb}{##1}}}
-\def\noderd##1{\hbx(0,0){\n@de{5,-2}{lt}{##1}}}
-\def\nodelu##1{\hbx(0,0){\n@de{-5,2}{rb}{##1}}}
-\def\nodeld##1{\hbx(0,0){\n@de{-5,-2}{rt}{##1}}}
-\def\Put(##1,##2)[##3]##4{%
-\h@r\hstretch \multiply\h@r ##1
-\v@r\vstretch \multiply\v@r ##2
-\put(\h@r,\v@r){\makebox(\h@z,\v@t)[##3]{\scriptsize$##4$}}}
-% \def\negobj##1{\raise -0.2\unitv\hbox{\put(0,0){$##1$}}}
-% \def\obj##1{\raise .2\unitv\hbox{\put(0,0){$##1$}}}
-% \def\Obj##1{\settowidth{\textwd}{$##1$}%
-% \raise 1.1\unitv\hbox{\kern -1\textwd $##1$}}
-%
-%                            B O X E S
-\def\dbox##1##2{\hbx(##1,\hm@de){\multiply\hstretch ##1%
-\c@@rds(0,0,10,\hm@detens){\dashbox{100}(\h@z,\v@t){\scriptsize$##2$}}}}
-\def\ffbox##1##2{\hbx(##1,\hm@de){\multiply\hstretch ##1%
-\c@@rds(0,0,10,\hm@detens){\framebox(\h@z,\v@t){\scriptsize$##2$}}}}
-\def\obox##1##2{\hbx(##1,\hm@de){\multiply\hstretch ##1%
-\c@@rds(5,\hm@defives,10,\hm@detens){\oval(\h@z,\v@t)}%
-\c@@rds(0,0,10,\hm@detens){\makebox(\h@z,\v@t)[cc]{\scriptsize$##2$}}}}
-\def\tbox##1##2{\hbx(##1,\hm@de){\multiply\hstretch ##1%
-\c@@rds(0,0,10,\hm@detens){\makebox(\h@z,\v@t)[cc]{\scriptsize$##2$}}}}
-%
-%                       ( C O ) P A I R I N G S
-\def\@ev##1##2##3##4{\hbx(##1){\c@@rds(##2,##3,##3){\oval(\h@z,\v@t)[##4]}}}
-\def\ev{\@ev{\hm@de,\hm@de}{\hm@defives,\hm@detens}\hm@detens b}
-\def\coev{\@ev{\hm@de,\hm@de}{\hm@defives,0}\hm@detens t}
-\def\hcoev{\@ev{1,\hm@de}{5,0}{10}t}
-\def\hev{\@ev{1,\hm@de}{5,\hm@detens}{10}b}
-\def\Coev{\@ev{1,\hm@de}{15,0}{30}t}
-\def\Ev{\@ev{1,\hm@de}{15,\hm@detens}{30}b}
-\def\COEV{\@ev{2,2}{30,0}{60}t}
-\def\EV{\@ev{2,2}{30,20}{60}b}
-%
-%             ( O V E R / U N D E R ) C R O S S I N G S
-\def\X{\hbx(1,\hm@de){\EMl@ne(0,\hm@detens,10,0)\EMl@ne(0,0,10,\hm@detens)}}
-\def\XX{\hbx(\hm@de,\hm@de){\EMl@ne(0,\hm@detens,\hm@detens,0)%
-\EMl@ne(0,0,\hm@detens,\hm@detens)}}
-\def\x{\hbx(\hm@de,\hm@de){\EMl@ne(0,\hm@detens,\hm@detens,0)%
-\EMl@ne(0,0,\hm@dethree,\hm@dethree)%
-\EMl@ne(\hm@detens,\hm@detens,\hm@deseven,\hm@deseven)}}
-\def\xx{\hbx(\hm@de,\hm@de){\EMl@ne(0,\hm@detens,\hm@dethree,\hm@deseven)%
-\EMl@ne(0,0,\hm@detens,\hm@detens)%
-\EMl@ne(\hm@detens,0,\hm@deseven,\hm@dethree)}}
-\def\hx{\hbx(1,2){\EMl@ne(0,20,10,0)\EMl@ne(0,0,3,6)\EMl@ne(10,20,7,14)}}
-\def\hxx{\hbx(1,2){\EMl@ne(0,20,3,14)\EMl@ne(0,0,10,20)\EMl@ne(10,0,7,6)}}
-%
-%                    ( C O ) P R O D U C T S
-\def\pr@d##1##2##3{%
-\c@@rds(##1){\oval(\h@z,\v@t)[c##2]}\c@@rds(##3){\line(0,1){\v@t}}}%
-\def\pr@dd##1##2##3##4{\c@@rds(5,##1,10,10){\oval(\h@z,\v@t)[c##2]}%
-\EMl@ne(5,10,##3)\c@@rds(5,##4,0,5){\line(0,1){\v@t}}}
-\def\c@cyc##1{\c@@rds(##1,\FillCircDiam,0){\circle*{\h@z}}}
-\def\cu{\@ifnextchar*%
-{\hbx(\hm@de,\hm@de){\pr@d{\hm@defives,\hm@detens,\hm@detens,\hm@detens}%
-{b}{\hm@defives,0,0,\hm@defives}%
-\c@cyc{\hm@defives,\hm@defives}}\@gobble}%
-{\hbx(\hm@de,\hm@de){\pr@d{\hm@defives,\hm@detens,\hm@detens,\hm@detens}%
-{b}{\hm@defives,0,0,\hm@defives}}}}
-\def\cd{\@ifnextchar*%
-{\hbx(\hm@de,\hm@de){\pr@d{\hm@defives,0,\hm@detens,\hm@detens}%
-{t}{\hm@defives,\hm@defives,0,\hm@defives}%
-\c@cyc{\hm@defives,\hm@defives}}\@gobble}%
-{\hbx(\hm@de,\hm@de){\pr@d{\hm@defives,0,\hm@detens,\hm@detens}%
-{t}{\hm@defives,\hm@defives,0,\hm@defives}}}}
-\def\hcu{\@ifnextchar*%
-{\hbx(1,\hm@de){\pr@d{5,\hm@detens,10,10}{b}{5,0,0,\hm@defiveteen}%
-\c@cyc{5,\hm@defiveteen}}\@gobble}%
-{\hbx(1,\hm@de){\pr@d{5,\hm@detens,10,10}{b}{5,0,0,\hm@defiveteen}}}}
-\def\hcd{\@ifnextchar*%
-{\hbx(1,\hm@de){\pr@d{5,0,10,10}{t}{5,5,0,\hm@defiveteen}%
-\c@cyc{5,5}}\@gobble}%
-{\hbx(1,\hm@de){\pr@d{5,0,10,10}{t}{5,5,0,\hm@defiveteen}}}}
-\def\Cu{\@ifnextchar*%
-{\hbx(4,2){\pr@d{20,20,40,20}{b}{20,0,0,10}\c@cyc{20,10}}\@gobble}%
-{\hbx(4,2){\pr@d{20,20,40,20}{b}{20,0,0,10}}}}
-\def\Cd{\@ifnextchar*%
-{\hbx(4,2){\pr@d{20,0,40,20}{t}{20,10,0,10}\c@cyc{20,10}}\@gobble}%
-{\hbx(4,2){\pr@d{20,0,40,20}{t}{20,10,0,10}}}}
-\def\hd@cd##1{\@ifnextchar*%
-{\hbx(1,2){\pr@dd{0}{t}{##1,20}{5}\c@cyc{5,5}}\@gobble}%
-{\hbx(1,2){\pr@dd{0}{t}{##1,20}{5}}}}
-\def\hd@cu##1{\@ifnextchar*%
-{\hbx(1,2){\pr@dd{20}{b}{##1,0}{10}\c@cyc{5,15}}\@gobble}%
-{\hbx(1,2){\pr@dd{20}{b}{##1,0}{10}}}}
-\def\hdcd{\hd@cd 0}   \def\hddcd{\hd@cd{10}}
-\def\hdcu{\hd@cu{10}}   \def\hddcu{\hd@cu 0}
-%
-%                          A C T I O N S
-\def\@ct##1##2##3##4##5{\hbx(##1,\hm@de){%
-\c@@rds(##2,##3,##4,##4){\oval(\h@z,\v@t)[##5]}%
-\c@@rds(##2,0,0,\hm@detens){\line(0,1){\v@t}}}}
-\def\@lu[##1]{{\multiply\hstretch##1\@ct{##1}{10}{\hm@detens}{20}{lb}}}
-\def\@ru[##1]{{\multiply\hstretch##1\@ct{##1}{0} {\hm@detens}{20}{rb}}}
-\def\@ld[##1]{{\multiply\hstretch##1\@ct{##1}{10}{0}{20}{lt}}}
-\def\@rd[##1]{{\multiply\hstretch##1\@ct{##1}{0}{0}{20}{rt}}}
-\def\lu{\@ifnextchar[{\@lu}{\@lu[1]}}
-\def\ru{\@ifnextchar[{\@ru}{\@ru[1]}}
-\def\ld{\@ifnextchar[{\@ld}{\@ld[1]}}
-\def\rd{\@ifnextchar[{\@rd}{\@rd[1]}}
-\def\Lu{\lu[2]}\def\Ru{\ru[2]}\def\Ld{\ld[2]}\def\Rd{\rd[2]}
-\def\@hlu[##1]{{\divide\unith2\multiply\hstretch##1%
-\@ct{##1}{5}{\hm@detens}{10}{lb}}}
-\def\@hru[##1]{{\divide\unith2\multiply\hstretch##1%
-\@ct{##1}{0}{\hm@detens}{10}{rb}}}
-\def\@hld[##1]{{\divide\unith2\multiply\hstretch##1%
-\@ct{##1}{5}{0}{10}{lt}}}
-\def\@hrd[##1]{{\divide\unith2\multiply\hstretch##1%
-\@ct{##1}{0}{0}{10}{rt}}}
-\def\hlu{\@ifnextchar[{\@hlu}{\@hlu[1]}}
-\def\hru{\@ifnextchar[{\@hru}{\@hru[1]}}
-\def\hld{\@ifnextchar[{\@hld}{\@hld[1]}}
-\def\hrd{\@ifnextchar[{\@hrd}{\@hrd[1]}}
-% \def\hlu{\@ct{.5}{5}{\hm@detens}{10}{lb}}
-% \def\hru{\@ct{.5}{0}{\hm@detens}{10}{rb}}
-% \def\hld{\@ct{.5}{5}{0}{10}{lt}}
-% \def\hrd{\@ct{.5}{0}{0}{10}{rt}}
-%
-%                       C O M P O S I T I O N S
-\def\c@mp##1##2##3##4##5##6{\hbx(##1,2){%
-\c@@rds(##2,0,##3){\oval(\h@z,\v@t)[##4t]}%
-\c@@rds(##2,20,##3){\oval(\h@z,\v@t)[##4b]}%
-\c@@rds(##2,##5,0,##6){\line(0,1){\v@t}}}}
-\def\cucd{\c@mp{1}{5}{10,10}{}{5}{10}}
-\def\k{\c@mp{1}{0}{20,10}{r}{0}{20}}
-\def\kk{\c@mp{1}{10}{20,10}{l}{0}{20}}
-\def\rurd{\c@mp{.5}{0}{10,10}{r}{0}{20}}
-\def\luld{\c@mp{.5}{5}{10,10}{l}{0}{20}}
-%
-%                M O R P H I S M S   I N   A   C I R C L E
-\def\c@rcled##1##2{\c@@rds(##1,12,12){\oval(\h@z,\v@t)}%
-\c@@rds(##1,0,0){\makebox(\h@z,\v@t)[cc]{\scriptsize$##2$}}}
-%               ( 1, 0 ) -,  ( 0, 1 ) -  T E N S O R S
-\def\@Q##1##2{\hbx(0,\hm@de){%
-\c@@rds(0,##1,0,4){\line(0,1){\v@t}}\c@rcled{0,10}{##2}}}
-\def\Q##1{\@Q{0}{##1}}     \def\QQ##1{\@Q{16}{##1}}
-%                    ( 1, 1 ) - T E N S O R S
-\def\O##1{\hbx(0,\hm@de){\c@@rds(0,0,0,4){\line(0,1){\v@t}}%
-\c@@rds(0,16,0,4){\line(0,1){\v@t}}\c@rcled{0,10}{##1}}}
-\def\S{\O{S}}              \def\SS{\O{S^{-1}}}
-%\def\circ##1{\hbx(2,2){\c@rcled{10,4}{##1}}}
-\def\morph##1{\hbx(2,2){\c@@rds(10,10,10,10){\oval(\h@z,\v@t)}%
-\c@@rds(5,5,10,10){\makebox(\h@z,\v@t)[cc]{\scriptsize$##1$}}%
-\c@@rds(10,0,0,5){\line(0,1){\v@t}}%
-\c@@rds(10,15,0,5){\line(0,1){\v@t}}}}
-%               ( 2, 0 ) -,  ( 0, 2 ) -  T E N S O R S
-\def\r@##1##2##3##4##5{\hbx(2,\hm@de){%
-\c@@rds(0,##1,0,4){\line(0,##41){\v@t}}%
-\c@@rds(20,##1,0,4){\line(0,##41){\v@t}}%
-\c@@rds(4,##1,8,8){\oval(\h@z,\v@t)[l##2]}%
-\c@@rds(16,##1,8,8){\oval(\h@z,\v@t)[r##2]}\c@rcled{##3}{##5}}}
-\def\ro##1{\r@{4}{t}{10,8}{-}{##1}}
-\def\coro##1{\r@{16}{b}{10,12}{}{##1}}
-%
-\def\R@##1##2##3{\hbx(4,\hm@de){%
-\c@@rds(14,##1,28,20){\oval(\h@z,\v@t)[l##2]}%
-\c@@rds(26,##1,28,20){\oval(\h@z,\v@t)[r##2]}\c@rcled{20,10}{##3}}}
-\def\Ro##1{\R@{0}{t}{##1}}
-\def\coRo##1{\R@{20}{b}{##1}}
-%               ( 2, 1 ) -,  ( 1, 2 ) -  T E N S O R S
-\def\t@##1##2##3##4##5##6{\hbx(2,2){%
-\c@@rds(4,##1,8,8){\oval(\h@z,\v@t)[l##2]}%
-\c@@rds(16,##1,8,8){\oval(\h@z,\v@t)[r##2]}%
-\c@@rds(0,##1,0,5){\line(0,##31){\v@t}}%
-\c@@rds(20,##1,0,5){\line(0,##31){\v@t}}%
-\c@@rds(10,##4,0,5){\line(0,##31){\v@t}}%
-\c@rcled{10,##5}{##6}}}
-\def\tu##1{\t@{15}b{}{0}{11}{##1}}  \def\td##1{\t@{5}t{-}{20}{9}{##1}}
-%                    ( 2, 2 ) - T E N S O R S
-\def\ox##1{\hbx(2,2){\c@@rds(10,10,14,14){\oval(\h@z,\v@t)}%
-\c@@rds(10,10,0,0){\makebox(\h@z,\v@t)[cc]{\scriptsize$##1$}}
-\EMl@ne(0,0,5,5)\EMl@ne(0,20,5,15)\EMl@ne(20,20,15,15)\EMl@ne(20,0,15,5)}}
-%
-% HALF HEIGHT ROW IS PRODUCED BY \hh or \HH AT THE BEGINNING OF THE ROW
-%   \HH is global for a row, \hh is local
-\def\HH{\gdef\hm@dehalf{.5}\gdef\hm@de{1}
-\gdef\hm@dethree{3}\gdef\hm@defives{5}\gdef\hm@deseven{7}
-\gdef\hm@detens{10}\gdef\hm@defiveteen{5}}
-\def\hh{\def\hm@dehalf{.5}\def\hm@de{1}
-\def\hm@dethree{3}\def\hm@defives{5}\def\hm@deseven{7}
-\def\hm@detens{10}\def\hm@defiveteen{5}}
-%
-\def\array{\let\@acol\@arrayacol \let\@classz\@arrayclassz
-\let\@classiv\@arrayclassiv \def\arraystretch{0}\arraycolsep0pt
-\def\\{\gdef\above@bjectskip{4pt}\gdef\below@bjectskip{0pt}\t@ngl@\@arraycr}
-\let\@halignto\@empty\@tabarray}
-}
-%        E N D   \def\t@ngle
-%
-\def\tangle{\t@ngle\array{l}}    \def\endtangle{\endarray\t@ngl@}
-\def\tanglec{\t@ngle\array{c}}   \let\endtanglec\endtangle
-\def\tangler{\t@ngle\array{r}}   \let\endtangler\endtangle
-\def\tangles{\t@ngle\array}      \let\endtangles\endtangle
-%
-\ProcessOptions
-\endinput
-\end{filecontents*}
-\begin{filecontents}{t-manual.bbl}
-\providecommand{\bysame}{\leavevmode\hbox to3em{\hrulefill}\thinspace}
-\begin{thebibliography}{1}
-
-\bibitem{Bes:cross}
-Yu.~N. Bespalov, \emph{Crossed modules and quantum groups in braided
-  categories}, Applied Categorical Structures \textbf{5} (1997), no.~2,
-  155--204, http://xxx.lanl.gov/abs/q-alg/9510013.
-
-\bibitem{Bes:FRT}
-\bysame, \emph{On the braided {FRT}-construction}, J. Nonlinear Math. Phys.
-  \textbf{4} (1997), no.~1-2, 195--205, http://xxx.lanl.gov/abs/q-alg/9510012.
-
-\bibitem{BKLT:int}
-Yu.~N. Bespalov, T.~Kerler, V.~V. Lyubashenko, and V.~G. Turaev,
-  \emph{Integrals for braided {H}opf algebras}, J. Pure and Appl. Algebra
-  \textbf{148} (2000), no.~2, 113--164, Available as
-  http://xxx.lanl.gov/abs/q-alg/9709020.
-
-\end{thebibliography}
-\end{filecontents}
-
 \documentclass[11pt]{article}
 
 \usepackage{amsmath}
@@ -471,10 +27,10 @@ Yu.~N. Bespalov, T.~Kerler, V.~V. Lyubashenko, and V.~G. Turaev,
 \footnote{t-angles.sty is available from {\tt
 http://www.math.ksu.edu/$\sim$lub/} or from CTAN}
 \\
-\mbox{\Large\bf (Diagrammatic macros for tangles and braided Hopf algebras)}
+\mbox{\Large\bf(Diagram macros for tangles and braided Hopf algebras)}
 }
 \author{Yu. Bespalov \and V. Lyubashenko}
-\date{Version 10.09.00}
+\date{Version 22.04.2006}
 
 \def\subsec#1{\subsection*{#1}\addcontentsline{toc}{subsection}{#1}}
 
@@ -502,16 +58,48 @@ http://www.math.ksu.edu/$\sim$lub/} or from CTAN}
 \addcontentsline{toc}{subsection}{Usage}
 $$
 \vcenter{\hbox{\command{\usepackage[emtex]\{t-angles\}}}
-         \hbox{(for \command{emtex} drivers, {\tt dviwin, dvips, yap} )}}
+         \hbox{(for \command{emtex} drivers, \tt dviwin,}
+         \hbox{ \tt dvips, yap )}}
 \qquad \hbox{or} \qquad
 \vcenter{\hbox{\command{\usepackage\{t-angles\}} $\equiv$}
          \hbox{\command{\usepackage[TPIC]\{t-angles\}}}
-         \hbox{(for TPIC drivers such as}
-         \hbox{ {\tt dviwin, xdvi, dvips, yap} )}}
+         \hbox{(for TPIC drivers such as \tt dviwin,}
+         \hbox{ {\tt xdvi, dvips, yap, dvipdfm, kdvi} )}}
 $$
 To use with \command{kluwer.cls} add the option \command{kluwer}:\\
 \command{\usepackage[emtex,kluwer]\{t-angles\}} or
-\command{\usepackage[kluwer]\{t-angles\}}
+\command{\usepackage[kluwer]\{t-angles\}}.
+
+The main option \command{TPIC} is executed by default. It can be
+overwritten by the antagonistic option \command{emtex}. These two
+options give slightly different *.dvi output, when they are used with
+\LaTeX. The package works also with pdf\LaTeX. In this case both
+options produce identical *.pdf output. Actually, the third option
+\command{pdflatex} is executed in this case automatically. You should
+not type \command{\usepackage[pdflatex]\{t-angles\}} in your file
+unless you want to prohibit its use with \LaTeX. Another way to produce
+*.pdf file is to apply \command{dvipdfm} to the *.dvi output, obtained
+with the \command{TPIC} option.
+
+Under pdf\LaTeX{} the information about slanted lines is stored in a file
+*.emp and read on the following pass. Consequently, the changes made in
+a tangle diagram are not reflected immediately in the *.pdf output. You
+may need several ($\simeq2$) runs of pdf\LaTeX{} to see the final
+picture.
+
+
+\subsec{Acknowledgments}
+ An optional parameter for (co)actions is proposed by Bernhard Drabant.
+The file \command{t-angles.sty} contains parts of
+\command{emlines2.sty} by Georg Horn and Eberhard Mattes and parts of
+\command{eepic.sty} by Conrad Kwok. PDF implementation of em\TeX{}
+specials is due to Hans Hagen. We have incorporated his con\TeX t
+support macros `em\TeX{} specials to PDF conversion' from
+\command{supp-emp.tex} distributed with Te\TeX. These parts of the code
+are used in the three options: \command{emtex}, \command{TPIC} and
+\command{pdflatex} respectively. To understand them the reader is
+invited to read comments in the original works.
+
 
 \subsection*{Main features:}
 \addcontentsline{toc}{subsection}{Main features}
@@ -650,7 +238,7 @@ is described by the lines:
 \begin{itemize}
 \item
 The commands \command\id, \command\n, \command\s,\command\node,
-\command\unit, \command\counit work in \hhmode.
+\command\unit, \command\counit work also in \hhmode.
 $$
 \Show\id    \quad
 \Show\idash \quad
@@ -664,7 +252,7 @@ $$
 $$
 The command \command\FillCircDiam denotes the filled circle diameter.
 It is set to an integer between 1 and 9 (here the measure unit is
-0.1 \command\unith). Default value is 4.
+0.1 \command\unith). Default value is 3.
 \item
 The command \command\hln{\tt <number>} \ produces horizontal line on
 \ {\tt <number>}\command\unith.
@@ -961,10 +549,9 @@ at the bottom.
 
 \subsec{History and versions}
 
-The style is produced by the first author in 1994 and used in
-\cite{Bes:cross,Bes:FRT}.
-It was completely modified and essentially improved by the second author
-for applications in \cite{BKLT:int}.
+The style was produced by the first author in 1994. It was completely
+modified and essentially improved by the second author in 1997 for
+real--life applications in \cite{BKLT:int}.
 
 {%beginenumerate
 \setlength{\leftmargini}{34mm}
@@ -978,9 +565,23 @@ slightly differs. Now they fit their boxes.
 Dashed crossings are represented by the commands
 \command{\xd,}\command{\xxd,}\command{\hxd,}\command{\hxxd.}
 
+\item[10.09.00$\to$22.04.06]
+It is possible to use the package with pdf\LaTeX.
+
 \end{enumerate}
 }%endenumerate
 
+\begin{thebibliography}{1}
+
+\bibitem{BKLT:int}
+Yu.~N. Bespalov, T.~Kerler, V.~V. Lyubashenko, and V.~G. Turaev,
+  \emph{Integrals for braided {H}opf algebras}, J. Pure and Appl. Algebra
+  \textbf{148} (2000), no.~2, 113--164, Available as
+  http://arXiv.org/abs/q-alg/9709020.
+
+\end{thebibliography}
+
+%\bibliography{yuri}
 
 %\subsec{Bugs}
 %\begin{itemize}
@@ -1010,17 +611,11 @@ To add possibility to change size of circle in circled morphisms
 \end{itemize}
 
 
-\subsec{Acknowledgments}
-Optional parameter for (co)actions is proposed by Bernhard Drabant.
- \command{t-angles.sty} contains parts of \command{emlines2.sty} by
- Georg Horn and Eberhard Mattes and parts of \command{eepic.sty} by
- Conrad Kwok.
 \medskip
 \begin{center}
-\fbox{Suggestions are welcomed.}
+\fbox{Suggestions are welcome.}
 \end{center}
 
-\bibliography{yuri}
 
 \appendix
 \section{Exercises}