circ

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

1 files changed, 79 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/circ/optics.def b/Master/texmf-dist/tex/latex/circ/optics.def
new file mode 100644
index 00000000000..8614ae8e827
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/circ/optics.def
@@ -0,0 +1,79 @@
+%%
+%% This is file `optics.def',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% circ.dtx  (with options: `optics')
+%% CIRC is a LaTeX package to typeset circuit and optics diagrams.
+%% Copyright (C) 1997,1998,2003  Sebastian Tannert and Andreas Tille
+%% 
+%%   This program is free software; you can redistribute it and/or modify
+%%   it under the terms of the GNU General Public License as published by
+%%   the Free Software Foundation; either version 2 of the License, or
+%%   (at your option) any later version.
+%% 
+%%   This program is distributed in the hope that it will be useful,
+%%   but WITHOUT ANY WARRANTY; without even the implied warranty of
+%%   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+%%   GNU General Public License for more details.
+%% 
+%%   You should have received a copy of the GNU General Public License
+%%   along with this program; if not, write to the Free Software
+%%   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+%% 
+%% For error reports concerning UNCHANGED versions of this file no
+%% more than one year old, see CIRC.DVI after installation.
+%% If installation fails search thru this file for 'bug'.
+\ProvidesFile{optics.def}
+\freecirc
+\safedef{Dtext}#1 from #2 to #3 {{
+  \frompin{#2} \save*XY\frompin{#3} \diff*XY
+    \ifdim\**X=0pt
+      \dimen0\**Y
+      \ifdim\**Y<0pt\dimen0-\dimen0\fi
+      \c*fnts\setbox0=\hbox{\char9}\setbox1=\hbox{\char11}%
+      \c*fnt\setbox2=\hbox{\char132}\dp1=0pt
+        \advance\dimen0-\ht0\calc*u
+        \setbox\*bbox=
+          \vtop{\box1\loop\ifnum\cntb*>0\copy2
+            \advance\cntb*-1\repeat\box0}%
+      \put*box\advance\*X*\*spc\advance\*Y*.5\**Y\put\vc*{\hbox{#1}}
+    \else
+    \ifdim\**Y=0pt
+      \advance\*X*\**X
+      \dimen0\**X
+      \ifdim\**X<0pt\dimen0-\dimen0\fi
+        \c*fnts\setbox0=\hbox{\char8}\setbox1=\hbox{\char10}%
+        \c*fnt\advance\dimen0-\wd0\calc*u
+        \setbox\*bbox=\hbox{\box0\loop\ifnum\cntb*>0\advance\cntb*-1
+        \char129\repeat\box1}%
+      \put*box\advance\*X*-.5\**X\advance\*Y*\*spc\put\hc*{#1}
+    \else\errhelp{Only horizontal or vertical labeling allowed.}%
+    \errmessage{Bad points!}\fi\fi}}
+\addCIRCfont cioptic
+\cwdef     oa          {128\CIRCcioptic}
+\cdef      SLens    L  \CIRCcioptic   0
+\cdefiv    HSLens   L  \CIRCcioptic   2 | )
+\cdef      BLens    L  \CIRCcioptic   6
+\cdefiv    HBLens   L  \CIRCcioptic   8 | )
+\cdef      VLens    L  \CIRCcioptic  12
+\cdefiv    HVLens   L  \CIRCcioptic  14 | (
+\cdefviii  Mirror   M  \CIRCcioptic  85 * . +
+\cdefviii  BSplit   BS \CIRCcioptic  36 * . +
+\cdef      Polar    P  \CIRCcioptic  44
+\cdef      Pinhole  {} \CIRCcioptic  46
+\cdefiv    Cam      {} \CIRCcioptic  66  . |
+\cdef      ScrL     {} \CIRCcioptic  72
+\cdef      ScrR     {} \CIRCcioptic  74
+\cdef      ScrBL    {} \CIRCcioptic  76
+\cdef      ScrBR    {} \CIRCcioptic  78
+\cdef      ScrTL    {} \CIRCcioptic  80
+\cdef      ScrTR    {} \CIRCcioptic  82
+\cdef      Laser    {} \CIRCcioptic 160
+\cdef      PM       {} \CIRCcioptic 162
+\bbdefNeTii  OM          \CIRCcioptic 164  {}
+\protectcirc
+\endinput
+%%
+%% End of file `optics.def'.