summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pstricks/pst-coil.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/pstricks/pst-coil.tex')
-rw-r--r--Master/texmf-dist/tex/generic/pstricks/pst-coil.tex136
1 files changed, 0 insertions, 136 deletions
diff --git a/Master/texmf-dist/tex/generic/pstricks/pst-coil.tex b/Master/texmf-dist/tex/generic/pstricks/pst-coil.tex
deleted file mode 100644
index aeac0179afd..00000000000
--- a/Master/texmf-dist/tex/generic/pstricks/pst-coil.tex
+++ /dev/null
@@ -1,136 +0,0 @@
-%% BEGIN pst-coil.tex
-%%
-%% Coils and zigzags with PSTricks 97.
-%% See the PSTricks User's Guide for documentation.
-%% For use with the PostScript header file `pst-coil.pro'.
-%%
-\def\fileversion{97 patch 2}
-\def\filedate{1998/03/19}
-%%
-%% COPYRIGHT 1993, 1994, 1999 by Timothy Van Zandt, tvz@nwu.edu.
-%%
-%% This program can be redistributed and/or modified under the terms
-%% of the LaTeX Project Public License Distributed from CTAN
-%% archives in directory macros/latex/base/lppl.txt.
-%%
-\message{ v\fileversion, \filedate}
-\csname PSTcoilsLoaded\endcsname
-\let\PSTcoilsLoaded\endinput
-\ifx\PSTricksLoaded\endinput\else
-\def\next{\input pstricks.tex}\expandafter\next
-\fi
-\edef\TheAtCode{\the\catcode`\@}
-\catcode`\@=11
-\pstheader{pst-coil.pro}
-\edef\pst@theheaders{\pst@theheaders,pst-coil.pro}
-\def\pst@coildict{tx@CoilDict begin }
-\def\psset@coilwidth#1{\pst@getlength{#1}\psk@coilwidth}
-\psset@coilwidth{1cm}
-\def\psset@coilheight#1{\pst@checknum{#1}\pscoilheight}
-\psset@coilheight{1}
-\def\psset@coilarmA#1{\pst@getlength{#1}\psk@coilarmA}
-\def\psset@coilarmB#1{\pst@getlength{#1}\psk@coilarmB}
-\def\psset@coilarm#1{%
-\pst@getlength{#1}\psk@coilarmA
-\let\psk@coilarmB\psk@coilarmA}
-\psset@coilarm{.5cm}
-\def\psset@coilaspect#1{\pst@getangle{#1}\psk@coilaspect}
-\psset@coilaspect{45}
-\def\psset@coilinc#1{\pst@getangle{#1}\psk@coilinc}
-\psset@coilinc{10}
-\def\pscoil{\def\pst@par{}\pst@object{pscoil}}
-\def\pscoil@i{\pst@getarrows\pscoil@ii}
-\def\pscoil@ii(#1){%
-\@ifnextchar(%
-{\pscoil@iii{1}(#1)}%
-{\pscoil@iii{\z@}(0,0)(#1)}}
-\def\pscoil@iii#1(#2)(#3){%
-\begin@OpenObj
-\pst@getcoor{#2}\pst@tempa
-\pst@getcoor{#3}\pst@tempb
-\pst@optcp{#1}\pst@tempa
-\addto@pscode{%
-\pst@tempa \pst@tempb
-\psk@coilwidth \pscoilheight
-\psk@coilarmA \psk@coilarmB
-\psk@coilaspect \psk@coilinc
-\pst@coildict \tx@Coil end}%
-\showpointsfalse
-\end@OpenObj}
-\def\tx@CoilLoop{CoilLoop }
-\def\tx@Coil{Coil }
-\def\psCoil{\def\pst@par{}\pst@object{psCoil}}
-\def\psCoil@i#1#2{%
-\begin@AltOpenObj
-\showpointsfalse
-\pst@getangle{#1}\pst@tempa
-\pst@getangle{#2}\pst@tempb
-\addto@pscode{%
-\pst@tempa
-\pst@tempb
-\psk@coilwidth
-\pscoilheight
-\psk@coilaspect
-\psk@coilinc
-\pst@coildict \tx@AltCoil end
-\@nameuse{psls@\pslinestyle}}%
-\end@OpenObj}
-\def\tx@AltCoil{AltCoil }
-\def\pszigzag{\def\pst@par{}\pst@object{pszigzag}}
-\def\pszigzag@i{\pst@getarrows\pszigzag@ii}
-\def\pszigzag@ii(#1){%
-\@ifnextchar({\pszigzag@iii{1}(#1)}{\pszigzag@iii{\z@}(0,0)(#1)}}
-\def\pszigzag@iii#1(#2)(#3){%
-\begin@OpenObj
-\pst@getcoor{#2}\pst@tempa
-\pst@getcoor{#3}\pst@tempb
-\pst@optcp{#1}\pst@tempa
-\addto@pscode{%
-\pst@tempa
-\pst@tempb
-\pscoilheight
-\psk@coilwidth
-\psk@coilarmA
-\psk@coilarmB
-\pst@coildict \tx@ZigZag end
-\psline@iii
-\tx@Line}%
-\end@OpenObj}
-\def\tx@ZigZag{ZigZag }
-\def\nccoil{\pst@object{nccoil}}
-\def\nccoil@i{\check@arrow{\nccoil@ii}}
-\def\nccoil@ii#1#2{\nc@object{Open}{#1}{#2}{.5}{%
-\tx@NCCoor
-tx@Dict begin
-% DG/SR modification begin - Mar. 19, 1998 - Patch 2
-4 2 roll
-% DG/SR modification end
-\psk@coilwidth \pscoilheight
-\psk@coilarmA \psk@coilarmB
-\psk@coilaspect \psk@coilinc
-\pst@coildict \tx@Coil end
-end}}
-\def\pccoil{\def\pst@par{}\pst@object{pccoil}}
-\def\pccoil@i{\pc@object\nccoil@ii}
-\def\nczigzag{\pst@object{nczigzag}}
-\def\nczigzag@i{\check@arrow{\nczigzag@ii}}
-\def\nczigzag@ii#1#2{\nc@object{Open}{#1}{#2}{.5}{%
-\tx@NCCoor
-tx@Dict begin
-% DG/SR modification begin - Mar. 19, 1998 - Patch 2
-4 2 roll
-% DG/SR modification end
-\pscoilheight
-\psk@coilwidth
-\psk@coilarmA
-\psk@coilarmB
-\pst@coildict \tx@ZigZag end
-\psline@iii
-\tx@Line
-end}}
-\def\pczigzag{\def\pst@par{}\pst@object{pczigzag}}
-\def\pczigzag@i{\pc@object\nczigzag@ii}
-\catcode`\@=\TheAtCode\relax
-\endinput
-%%
-%% END pst-coil.tex