diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/xypic/xyps-r.tex')
-rw-r--r-- | Master/texmf-dist/tex/generic/xypic/xyps-r.tex | 62 |
1 files changed, 62 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/xypic/xyps-r.tex b/Master/texmf-dist/tex/generic/xypic/xyps-r.tex new file mode 100644 index 00000000000..e75960a8d8b --- /dev/null +++ b/Master/texmf-dist/tex/generic/xypic/xyps-r.tex @@ -0,0 +1,62 @@ +%% xyps-r.tex from $Id: xyps-r.doc,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +%% +%% Xy-pic ``PostScript Rotations and Scaling''. +%% Copyright (c) 1993-1996 Ross Moore <ross@mpce.mq.edu.au> +%% +%% This file is part of the Xy-pic package for graphs and diagrams in TeX. +%% See the companion README and INSTALL files for further information. +%% Copyright (c) 1991-1996 Kristoffer H. Rose <krisrose@brics.dk> +%% +%% The Xy-pic package 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. +%% +%% The Xy-pic package 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 package; if not, write to the Free Software Foundation, Inc., +%% 675 Mass Ave, Cambridge, MA 02139, USA. +%% +%% As a special exception, you may use this file and all files derived +%% from it without restrictions. This special exception was added with +%% version 3.7 of Xy-pic. +%% +\expandafter\ifx\csname xyps-rloaded\endcsname\empty + \message{not reloaded}\endinput \fi +\expandafter\let\csname xyps-rloaded\endcsname=\empty \xycatcodes +\expandafter\ifx\csname xyps-sloaded\endcsname\empty\else + \xyinputorelse@{xyps-s}{\xyerror@{Could not load xyps-s}{}}% + \xycatcodes\fi +\xydef@\installPSrotscale@{\installPSstyle@ + \let\xyRotate@@=\xyPSrotate@@ + \let\doSpecialRotate@@=\doPSspecialRotate@@ + \let\xyscale@@=\xyPSscale@@ + \xyPSshapes@true + \xyuncatcodes } +\xydef@\UsePSrotate{\installPSrotscale@} +\xydef@\NoPSrotate{\UnloadRotate@\relax} +\xydef@\xyPSpretransform@{\xyPSrawA@{\preXYtransform@@}} +\xydef@\xyPSposttransform@{\xyPSrawZ@{\postXYtransform@@}} +\let\preXYtransform@=\xyPSpretransform@ +\let\postXYtransform@=\xyPSposttransform@ +\xydef@\xyPSrotSplit@{% + \expandafter\def\expandafter\preShape@@\expandafter{\xyPSpre@}% + \expandafter\def\expandafter\postShape@@\expandafter{\xyPSpost@}} +\xydef@\xyPSscale@@#1#2{% + \xyPSsplitPS@{\xyscale@start(#1,#2)}{\xyscale@end}% + \xyPSrotSplit@\xyPSpsxy@ } +\xydef@\xyPSrotate@@#1{% + \xyPSsplitPS@{\xyrot@start(#1 xyd)}{\xyrot@end}% + \xyPSrotSplit@\xyPSpsxy@ } +\xydef@\xyPSspecialRotate@#1{% + \xyPSsplitPS@{\xyrot@start(#1)}{\xyrot@end}\xyPSrotSplit@\xyPSpsxy@ } +\xydef@\doPSspecialRotate@@#1@@{\xyPSspecialRotate@{#1}} +\xydef@\xyRotScale@@{% + \def\xyrot@start(##1){{xyt ##1\space xyr}}% + \def\xyscale@start(##1,##2){{xyt ##1\space##2\space xys}}% + \def\xyrot@end{}\def\xyscale@end{}} +\endinput |