diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex-dev/graphics/pctexps.def')
| -rw-r--r-- | Master/texmf-dist/tex/latex-dev/graphics/pctexps.def | 120 |
1 files changed, 120 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex-dev/graphics/pctexps.def b/Master/texmf-dist/tex/latex-dev/graphics/pctexps.def new file mode 100644 index 00000000000..13161ad409b --- /dev/null +++ b/Master/texmf-dist/tex/latex-dev/graphics/pctexps.def @@ -0,0 +1,120 @@ +%% +%% 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 +%% Copyright (C) 2000--2016 David Carlisle, LaTeX3 Project +%% +%% 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.3 or, at your option, any later version. +%% +\ProvidesFile{pctexps.def} + [2016/06/17 v3.0m Driver-dependent 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'. |