%% %% This is file `pctexps.def', %% generated with the docstrip utility. %% %% The original source files were: %% %% drivers.dtx (with options: `pctexps,color3,colorfix') %% %% drivers.dtx Copyright (C) 1994 David Carlisle Sebastian Rahtz %% Copyright (C) 1995 1996 1997 1998 1999 David Carlisle %% %% This file is part of the Standard LaTeX `Graphics Bundle'. %% It may be distributed under the terms of the LaTeX Project Public %% License, as described in lppl.txt in the base LaTeX distribution. %% Either version 1.0 or, at your option, any later version. %% \ProvidesFile{pctexps.def} [1999/02/16 v3.0i Driver-dependant file (DPC,SPQR)] \def\c@lor@arg#1{% \dimen@#1\p@ \ifdim\dimen@<\z@\dimen@\maxdimen\fi \ifdim\dimen@>\p@ \PackageError{color}{Argument `#1' not in range [0,1]}\@ehd \fi} \def\color@gray#1#2{% \c@lor@arg{#2}% \edef#1{#2 setgray}% } \def\color@cmyk#1#2{\c@lor@@cmyk#2\@@#1} \def\c@lor@@cmyk#1,#2,#3,#4\@@#5{% \c@lor@arg{#4}% \c@lor@arg{#1}% \c@lor@arg{#2}% \c@lor@arg{#3}% \edef#5{#1 #2 #3 #4 setcmykcolor}% } \def\color@rgb#1#2{\c@lor@@rgb#2\@@#1} \def\c@lor@@rgb#1,#2,#3\@@#4{% \c@lor@arg{#1}% \c@lor@arg{#2}% \c@lor@arg{#3}% \edef#4{#1 #2 #3 setrgbcolor}% } \def\color@RGB#1#2{\c@lor@@RGB#2\@@#1} \def\c@lor@@RGB#1,#2,#3\@@#4{% \c@lor@RGB@rgb{#1}\@tempa \c@lor@RGB@rgb{#2}\@tempb \c@lor@RGB@rgb{#3}\@tempc \c@lor@@rgb\@tempa,\@tempb,\@tempc\@@#4% } \def\c@lor@RGB@rgb#1#2{% \dimen@#1\p@ \divide\dimen@\@cclv \edef#2{\strip@pt\dimen@}} \def\color@hsb#1#2{\c@lor@@hsb#2\@@#1} \def\c@lor@@hsb#1,#2,#3\@@#4{% \c@lor@arg{#1}% \c@lor@arg{#2}% \c@lor@arg{#3}% \edef#4{#1 #2 #3 sethsbcolor}% } \def\color@named#1#2{\c@lor@@named#2,,\@@#1} \def\c@lor@@named#1,#2,#3\@@#4{% \@ifundefined{col@#1}% {\PackageError{color}{Undefined color `#1'}\@ehd}% {\edef#4{\csname col@#1\endcsname}}% } \def\c@lor@to@ps#1\@@{#1} \def\current@color{0 setgray} \def\set@color{% \Gin@PS@raw{\current@color}\aftergroup\reset@color} \def\reset@color{\Gin@PS@raw{\current@color}} \def\set@page@color{% \c@lor@special\sixt@@n{background color ignored: \current@color}} \def\define@color@named#1#2{% \expandafter\edef\csname col@#1\endcsname{#2}} \AtBeginDocument{% \let\@ldc@l@r\color \def\color{\if@inlabel\leavevmode\fi\@ldc@l@r}% \let\@lduseb@x\usebox \def\usebox#1{\@lduseb@x{#1}\set@color}} \def\Ginclude@eps#1{% \message{<#1>}% \ifGin@clip \typeout{no clipping support in pctexps}% \fi \Gin@req@width.03515\Gin@req@width \Gin@req@height.03515\Gin@req@height \special{ps:#1\space x=\strip@pt\Gin@req@width cm, y=\strip@pt\Gin@req@height cm}} \def\Ginclude@ps#1{% \message{<#1>}% \ifGin@clip \typeout{no clipping support in pctexps}% \fi \hbox{\kern-\Gin@llx bp\raise-\Gin@lly bp\hbox{\special{ps:#1}}}% \typeout{^^J% ---------------------------------------------------------^^J% .ps graphics without bounding box information cannot be^^J% scaled. If the file actually contains the information,^^J% please rename the file to .eps file extension.^^J% ---------------------------------------------------------^^J}} \def\Gin@extensions{.eps,.ps} \@namedef{Gin@rule@.ps}#1{{ps}{.ps}{#1}} \@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} \def\Gin@PS@raw#1{\special{ps::#1}} \def\Grot@start{% \special{ps::gsave currentpoint currentpoint translate \Grot@angle\space rotate neg exch neg exch translate}} \def\Grot@end{\special{ps:: currentpoint grestore moveto}} \def\Gscale@start{\special{ps:: currentpoint currentpoint translate \Gscale@x\space \Gscale@y\space scale neg exch neg exch translate}} \def\Gscale@end{\special{ps:: currentpoint currentpoint translate 1 \Gscale@x\space div 1 \Gscale@y\space div scale neg exch neg exch translate}} \endinput %% %% End of file `pctexps.def'.