From 00a8b88691d82bb5e6292611a8fddea93820ffeb Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Wed, 11 Jan 2006 23:53:47 +0000 Subject: trunk/Master/texmf-dist/source/latex/graphics git-svn-id: svn://tug.org/texlive/trunk@311 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/source/latex/graphics/color.dtx | 890 ++++++++++ .../texmf-dist/source/latex/graphics/drivers.dtx | 1662 ++++++++++++++++++ Master/texmf-dist/source/latex/graphics/epsfig.dtx | 141 ++ .../texmf-dist/source/latex/graphics/graphics.dtx | 1782 ++++++++++++++++++++ .../texmf-dist/source/latex/graphics/graphics.ins | 116 ++ .../texmf-dist/source/latex/graphics/graphicx.dtx | 863 ++++++++++ Master/texmf-dist/source/latex/graphics/keyval.dtx | 401 +++++ Master/texmf-dist/source/latex/graphics/lscape.dtx | 134 ++ Master/texmf-dist/source/latex/graphics/pstcol.dtx | 159 ++ Master/texmf-dist/source/latex/graphics/trig.dtx | 308 ++++ 10 files changed, 6456 insertions(+) create mode 100644 Master/texmf-dist/source/latex/graphics/color.dtx create mode 100644 Master/texmf-dist/source/latex/graphics/drivers.dtx create mode 100644 Master/texmf-dist/source/latex/graphics/epsfig.dtx create mode 100644 Master/texmf-dist/source/latex/graphics/graphics.dtx create mode 100644 Master/texmf-dist/source/latex/graphics/graphics.ins create mode 100644 Master/texmf-dist/source/latex/graphics/graphicx.dtx create mode 100644 Master/texmf-dist/source/latex/graphics/keyval.dtx create mode 100644 Master/texmf-dist/source/latex/graphics/lscape.dtx create mode 100644 Master/texmf-dist/source/latex/graphics/pstcol.dtx create mode 100644 Master/texmf-dist/source/latex/graphics/trig.dtx diff --git a/Master/texmf-dist/source/latex/graphics/color.dtx b/Master/texmf-dist/source/latex/graphics/color.dtx new file mode 100644 index 00000000000..5a31f82a9d6 --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/color.dtx @@ -0,0 +1,890 @@ +% +% \iffalse +% +%% color.dtx Copyright (C) 1994--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. +%% +%<*dtx> + \ProvidesFile{color.dtx} +% +%\NeedsTeXFormat{LaTeX2e}[1995/12/01] +%\ProvidesPackage{color} +% \ProvidesFile{color.drv} +% \fi +% \ProvidesFile{color.dtx} + [1999/02/16 v1.0i Standard LaTeX Color (DPC)] +% +% \iffalse +%<*driver> +\documentclass{ltxdoc} +\newenvironment{option}[1]{\expandafter\macro\expandafter{% + \csname ds@#1\endcsname}}{\endmacro} +\begin{document} + \DocInput{color.dtx} +\end{document} +% +% \fi +% +% \GetFileInfo{color.dtx} +% +% \title{The \textsf{color} package\thanks{This file +% has version number \fileversion, last +% revised \filedate.}} +% \author{D. P. Carlisle} +% \date{\filedate} +% \maketitle +% +% \CheckSum{426} +% +% +% \title{The implementation of the \LaTeX\ Colour interface.} +% +% \section{Introduction} +% This package implements \LaTeX\ support for colour, for those +% \texttt{dvi} drivers that can produce coloured text. +% +% The user level documentation of this package is contained in the +% document \emph{Packages in the `graphics' bundle} in the file +% \texttt{grfguide.tex}. +% +% \StopEventually{} +% +% +% \section{Options} +% +% \changes{v0.2a}{1994/04/13} +% {TEMP KLUDGE for Feb 94 release of 2e: +% Add extra groups} +% \changes{v0.2d}{1994/05/13} +% {All support for Feb 1994 release removed (so used optional arg +% of \cs{NeedsTeXFormat}).} +% \changes{v1.0}{1996/05/29} +% {Version 1 at last} +% +% \begin{macrocode} +%<*package> +% \end{macrocode} +% +% First we save the catcodes of some characters, and set them to +% fixed values whilst this file is being read. +% \changes{v0.3b}{1994/09/14} +% {Save and restore catcodes} +% \begin{macrocode} +\edef\Gin@codes{% + \catcode`\noexpand\^^A\the\catcode`\^^A\relax + \catcode`\noexpand\"\the\catcode`\"\relax + \catcode`\noexpand\*\the\catcode`\*\relax + \catcode`\noexpand\!\the\catcode`\!\relax + \catcode`\noexpand\:\the\catcode`\:\relax} +\catcode`\^^A=\catcode`\% +\catcode`\"=12 +\catcode`\*=11 +\catcode`\!=12 +\catcode`\:=12 +% \end{macrocode} +% +% \begin{macro}{\Gin@driver} +% Initalise the macro to hold the driver file name. +% \begin{macrocode} +\providecommand\Gin@driver{} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\c@lor@error} +% \changes{v1.0d}{1997/01/07} +% {Macro added for graphics/2350} +% Helper macro for error handling (redefined by the monochrome option +% to make errors warnings). +% \begin{macrocode} +\def\c@lor@error#1{% + \@latex@error{Undefined color #1}\@ehd} +% \end{macrocode} +% \end{macro} +% +% \begin{option}{monochrome} +% The |monochrome| option should be used \emph{in addition} +% to one of the standard driver options. +% \changes{v0.3j}{1995/06/16} +% {Use single hash for latex/1557} +% \changes{v1.0b}{1996/10/29} +% {Add \cs{colors@false}} +% \changes{v1.0d}{1997/01/07} +% {Add \cs{c@lor@error} for graphics/2350} +% \begin{macrocode} +\DeclareOption{monochrome}{% + \def\c@lor@error#1{\PackageInfo{color}{Undefined color #1}}% + \AtEndOfPackage{% + \colors@false + \def\set@color{% + \c@lor@special\m@ne + {color push \current@color}\aftergroup\reset@color}% + \def\reset@color{\c@lor@special\m@ne{color pop}}% + \def\set@page@color{% + \c@lor@special\m@ne{background \current@color}}% + \def\define@color#1#2{% + \c@lor@special\m@ne{define #1 #2}}}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{debugshow} +% The |debugshow| option turns on debugging info (perhaps). +% \changes{v1.0a}{1996/09/16} +% {debugshow option added} +% \begin{macrocode} +\DeclareOption{debugshow}{\catcode`\^^A=9 \let\GDebug\typeout} +% \end{macrocode} +% \end{option} +% +% Now the options for supported drivers. +% +% \begin{option}{dvips} +% \begin{option}{xdvi} +% Tom Rokicki's dvips driver, and the X Windows previer, xdvi which uses +% (a subset of) the same |\specials|. +% \begin{macrocode} +\DeclareOption{dvips}{\def\Gin@driver{dvips.def}% + \def\c@lor@namefile{dvipsnam.def}} +\DeclareOption{xdvi}{\ExecuteOptions{dvips,monochrome}} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{option}{dvipdf} +% \changes{v1.0c}{1996/10/31} +% {dvipdf added} +% Sergey Lesenko's dvipdf driver. +% \begin{macrocode} +\DeclareOption{dvipdf}{\def\Gin@driver{dvipdf.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{dvipdfm} +% \changes{v1.0h}{1999/01/13} +% {dvipdfm added} +% Mark Wick's dvipdfm driver. +% \begin{macrocode} +\DeclareOption{dvipdfm}{\def\Gin@driver{dvipdfm.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{pdftex} +% \changes{v1.0e}{1997/06/07} +% {pdftex added} +% Han The Thanh's \TeX\ variant. +% \begin{macrocode} +\DeclareOption{pdftex}{\def\Gin@driver{pdftex.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{dvipsone} +% \begin{option}{dviwindo} +% \changes{v0.3k}{1995/09/07} +% {Merge dviwindo and dvipsone options} +% The drivers of the Y\&Y \TeX\ system. +% (Which use the same |\specials|). +% \begin{macrocode} +\DeclareOption{dvipsone}{\def\Gin@driver{dvipsone.def}} +\DeclareOption{dviwindo}{\ExecuteOptions{dvipsone}} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{option}{emtex} +% \begin{option}{dviwin} +% Freely available drivers for PCs. +% \begin{macrocode} +\DeclareOption{emtex}{\def\Gin@driver{emtex.def}} +\DeclareOption{dviwin}{\def\Gin@driver{dviwin.def}} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{option}{oztex} +% \changes{v1.0f}{1997/09/09} +% {Merge dvips and oztex options} +% The Oz\TeX\ system for a Macintosh. +% Since release 3 of Oz\TeX, merge with dvips back end. +% \begin{macrocode} +\DeclareOption{oztex}{\ExecuteOptions{dvips}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{textures} +% Blue sky's Textures system on a Macintosh. +% \begin{macrocode} +\DeclareOption{textures}{\def\Gin@driver{textures.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{pctexps} +% \begin{option}{pctexwin} +% \begin{option}{pctexhp} +% \begin{option}{pctex32} +% \changes{v1.0b}{1996/10/29} +% {pctex32 option added} +% The drivers for PTI's \TeX\ system on PCs. +% \begin{macrocode} +\DeclareOption{pctexps}{\def\Gin@driver{pctexps.def}} +\DeclareOption{pctexwin}{\def\Gin@driver{pctexwin.def}} +\DeclareOption{pctexhp}{\def\Gin@driver{pctexhp.def}} +\DeclareOption{pctex32}{\def\Gin@driver{pctex32.def}} +% \end{macrocode} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% +% \begin{option}{truetex} +% \begin{option}{tcidvi} +% \changes{v1.0b}{1996/10/29} +% {truetex and tcidvi options added} +% The drivers of the Kinch \TeX\ system on PCs, and its +% version with extra |\special| handling dll's as shipped with +% TCI's Scientific Word. +% \begin{macrocode} +\DeclareOption{truetex}{\def\Gin@driver{truetex.def}} +\DeclareOption{tcidvi}{\def\Gin@driver{tcidvi.def}} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{option}{vtex} +% \changes{v1.0g}{1998/05/27} +% {vtex option added} +% V\TeX\ driver. +% \begin{macrocode} +\DeclareOption{vtex}{\def\Gin@driver{vtex.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{dvi2ps} +% \begin{option}{dvialw} +% \begin{option}{dvilaser} +% \begin{option}{dvitops} +% \begin{option}{psprint} +% \begin{option}{pubps} +% \begin{option}{ln} +% \changes{v1.0b}{1996/10/29} +% {old driver options depreciated} +% Old, probably obsolete, drivers commented out. See the section +% on `Driver support' in grfguide to see how to re-enable these +% options in |color.cfg| if you need them. +% \begin{macrocode} +%\DeclareOption{dvi2ps}{\def\Gin@driver{dvi2ps.def}} +%\DeclareOption{dvialw}{\def\Gin@driver{dvialw.def}} +%\DeclareOption{dvilaser}{\def\Gin@driver{dvilaser.def}} +%\DeclareOption{dvitops}{\def\Gin@driver{dvitops.def}} +%\DeclareOption{psprint}{\def\Gin@driver{psprint.def}} +%\DeclareOption{pubps}{\def\Gin@driver{pubps.def}} +%\DeclareOption{ln}{\def\Gin@driver{ln.def}} +% \end{macrocode} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% +% +% \begin{option}{dvipsnames} +% \begin{option}{nodvipsnames} +% By default the named colour model has no pre-declared names. +% The |dvipsnames| option predeclares all the names in the colour +% prologue of dvips. The |dvips| option automatically implies +% |dvipsnames| unless this choice is overruled with the |nodvipsnames| +% option. For other drivers, eg |textures| you may use this option to +% explicitly request that these names be declared. +% \begin{macrocode} +\DeclareOption{dvipsnames}{\def\c@lor@namefile{dvipsnam.def}} +\DeclareOption{nodvipsnames}{\let\c@lor@namefile\relax} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{option}{usenames} +% The |usenames| option modifies the behaviour of |\DefineNamedColor| +% So that it declares the same name as a ```user's colour'' for use in +% a |\color| command, as well as a name in the |named| colour model. +% The normal behaviour is just to decalare the name in the named colour +% model. +% \begin{macrocode} +\let\c@lor@usename\@gobble +% \end{macrocode} +% +% \begin{macrocode} +\DeclareOption{usenames}{% + \def\c@lor@usename#1{% + \expandafter\color@named\csname\string\color @#1\endcsname{#1}}} +% \end{macrocode} +% \end{option} +% +% \section{Using Colours} +% +% \subsection{Declarative form} +% +% \begin{macro}{\color} +% |\color{|\emph{declared-colour}|}| switches to the colour +% \emph{declared-colour}, which must previously have been defined +% using |\definecolor|. This colour will stay in effect until the end of +% the current \TeX\ group. +% +% |\color[|\emph{model}|]{|\emph{colour-specification}|}| is similar +% to the above, but uses a colour not declared by |\definecolor|. The +% allowed \emph{model}'s vary depending on the driver. The syntax of +% the \emph{colour-specification} argument depends on the model. +% +% \changes{v0.3a}{1994/07/20} +% {Make \cs{color} robust} +% \begin{macrocode} +\DeclareRobustCommand\color{% + \@ifnextchar[\@undeclaredcolor\@declaredcolor} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\@undeclaredcolor} +% \changes{v0.2c}{1994/05/09} +% {Improve error messages} +% \changes{v0.3a}{1994/07/20} +% {New internal implementation of colour commands} +% Call the driver-dependent command |\color@|\meta{model} to define +% |\current@color|, then call |\set@color| to change the current colour +% accordingly. +% \begin{macrocode} +\def\@undeclaredcolor[#1]#2{% + \@ifundefined{color@#1}% + {\c@lor@error{model `#1'}}% + {\csname color@#1\endcsname\current@color{#2}% + \set@color}% + \ignorespaces} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\@declaredcolor}% +% \changes{v0.1c}{1994/04/01} +% {Add \cs{ignorespaces}} +% \changes{v0.1e}{1994/05/14} +% {Minor change to error message} +% \changes{v0.3a}{1994/07/20} +% {New internal implementation of colour commands} +% |\let| |\current@color| to the internal representation of the colour +% if the colour has been declared, otherwise generate an error. +% Finally call |\set@color| to effect the colour change. +% \begin{macrocode} +\def\@declaredcolor#1{% + \@ifundefined{\string\color @#1}% + {\c@lor@error{`#1'}}% + {\expandafter\let\expandafter\current@color + \csname\string\color @#1\endcsname + \set@color}% + \ignorespaces} +% \end{macrocode} +% \end{macro} +% +% \subsection{Command (Argument) Form} +% +% \begin{macro}{\textcolor} +% |\textcolor{|\emph{declared-colour}|}{|\emph{text}|}| and +% |\textcolor[|\emph{model}|]{|\emph{colour-spec}|}{|\emph{text}|}| +% are just alternative syntax for |\color|, in +% which the groups are added implicitly. Thus \emph{text} appears in the +% specified colour, but then the colour reverts to its previous value. +% The naming is by analogy with |\textrm| (as opposed to |\rm| and +% |\rmfamily|) although it is slightly a misnomer as the command also +% works in math-mode. +% +% Since December 95, in fact this command has one other difference +% from |\color|. It calls |\leavevmode| to ensure the start of +% horizontal mode. Specifically this means that a construction +% such as +%\begin{verbatim} +% xxx\parbox[t]{1cm}{\textcolor{red}{a}..... +%\end{verbatim} +% now works as expected, with the |xxx| and the red |a| lining up +% correctly. +% \changes{v0.3a}{1994/07/20} +% {Stop command being \cs{long}, and make robust.} +% \changes{v0.3l}{1995/12/07} +% {Add \cs{leavevmode}} +% \begin{macrocode} +\def\textcolor#1#{\@textcolor{#1}} +\def\@textcolor#1#2#3{\protect\leavevmode{\color#1{#2}#3}} +% \end{macrocode} +% \end{macro} +% +% \subsection{Background (Page) Colour} +% +% \begin{macro}{\pagecolor} +% |\pagecolor|, which has the same argument forms as |\color|, specifies +% the background colour for the current, and all following, pages. It is +% a global declaration which does not respect \TeX\ groups. +% +% \changes{v0.1c}{1994/04/01} +% {end the group even if the colour command generates an error} +% \changes{v0.3c}{1994/09/19} +% {Use \cs{color} to parse arguments} +% \begin{macrocode} +\def\pagecolor{% + \begingroup + \let\ignorespaces\endgroup + \let\set@color\set@page@color + \color} +% \end{macrocode} +% \end{macro} +% +% \section{Defining Colours} +% +% \begin{macro}{\definecolor} +% |\definecolor{|\emph{name}|}{|\emph{model}|}{|\emph{colour-spec}|}| +% defines the color \emph{name}, which may then be used in subsequent +% |\color| or |\textcolor| commands to refer to a colour specified by +% \emph{colour-spec} in the colour model \emph{model}. +% +% |\definecolor| associates the \emph{name} the to a colour in +% \emph{model}. So |\color{|\emph{name}|}| would check \emph{name} +% then issue a |\special| for the colour model \emph{model}. +% +% |\definecolor| just calls an internal macro that defines the colour +% for a particular model. This macro must have been defined by the +% driver file that supports the requested \emph{model}. +% +% \changes{v0.1b}{1994/03/15} +% {change name from \cs{newcolor} to \cs{definecolor}} +% \changes{v0.1e}{1994/05/14} +% {Minor change to error message} +% \changes{v0.3a}{1994/07/20} +% {New internal implementation of colour commands} +% \changes{v0.3f}{1994/10/04} +% {Give info about redefinitions} +% \begin{macrocode} +\def\definecolor#1#2#3{% + \@ifundefined{color@#2}% + {\c@lor@error{model `#2'}}% + {\@ifundefined{\string\color @#1}{}% + {\PackageInfo{color}{Redefining color #1}}% + \csname color@#2\expandafter\endcsname + \csname\string\color @#1\endcsname{#3}}} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\DefineNamedColor} +% \changes{v0.3d}{1994/09/29} +% {Macro added} +% \changes{v0.3e}{1994/10/03} +% {usenames option added} +% \changes{v0.3f}{1994/10/04} +% {Give info about redefinitions} +% +% Driver files may opt to define a `named' colour model. +% Placing colour names rather than numeric specifications into the dvi +% file has certain advantages, in that post processing software can +% tune the colour specifications to the particular technology being +% used, and more easily make colour separations for that colour. +% The disadvantage is that the driver must `know' the colour +% names. +% +% The `color1' drivers (dvips) currently ignore the specification of +% the colour, and once a name is defined, just put the colour name in +% the dvi file. For dvips, The header file \texttt{color.pro} is used to +% give the cmyk equivalents of the names. +% +% The `color2' drivers (textures) use a special postscript operator +% that takes both the name and the cmyk equivalent. so if the names are +% no being used, fall back' definitions in the cmyk model are available. +% These drivers also allow a numeric value to affect the `density' +% of the colour to use. +% +% Drivers based on `color3' do not support named colours at the dvi +% level, but to ease document portability, the named model is still +% defined, but the |\special|'s just put the colour specifications, not +% the names, into the dvi file. +% +% Normally after a colour, say |JungleGreen|, has been declared with:\\ +% |\DefineNamedColor{named}{JungleGreen}{cmyk}{1,2,3,4}|\\ +% it is available in the `named' colour model, for +% instance by\\ +% |\color[named]{JungleGreen}|\\ +% A user may give a more convenient name, using\\ +% |\definecolor{mygreen}{named}{JungleGreen}|\\ +% If however you are happy with the original names, and want to use +% them directly, as in |\color{JungleGreen}| without specifying +% |[named]| all the time, just give the package option |usenames|, which +% will redefine |\DefineNamedColor|, so that the colour name is declared +% as a user-colour as well as a name in the `named' model. +% \begin{macrocode} +\def\DefineNamedColor#1#2#3#4{% + \@ifundefined{define@color@#1}% + {\c@lor@error{model `#1'}}% + {\@ifundefined{color@#3}% + {\c@lor@error{model `#3'}}% + {\@ifundefined{c@lor@#1@#2}{}% + {\PackageInfo{color}{Redefining color #2 in named color model}}% + \csname color@#3\endcsname\@tempa{#4}% + \csname define@color@#1\endcsname{#2}\@tempa + \c@lor@usename{#2}}}} +\@onlypreamble\DefineNamedColor +% \end{macrocode} +% \end{macro} +% +% \section{Colour Switch} +% +% \begin{macro}{\ifcolors@} +% This boolean can be tested by higher level macros that may want to +% alter their behaviour if a monochrome driver is being used. +% \begin{macrocode} +\newif\ifcolors@ +\colors@true +% \end{macrocode} +% \end{macro} +% +% \section{Whatsit\ldots} +% +% \begin{macro}{\c@lor@special} +% Some drivers can not support all the features of this package. They +% should always put a \meta{whatsit} in the current list though. the +% following macro has most of the features of |\special|, but does not +% put anything into the |dvi| file. It does write to the log file or the +% terminal (depending on the value of |#1|). +% \begin{macrocode} +\def\c@lor@special#1#2{% + \edef\@tempa{\write#1{#2}}\@tempa} +% \end{macrocode} +% \end{macro} +% +% \section{Processing Options} +% +% A local configuration file may declare more options. +% It should also make one driver option the default, by calling +% |\ExecuteOptions| with the appropriate option. +% \begin{macrocode} +\InputIfFileExists{color.cfg}{}{} +% \end{macrocode} +% +% After the options are processed, load the appropriate driver file. +% If a site wants a default driver (eg |dvips|) it just needs to put +% |\ExecuteOptions{dvips}| in a |color.cfg| file. +% \changes{v0.3b}{1994/09/14} +% {New style of loading driver files} +% \begin{macrocode} +\ProcessOptions +% \end{macrocode} +% +% \begin{macrocode} +\if!\Gin@driver! + \PackageError{color} + {No driver specified} + {You should make a default driver option in a file \MessageBreak + color.cfg\MessageBreak + eg: \protect\ExecuteOptions{dvips}% + } +\else + \PackageInfo{color}{Driver file: \Gin@driver} + \@ifundefined{ver@\Gin@driver}{\input{\Gin@driver}}{} +\fi +% \end{macrocode} +% +% \begin{macrocode} +\@ifundefined{c@lor@namefile}{}{\input{\c@lor@namefile}} +% \end{macrocode} +% +% \section{Default Colour} +% +% \begin{macro}{\normalcolor} +% Early versions of this package redefined |\reset@font| to reset the +% color as well. Current versions do not do this (there are too many +% |\reset@font| commands hidden in strange places) and so defines a +% separate command, |\normalcolor| to reset the colour to the colour in +% effect at the start of the document. +% +% |\normalcolor| is defined (to |\relax|) in the \LaTeX\ kernel, so it +% is safe to use this in macros that may possibly be used in +% conjunction with colour. It will have no effect until the |color| +% package is also loaded. +% \changes{v0.2b}{1994/04/18} +% {Only reset the colour with \cmd{\reset@font} not +% \cmd{\normalfont}} +% \changes{v0.2d}{1994/05/13} +% {Stop changing \cs{reset@font}. Use the new \cs{normalfont} +% instead.} +% \begin{macrocode} +\def\normalcolor{\let\current@color\default@color\set@color} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\default@color} +% Internal macro to store the `default' colour used by |\normalcolor|. +% \begin{macrocode} +\AtBeginDocument{\let\default@color\current@color} +% \end{macrocode} +% \end{macro} +% +% |\current@color| contains an internal representation of the colour +% at this point in the document. (This can only be an approximation to +% the truth as the `macro layer' of \TeX\ does not know where the output +% routine is going to re-insert floats. This is why drivers must +% maintain their own stack of colours in order to fully support these +% commands. +% +% For dvips, the |\current@color| it is something like `|Black|' or +% `|rgb 0 1 0|', but other packages should not rely on any particular +% format for this macro. +% +% The driver file \emph{must} initialise |\current@color| to a +% specification for Black. This initialisation can not occur here, as +% the possible colour models (and thus the syntax for `black') +% are not known at this point. +% +% \section{Higher Level Commands} +% +% With the basic colour primitives specified above we may define a few +% higer level commands for coloured boxes etc. This is still quite a low +% level and presumably packages and classes making use of colour will +% define more appropriate document-level commands. +% +% \subsection{Colour Block} +% +% \begin{macro}{\color@block} +% |\color@block{|\emph{width}|}{|\emph{height}|}{|\emph{depth}|}|\\ +% Should take up no space for \TeX, but produce a block in the current +% colour of the specified size. It is mainly used for producing box +% backgrounds. +% +% The definition here works by selecting a colour, and then drawing a +% \TeX\ rule (unless |\ifcolors@false|). This allows the `driver +% independent' colour specials to be used. However it is defined using +% |\providecommand|, so that this file will not over-write any other +% definition of this command. A graphics package may want to define it +% using a special to produce (for example) a PostScript line. Producing +% the line in the |\special| has the advantage that on a preview that +% does not understand |\special|s, the line is automatically omited, +% without needing to modify the source of the document (for instance by +% adding the |monochrome| option). +% +% \begin{macrocode} +\def\color@block#1#2#3{% + {\set@color\rlap{\ifcolors@\vrule\@width#1\@height#2\@depth#3\fi}}} +% \end{macrocode} +% \end{macro} +% +% \subsection{Coloured Boxes} +% +% \begin{macro}{\colorbox} +% |\colorbox| takes the same argument forms as |\textcolor|, but the +% colour specifies the \emph{background} colour of the box. +% \changes{v0.3b}{1994/09/14} +% {New implementation} +% \begin{macrocode} +\def\colorbox#1#{\color@box{#1}} +% \end{macrocode} +% \end{macro} +% +% \changes{v0.3i}{1995/04/27} +% {Move \cs{leavevmode} for graphics/1521} +% \begin{macro}{\color@box} +% \begin{macrocode} +\def\color@box#1#2{\color@b@x\relax{\color#1{#2}}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\fcolorbox} +% |\fcolorbox| has an extra \emph{colour-spec} argument, and puts a +% frame of the first colour around a box with a background specified by +% the second colour. If an optional argument is given, it specifies the +% colour model for both colours. +% \changes{v0.3b}{1994/09/14} +% {New implementation} +% \begin{macro}{\fcolorbox} +% \begin{macrocode} +\def\fcolorbox#1#{\color@fbox{#1}} +% \end{macrocode} +% +% \begin{macrocode} +\def\color@fbox#1#2#3{% + \color@b@x{\fboxsep\z@\color#1{#2}\fbox}{\color#1{#3}}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% + +% \begin{macro}{\color@b@x} +% Internal macro for |\colorbox| and |\fcolorbox|. +% \changes{v0.3b}{1994/09/14} +% {Macro added.} +% \changes{v0.3i}{1995/04/27} +% {Add \cs{leavevmode} for graphics/1521} +% \begin{macrocode} +\long\def\color@b@x#1#2#3{% + \leavevmode + \setbox\z@\hbox{\kern\fboxsep{\set@color#3}\kern\fboxsep}% + \dimen@\ht\z@\advance\dimen@\fboxsep\ht\z@\dimen@ + \dimen@\dp\z@\advance\dimen@\fboxsep\dp\z@\dimen@ + {#1{#2\color@block{\wd\z@}{\ht\z@}{\dp\z@}% + \box\z@}}} +% \end{macrocode} +% \end{macro} +% +% +% \section{Extra Groups} +% Turning on extra groups in the standard \LaTeX\ commands, so that +% colour commands are scoped corectly. +% +% Like |\normalcolor|, the following five commands are defined in the +% kernel, with empty definitions (|\relax|). This means that they can +% be used to make macros in packages `colour safe'. The commands +% will not have any effect unless a user also uses this colour +% package, when the `active definitions' here will take effect and +% keep colour commands correctly scoped. +% +% \begin{macro}{\color@setgroup} +% This is to be used in contexts (eg `lrbox') where text is to be +% saved and used after some other, unknown, text that may contain +% colour commands. A matching |\color@endgroup| should be used at the +% end of the text. +% \changes{v0.2d}{1994/05/13} +% {Macro added} +% \begin{macrocode} +\def\color@setgroup{\begingroup\set@color} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\color@begingroup} +% This is to be used at the start of contexts that may contain colour +% commands, but where it is not necessary to save the current colour. +% Examples of this are in the box commands of |ltboxes.dtx| where +% user-supplied text is saved internally in a box between +% |\color@begingroup|, |\color@endgroup|, but the box is used before +% any other colour commands could intervene. A matching +% |\color@endgroup| should be used at the end of the text. +% \changes{v0.2d}{1994/05/13} +% {New definition, was previously like \cs{color@setgroup}} +% \begin{macrocode} +\let\color@begingroup\begingroup +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\color@endgroup} +% To be used to close the `group' started by one of the above two +% commands. The |\endgraf| in its definition is required in the case +% of groups of text in vertical `par' mode, but doesn't do any harm in +% horizontal `LR' contexts. +% \changes{v0.2d}{1994/05/13} +% {New definition, was previously just \cs{endroup}} +% \begin{macrocode} +\def\color@endgroup{\endgraf\endgroup} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\color@hbox} +% To be used to open a `coloured hbox' +% \changes{v0.3g}{1994/11/08} +% {Macro added} +% \begin{macrocode} +\def\color@hbox{\hbox\bgroup\color@begingroup} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\color@vbox} +% To be used to open a `coloured hbox' +% \changes{v0.3h}{1994/11/22} +% {Macro added} +% \begin{macrocode} +\def\color@vbox{\vbox\bgroup\color@begingroup} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\color@endbox} +% To be used to close a `coloured hbox' +% \changes{v0.3g}{1994/11/08} +% {Macro added} +% \begin{macrocode} +\def\color@endbox{\color@endgroup\egroup} +% \end{macrocode} +% \end{macro} +% +% +% \changes{v0.2d}{1994/05/13} +% {tabbing support removed (now in kernel)} +% +% \changes{v0.3l}{1995/12/07} +% {\cs{underbar} removed (now in kernel)} +% +% \changes{v0.3h}{1994/11/22} +% {marginpar, phantom and smash now supported in kernel} +% +% \changes{v0.3l}{1995/12/07} +% {\cs{showhyphens} removed (now in kernel)} +% +% +% \section{Predefining Colours} +% +% As long as the driver file has defined sufficient colour models, we +% define a few colours, just to get people started. +% +% \begin{macro}{black} +% \begin{macro}{white} +% Black and white `colours'. +% \begin{macrocode} +\ifx\color@gray\@undefined + \ifx\color@rgb\@undefined + \else + \definecolor{black}{rgb}{0,0,0} + \definecolor{white}{rgb}{1,1,1} + \fi +\else + \definecolor{black}{gray}{0} + \definecolor{white}{gray}{1} +\fi +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{red} +% \begin{macro}{green} +% \begin{macro}{blue} +% Additive primaries. +% \begin{macrocode} +\ifx\color@rgb\@undefined\else + \definecolor{red}{rgb}{1,0,0} + \definecolor{green}{rgb}{0,1,0} + \definecolor{blue}{rgb}{0,0,1} +\fi +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{macro}{cyan} +% \begin{macro}{magenta} +% \begin{macro}{yellow} +% Subtractive primaries. +% \begin{macrocode} +\ifx\color@cmyk\@undefined\else + \definecolor{cyan}{cmyk}{1,0,0,0} + \definecolor{magenta}{cmyk}{0,1,0,0} + \definecolor{yellow}{cmyk}{0,0,1,0} +\fi +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% +% \section{And Finally} +% +% Restore Catcodes +% \begin{macrocode} +\Gin@codes +\let\Gin@codes\relax +% \end{macrocode} +% +% \Finale +% diff --git a/Master/texmf-dist/source/latex/graphics/drivers.dtx b/Master/texmf-dist/source/latex/graphics/drivers.dtx new file mode 100644 index 00000000000..19f013d4ef6 --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/drivers.dtx @@ -0,0 +1,1662 @@ +% +% \iffalse +% +%% 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{template.def} +%\ProvidesFile{dvips.def} +%\ProvidesFile{dvipsnam.def} +%\ProvidesFile{dvipdf.def} +%\ProvidesFile{emtex.def} +%\ProvidesFile{dviwin.def} +%\ProvidesFile{dvipsone.def} +%\ProvidesFile{pctexps.def} +%\ProvidesFile{pctex32.def} +%\ProvidesFile{pctexwin.def} +%\ProvidesFile{pctexhp.def} +%\ProvidesFile{truetex.def} +%\ProvidesFile{tcidvi.def} +%\ProvidesFile{oztex.def} +%\ProvidesFile{textures.def} +%\ProvidesFile{dvialw.def} +%\ProvidesFile{dvilaser.def} +%\ProvidesFile{psprint.def} +%\ProvidesFile{dvi2ps.def} +%\ProvidesFile{pubps.def} +%\ProvidesFile{dvitops.def} +%\ProvidesFile{ln.def} +% +%<*driver> + \NeedsTeXFormat{LaTeX2e} + \ProvidesFile{drivers.dtx} +% + [1999/02/16 v3.0i Driver-dependant file (DPC,SPQR)] +% +%<*driver> + \documentclass{ltxdoc} + \GetFileInfo{drivers.dtx} + \begin{document} + \title{Graphics drivers for \LaTeXe\thanks + {Version \fileversion, revised \filedate}} + \author{Sebastian Rahtz and David Carlisle} + \date{\filedate} + \maketitle + \DocInput{drivers.dtx} + \end{document} +% +% \fi +% +% \CheckSum{1541} +% +% +% \providecommand\OzTeX{O\kern-.03em z\kern-.15em\TeX} +% +% \section{Driver files} +% +% This file implements some of the currently supported drivers. +% If the driver you use is not in this list then a `.def' file +% may be distributed with This graphics bundle, +% or may be distributed with your driver. +% +% If not, send us some details of the driver's |\special| syntax, and +% we will try to produce a suitable file. +% +% Note that some of these files are for drivers to which we have no +% access, so they are untested. Please send any corrections to the +% latexbugs address. +% +% +% +% +% \StopEventually{} +% +% +% \section{Colour} +% +% Most of the drivers that support colour use one of three methods. +% \begin{itemize} +% \item color1: `dvips' style colour specials. +% \item color2: `textures' style colour specials. +% \item color3: Colour implemented via literal PostScript specials. +% \item color4: Colour implemented by specials that only support RGB +% ie Red Green Blue specified as integers in the range +% 0--255. Other models converted to this within \TeX. +% \end{itemize} +% Some drivers do not use any of these modules and have their own code. +% Note that drivers using the `color3' code can not fully support the +% \LaTeX\ colour commands. +% \begin{macrocode} +%<*color1|color2|color3|color4> +% \end{macrocode} +% +% \begin{macrocode} +\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} +% \end{macrocode} +% +% Need to make sure of a trailing .0 for textures. Apparently it +% is OK to always add a . as 1.3. is accepted by textures. +% textures gray special is reversed, so just use rgb instead. +% +% \begin{macrocode} +\def\color@gray#1#2{% + \c@lor@arg{#2}% +% \c@lor@rgb@RGB\@tempa +% \edef#1{gray #2}% +% \edef#1{rgb #2. #2. #2.}% +% \edef#1{#2 setgray}% +% \edef#1{\@tempa\@tempa\@tempa}% + } +% \end{macrocode} +% +% \begin{macrocode} +\def\color@cmyk#1#2{\c@lor@@cmyk#2\@@#1} +\def\c@lor@@cmyk#1,#2,#3,#4\@@#5{% + \c@lor@arg{#4}% +% \dimen@ii#4\p@ + \c@lor@arg{#1}% +% \c@lor@cmyk@RGB\@tempa + \c@lor@arg{#2}% +% \c@lor@cmyk@RGB\@tempb + \c@lor@arg{#3}% +% \c@lor@cmyk@RGB\@tempc +% \edef#5{cmyk #1 #2 #3 #4}% +% \edef#5{cmyk #1. #2. #3. #4.}% +% \edef#5{#1 #2 #3 #4 setcmykcolor}% +% \edef#5{\@tempa\@tempb\@tempc}% + } +% \end{macrocode} +% +% A 0--1 range value will have been left in |\dimen@| by |\c@lor@arg|. +% The black value (0--1) will be stored in |\dimen@ii|. +% Covert to 0--255 integer, and leave in |#1|. +% \begin{macrocode} +%<*color4> +\def\c@lor@cmyk@RGB#1{% + \advance\dimen@-\p@ + \advance\dimen@\dimen@ii + \dimen@-\@cclv\dimen@ + \divide\dimen@\p@ + \count@\ifdim\dimen@<\z@\z@\else\dimen@\fi + \edef#1{\the\count@\space}} +% +% \end{macrocode} +% +% \begin{macrocode} +\def\color@rgb#1#2{\c@lor@@rgb#2\@@#1} +\def\c@lor@@rgb#1,#2,#3\@@#4{% + \c@lor@arg{#1}% +% \c@lor@rgb@RGB\@tempa + \c@lor@arg{#2}% +% \c@lor@rgb@RGB\@tempb + \c@lor@arg{#3}% +% \c@lor@rgb@RGB\@tempc +% \edef#4{rgb #1 #2 #3}% +% \edef#4{rgb #1. #2. #3.}% +% \edef#4{#1 #2 #3 setrgbcolor}% +% \edef#4{\@tempa\@tempb\@tempc}% + } +% \end{macrocode} +% +% A 0--1 range value will have been left in |\dimen@| by |\c@lor@arg|. +% Convert to 0--255 integer, and leave in |#1|. +% \begin{macrocode} +%<*color4> +\def\c@lor@rgb@RGB#1{% + \dimen@\@cclv\dimen@ + \count@\dimen@ + \divide\count@\p@ + \edef#1{\the\count@\space}} +% +% \end{macrocode} +% +% \begin{macrocode} +\def\color@RGB#1#2{\c@lor@@RGB#2\@@#1} +% \end{macrocode} +% +% \begin{macrocode} +\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% +% \edef#4{#1 #2 #3}% + } +% \end{macrocode} +% % Convert 0--255 integer, |#1|, to 0--1 real, and leave in |#2|. +% \begin{macrocode} +%<*!color4> +\def\c@lor@RGB@rgb#1#2{% + \dimen@#1\p@ + \divide\dimen@\@cclv + \edef#2{\strip@pt\dimen@}} +% +% \end{macrocode} +% +% \begin{macrocode} +%<*color1|color3> +\def\color@hsb#1#2{\c@lor@@hsb#2\@@#1} +% \end{macrocode} +% +% \begin{macrocode} +\def\c@lor@@hsb#1,#2,#3\@@#4{% + \c@lor@arg{#1}% + \c@lor@arg{#2}% + \c@lor@arg{#3}% +% \edef#4{hsb #1 #2 #3}% +% \edef#4{#1 #2 #3 sethsbcolor}% + } +% +% \end{macrocode} +% +% \begin{macrocode} +\def\color@named#1#2{\c@lor@@named#2,,\@@#1} +% \end{macrocode} +% +% \begin{macrocode} +\def\c@lor@@named#1,#2,#3\@@#4{% + \@ifundefined{col@#1}% + {\PackageError{color}{Undefined color `#1'}\@ehd}% +% {\edef#4{ #1}}% +% {\edef#4{ #1 \if!#2!\else #2.\fi}}% +% {\edef#4{\csname col@#1\endcsname}}% + } +% \end{macrocode} +% +% Conversion from |\special| syntax to PostScript (for PSTricks). +% \begin{macrocode} +%<*color1|color2> +\def\c@lor@to@ps#1 #2\@@{\csname c@lor@ps@#1\endcsname#2 \@@} +% +%<*color3> +\def\c@lor@to@ps#1\@@{#1} +% +%<*color4> +\def\c@lor@to@ps#1#2 #3 #4\@@{% + #1#2 255 div #3 255 div #4 255 div setrgbcolor} +% +% \end{macrocode} +% +% \begin{macrocode} +%<*color1> +\def\c@lor@ps@#1 #2\@@{TeXDict begin #1 end} +\def\c@lor@ps@rgb#1\@@{#1 setrgbcolor} +\def\c@lor@ps@hsb#1\@@{#1 sethsbcolor} +\def\c@lor@ps@cmyk#1\@@{#1 setcmykcolor} +\def\c@lor@ps@gray#1\@@{#1 setgray} +% +%<*color2> +\def\c@lor@to@ps@#1 #2\@@{\csname c@lor@ps@#1@\endcsname#2 \@@} +\def\c@lor@ps@#1 #2\@@{% + \expandafter\expandafter\expandafter + \c@lor@to@ps@\csname col@#1\expandafter\endcsname\space#2. \@@{#1}} +\def\c@lor@ps@rgb#1. #2. #3. #4\@@{#1 #2 #3 setrgbcolor} +\def\c@lor@ps@rgb@#1. #2. #3. #4. #5\@@#6{#1 #2 #3 setrgbcolor} +\def\c@lor@ps@cmyk#1. #2. #3. #4. #5. #6\@@{#1 #2 #3 #4 setcmykcolor} +\def\c@lor@ps@cmyk@#1. #2. #3. #4. #5. #6\@@#7{% + #1 #2 #3 #4 (#7) findcustomcmykcolor + \if!\@firstofone#5!1 \else#5 \fi setcustomcolor} +% +% \end{macrocode} +% +% \begin{macrocode} +%\def\current@color{ Black} +%\def\current@color{gray 0} +%\def\current@color{rgb 0. 0. 0.} +%\def\current@color{0 setgray} +%\def\current@color{0 0 0} +% \end{macrocode} +% +% \begin{macrocode} +%<*color1> +\def\set@color{% +% \special{color push \current@color +% \special{color push}\special{color \current@color +% \special{pdf: /C \current@color\space<< + }\aftergroup\reset@color} +\def\reset@color{\special{% +% color pop}} +% pdf: /C >> }} +\def\set@page@color{\special{% +% background \current@color}} +% pdf: /BG \current@color}} +\def\define@color@named#1#2{% +% \expandafter\let\csname col@#1\endcsname\@nnil} +% \expandafter\edef\csname col@#1\endcsname{#2}} +% +%<*color2> +\def\set@color{% + \special{color push}% + \special{color \current@color}% + \aftergroup\reset@color} +\def\reset@color{\special{color pop}} +\def\set@page@color{\c@lor@special\sixt@@n{background \current@color}} +\def\define@color@named#1#2{% + \AtBeginDvi{\special{color define #1 #2}}% + \expandafter\edef\csname col@#1\endcsname{#2}} +% +%<*color3> +\def\set@color{% + \Gin@PS@raw{\current@color}\aftergroup\reset@color} +\def\reset@color{\Gin@PS@raw{\current@color}} +% +%<*color4> +\def\set@color{% + \special{textcolor: \current@color}\aftergroup\reset@color} +\def\reset@color{\special{textcolor: \current@color}} +% +%<*color3|color4> +\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}} +% +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \begin{macrocode} +%<*colorfix> +\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}} +% +% \end{macrocode} +% +% \begin{macrocode} +%<*dvipsnames> +\DefineNamedColor{named}{GreenYellow} {cmyk}{0.15,0,0.69,0} +\DefineNamedColor{named}{Yellow} {cmyk}{0,0,1,0} +\DefineNamedColor{named}{Goldenrod} {cmyk}{0,0.10,0.84,0} +\DefineNamedColor{named}{Dandelion} {cmyk}{0,0.29,0.84,0} +\DefineNamedColor{named}{Apricot} {cmyk}{0,0.32,0.52,0} +\DefineNamedColor{named}{Peach} {cmyk}{0,0.50,0.70,0} +\DefineNamedColor{named}{Melon} {cmyk}{0,0.46,0.50,0} +\DefineNamedColor{named}{YellowOrange} {cmyk}{0,0.42,1,0} +\DefineNamedColor{named}{Orange} {cmyk}{0,0.61,0.87,0} +\DefineNamedColor{named}{BurntOrange} {cmyk}{0,0.51,1,0} +\DefineNamedColor{named}{Bittersweet} {cmyk}{0,0.75,1,0.24} +\DefineNamedColor{named}{RedOrange} {cmyk}{0,0.77,0.87,0} +\DefineNamedColor{named}{Mahogany} {cmyk}{0,0.85,0.87,0.35} +\DefineNamedColor{named}{Maroon} {cmyk}{0,0.87,0.68,0.32} +\DefineNamedColor{named}{BrickRed} {cmyk}{0,0.89,0.94,0.28} +\DefineNamedColor{named}{Red} {cmyk}{0,1,1,0} +\DefineNamedColor{named}{OrangeRed} {cmyk}{0,1,0.50,0} +\DefineNamedColor{named}{RubineRed} {cmyk}{0,1,0.13,0} +\DefineNamedColor{named}{WildStrawberry}{cmyk}{0,0.96,0.39,0} +\DefineNamedColor{named}{Salmon} {cmyk}{0,0.53,0.38,0} +\DefineNamedColor{named}{CarnationPink} {cmyk}{0,0.63,0,0} +\DefineNamedColor{named}{Magenta} {cmyk}{0,1,0,0} +\DefineNamedColor{named}{VioletRed} {cmyk}{0,0.81,0,0} +\DefineNamedColor{named}{Rhodamine} {cmyk}{0,0.82,0,0} +\DefineNamedColor{named}{Mulberry} {cmyk}{0.34,0.90,0,0.02} +\DefineNamedColor{named}{RedViolet} {cmyk}{0.07,0.90,0,0.34} +\DefineNamedColor{named}{Fuchsia} {cmyk}{0.47,0.91,0,0.08} +\DefineNamedColor{named}{Lavender} {cmyk}{0,0.48,0,0} +\DefineNamedColor{named}{Thistle} {cmyk}{0.12,0.59,0,0} +\DefineNamedColor{named}{Orchid} {cmyk}{0.32,0.64,0,0} +\DefineNamedColor{named}{DarkOrchid} {cmyk}{0.40,0.80,0.20,0} +\DefineNamedColor{named}{Purple} {cmyk}{0.45,0.86,0,0} +\DefineNamedColor{named}{Plum} {cmyk}{0.50,1,0,0} +\DefineNamedColor{named}{Violet} {cmyk}{0.79,0.88,0,0} +\DefineNamedColor{named}{RoyalPurple} {cmyk}{0.75,0.90,0,0} +\DefineNamedColor{named}{BlueViolet} {cmyk}{0.86,0.91,0,0.04} +\DefineNamedColor{named}{Periwinkle} {cmyk}{0.57,0.55,0,0} +\DefineNamedColor{named}{CadetBlue} {cmyk}{0.62,0.57,0.23,0} +\DefineNamedColor{named}{CornflowerBlue}{cmyk}{0.65,0.13,0,0} +\DefineNamedColor{named}{MidnightBlue} {cmyk}{0.98,0.13,0,0.43} +\DefineNamedColor{named}{NavyBlue} {cmyk}{0.94,0.54,0,0} +\DefineNamedColor{named}{RoyalBlue} {cmyk}{1,0.50,0,0} +\DefineNamedColor{named}{Blue} {cmyk}{1,1,0,0} +\DefineNamedColor{named}{Cerulean} {cmyk}{0.94,0.11,0,0} +\DefineNamedColor{named}{Cyan} {cmyk}{1,0,0,0} +\DefineNamedColor{named}{ProcessBlue} {cmyk}{0.96,0,0,0} +\DefineNamedColor{named}{SkyBlue} {cmyk}{0.62,0,0.12,0} +\DefineNamedColor{named}{Turquoise} {cmyk}{0.85,0,0.20,0} +\DefineNamedColor{named}{TealBlue} {cmyk}{0.86,0,0.34,0.02} +\DefineNamedColor{named}{Aquamarine} {cmyk}{0.82,0,0.30,0} +\DefineNamedColor{named}{BlueGreen} {cmyk}{0.85,0,0.33,0} +\DefineNamedColor{named}{Emerald} {cmyk}{1,0,0.50,0} +\DefineNamedColor{named}{JungleGreen} {cmyk}{0.99,0,0.52,0} +\DefineNamedColor{named}{SeaGreen} {cmyk}{0.69,0,0.50,0} +\DefineNamedColor{named}{Green} {cmyk}{1,0,1,0} +\DefineNamedColor{named}{ForestGreen} {cmyk}{0.91,0,0.88,0.12} +\DefineNamedColor{named}{PineGreen} {cmyk}{0.92,0,0.59,0.25} +\DefineNamedColor{named}{LimeGreen} {cmyk}{0.50,0,1,0} +\DefineNamedColor{named}{YellowGreen} {cmyk}{0.44,0,0.74,0} +\DefineNamedColor{named}{SpringGreen} {cmyk}{0.26,0,0.76,0} +\DefineNamedColor{named}{OliveGreen} {cmyk}{0.64,0,0.95,0.40} +\DefineNamedColor{named}{RawSienna} {cmyk}{0,0.72,1,0.45} +\DefineNamedColor{named}{Sepia} {cmyk}{0,0.83,1,0.70} +\DefineNamedColor{named}{Brown} {cmyk}{0,0.81,1,0.60} +\DefineNamedColor{named}{Tan} {cmyk}{0.14,0.42,0.56,0} +\DefineNamedColor{named}{Gray} {cmyk}{0,0,0,0.50} +\DefineNamedColor{named}{Black} {cmyk}{0,0,0,1} +\DefineNamedColor{named}{White} {cmyk}{0,0,0,0} +% +% \end{macrocode} +% +% \section{dvips} +% A \LaTeXe\ graphics driver file for Tom Rokicki's \emph{dvips} +% driver; tested with version 5.58f. +% +% \begin{macrocode} +%<*dvips> +% \end{macrocode} +% +% \subsection{Colour} +% Uses the generic `color1' code. +% +% \subsection{File inclusion} +% +% \begin{macro}{\Ginclude@eps} +% |#1| input file (or command) +% \begin{macrocode} +\def\Ginclude@eps#1{% + \message{<#1>}% + \bgroup +% \end{macrocode} +% \emph{dvips} likes to work with its own pixel resolution, so +% mangle the sizes slightly. +% \begin{macrocode} + \def\@tempa{!}% + \dimen@\Gin@req@width + \dimen@ii.1bp% + \divide\dimen@\dimen@ii + \@tempdima\Gin@req@height + \divide\@tempdima\dimen@ii + \special{PSfile="#1"\space + llx=\Gin@llx\space + lly=\Gin@lly\space + urx=\Gin@urx\space + ury=\Gin@ury\space + \ifx\Gin@scalex\@tempa\else rwi=\number\dimen@\space\fi + \ifx\Gin@scaley\@tempa\else rhi=\number\@tempdima\space\fi + \ifGin@clip clip\fi}% + \egroup} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Ginclude@bmp} +% |#1| input file; if zero size is requested, the graphic will +% come at `natural' size. +% \begin{macrocode} +\def\Ginclude@bmp#1{% + \message{<#1>}% + \dimen@\Gin@req@height + \advance\dimen@ by-\Gin@lly bp + \kern-\Gin@llx bp\raise\Gin@req@height\hbox{% + \ifdim\Gin@urx bp=\z@ + \ifdim\Gin@ury bp=\z@ + \special{em: graph #1}% + \else + \special{em: graph #1,\Gin@urx bp}% + \fi + \else + \special{em: graph #1,\Gin@urx bp,\Gin@ury bp}% + \fi + }% +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Ginclude@pict} +% \begin{macro}{\Ginclude@pntg} +% \begin{macro}{\oztex@include} +% PICT/PNTG format from the Mac. Actually only currently supported by +% the version of dvips distributed with \OzTeX, and with the built in +% \OzTeX\ drivers, but put here anyway as it is not much code and +% increases portability between the systems as now |[dvips]| and +% |[oztex]| share the same back end. +% \begin{macrocode} +\def\oztex@include#1#2{% + \dimen@1bp% + \divide\Gin@req@width\dimen@ + \divide\Gin@req@height\dimen@ + \special{#1=#2\space + \@width=\number\Gin@req@width \space + \@height=\number\Gin@req@height}} +% \end{macrocode} +% +% \begin{macrocode} +\def\Ginclude@pntg{\oztex@include{pntg}} +\def\Ginclude@pict{\oztex@include{pict}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \subsection{Rotation} +% \begin{macrocode} +\def\Grot@start{% + \special{ps: gsave currentpoint + currentpoint translate \Grot@angle\space neg + rotate neg exch neg exch translate}} +\def\Grot@end{\special{ps: currentpoint grestore moveto}} +% \end{macrocode} +% \subsection{Scaling} +% \begin{macrocode} +\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}} +% \end{macrocode} +% +% \section{Literal Postscript} +% +% Raw PostScript code, no save/restore. +% \begin{macrocode} +\def\Gin@PS@raw#1{\special{ps: #1}} +% \end{macrocode} +% +% PostScript code, to be surrounded by save/restore by the driver. +% Coordinate system standard PostScript, but with origin +% at current (\TeX) position. +% \begin{macrocode} +\def\Gin@PS@restored#1{\special{" #1}} +% \end{macrocode} +% +% PostScript code to be inserted in the Header section of the final +% PostScript. Must be issued on the first page of a document. +% \begin{macrocode} +\def\Gin@PS@literal@header#1{\AtBeginDvi{\special{! #1}}} +% \end{macrocode} +% +% Name of external file, the contents of which are to be inserted in +% the Header section of the final PostScript. Must be issued on the +% first page of a document. +% \begin{macrocode} +\def\Gin@PS@file@header#1{\AtBeginDvi{\special{header=#1}}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% +% \section{dvipdf} +% A \LaTeXe\ graphics driver file for \emph{dvipdf} driver. +% +% \begin{macrocode} +%<*dvipdf> +% \end{macrocode} +% +% \subsection{Colour} +% Uses the generic `color1' code. +% +% \subsection{File inclusion} +% +% \begin{macro}{\Ginclude@eps} +% |#1| input file (or command) +% \begin{macrocode} +\def\Ginclude@eps#1{% + \message{<#1>}% + \bgroup +% \end{macrocode} +% \emph{dvips} likes to work with its own pixel resolution, so +% mangle the sizes slightly. +% \begin{macrocode} + \def\@tempa{!}% + \dimen@\Gin@req@width + \dimen@ii.1bp% + \divide\dimen@\dimen@ii + \@tempdima\Gin@req@height + \divide\@tempdima\dimen@ii + \special{PSfile="#1"\space + llx=\Gin@llx\space + lly=\Gin@lly\space + urx=\Gin@urx\space + ury=\Gin@ury\space + \ifx\Gin@scalex\@tempa\else rwi=\number\dimen@\space\fi + \ifx\Gin@scaley\@tempa\else rhi=\number\@tempdima\space\fi + \ifGin@clip clip\fi}% + \egroup} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Ginclude@bmp} +% |#1| input file; if zero size is requested, the graphic will +% come at `natural' size. +% \begin{macrocode} +\def\Ginclude@bmp#1{% + \message{<#1>}% + \dimen@\Gin@req@height + \advance\dimen@ by-\Gin@lly bp + \kern-\Gin@llx bp\raise\Gin@req@height\hbox{% + \ifdim\Gin@urx bp=\z@ + \ifdim\Gin@ury bp=\z@ + \special{pdf: /GRAPH #1}% + \else + \special{pdf: /GRAPH #1 \number\Gin@req@width sp}% + \fi + \else + \special{pdf: /GRAPH #1 \number\Gin@req@width sp + \number\Gin@req@height sp}% + \fi}} +% \end{macrocode} +% \end{macro} +% +% \subsection{Rotation} +% \begin{macrocode} +\def\Grot@start{% +\special{pdf: /ROT \Grot@angle\space << }} +\def\Grot@end{\special{pdf: /ROT >> }} +% \end{macrocode} +% +% \subsection{Scaling} +% \begin{macrocode} +\def\Gscale@start{\special{pdf: /S \Gscale@x\space \Gscale@y\space << }} +\def\Gscale@end{\special{pdf: /S \space >> }} +% \end{macrocode} +% +% \section{Literal Postscript} +% +% Raw PostScript code, no save/restore. +% \begin{macrocode} +\def\Gin@PS@raw#1{\special{ps: #1}} +% \end{macrocode} +% +% PostScript code, to be surrounded by save/restore by the driver. +% Coordinate system standard PostScript, but with origin +% at current (\TeX) position. +% \begin{macrocode} +\def\Gin@PS@restored#1{\special{" #1}} +% \end{macrocode} +% +% PostScript code to be inserted in the Header section of the final +% PostScript. Must be issued on the first page of a document. +% \begin{macrocode} +\def\Gin@PS@literal@header#1{\AtBeginDvi{\special{! #1}}} +% \end{macrocode} +% +% Name of external file, the contents of which are to be inserted in +% the Header section of the final PostScript. Must be issued on the +% first page of a document. +% \begin{macrocode} +\def\Gin@PS@file@header#1{\AtBeginDvi{\special{header=#1}}} +% \end{macrocode} +% +% \subsection{File extensions} +% +% \begin{macrocode} +\@namedef{Gin@rule@.msp}#1{{bmp}{.bb}{#1}} +\@namedef{Gin@rule@.jpg}#1{{bmp}{.bb}{#1}} +\@namedef{Gin@rule@.bmp}#1{{bmp}{.bb}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{\OzTeX} +% +% A \LaTeXe\ graphics driver file for \OzTeX\ +% (versions 1.42 and later), +% by Andrew Trevorrow. +% \begin{macrocode} +%<*oztex> +% \end{macrocode} +%\subsection{Graphics inclusion} +% \begin{macrocode} +\def\Ginclude@eps{\Oztex@Include{epsf}} +\def\Ginclude@pntg{\Oztex@Include{pntg}} +\def\Ginclude@pict{\Oztex@Include{pict}} +\def\Oztex@Include#1#2{% + \ifGin@clip + \typeout{No clipping support in OzTeX}% + \fi + \divide\Gin@req@width by 65781% convert sp to bp + \divide\Gin@req@height by 65781% + \special{#1=#2\space + width=\number\Gin@req@width \space + height=\number\Gin@req@height + }% +} +% +% \end{macrocode} +%\section{Textures} +% A \LaTeXe\ graphics driver file for Blue Sky's Textures +% +% \textbf{WARNING! There is ongoing work to produce a new version of +% the textures support. Do not rely on anything in this file being in +% the next version!} +% +% +% \begin{macrocode} +%<*textures> +% \end{macrocode} +% \subsection{Graphics inclusion} +% +% +% \begin{macrocode} +\PackageInfo{graphics/color} + {This file uses the advanced color support\MessageBreak + available in textures1.7\MessageBreak + If you are using color with an earlier version\MessageBreak + of textures, edit graphics.ins where marked,\MessageBreak + and re-latex graphics.ins.\MessageBreak\MessageBreak + If you are using textures1.7\MessageBreak + you may want to delete this warning\MessageBreak + from textures.def.\MessageBreak\MessageBreak + The code for scaling/rotation and file inclusion\MessageBreak + in this file is still rudimentary, and does not\MessageBreak + use textures' full capabilities.\MessageBreak\MessageBreak + A new textures.def is currently being developed\@gobble} +% \end{macrocode} +% +% +% \begin{macrocode} +\def\Ginclude@eps{\Textures@Include{illustration}} +\def\Ginclude@pict{\Textures@Include{pictfile}} +\def\Textures@Include#1#2{% + \def\@tempa{!}% + \ifx\Gin@scaley\@tempa + \let\Gin@scaley\Gin@scalex + \else + \ifx\Gin@scalex\@tempa\let\Gin@scalex\Gin@scaley\fi + \fi + \setlength\@tempdima{\Gin@scalex pt}% + \setlength\@tempdimb{\Gin@scaley pt}% + \ifdim\@tempdima>\@tempdimb + \let\Gin@scalex\Gin@scaley + \fi + \ifGin@clip + \typeout{no clipping support in Textures}% + \fi + \@tempdimb=1000sp% + \setlength\@tempdima{\Gin@scalex\@tempdimb}% + \special{#1 #2\space scaled \number\@tempdima}% +} +% \end{macrocode} +% \subsection{Rotation} +% This code was written when no unprotected postscript code was allowed; +% it could almost certainly be rewritten now with `rawpostscript'. +% \begin{macrocode} +\def\Grot@start{\special{postscript + 0 0 transform + grestore + matrix currentmatrix + 3 1 roll + itransform + dup 3 -1 roll + dup 4 1 roll exch + translate + \Grot@angle\space neg rotate + neg exch neg exch translate + gsave}} +\def\Grot@end{\special{postscript grestore setmatrix gsave}} +% \end{macrocode} +% \subsection{Colour} +% This will only work for versions 1.6 and Version 1.7 uses `color2'. +% \begin{macrocode} +%\def\Gin@PS@raw#1{\special{rawpostscript #1}} +% +% \end{macrocode} +% +% \section{dvialw} +% A \LaTeXe\ graphics driver file for dvialw, by Nelson Beebe +% \begin{macrocode} +%<*dvialw> +% \end{macrocode} +% \subsection{Rotation} +% \begin{macrocode} +\def\Ginclude@eps#1{% + \def\@tempa{!}% + \ifx\Gin@scaley\@tempa + \let\Gin@scaley\Gin@scalex + \else + \ifx\Gin@scalex\@tempa\let\Gin@scalex\Gin@scaley\fi + \fi + \ifGin@clip + \typeout{no clipping support in dvialw}% + \fi + \special{language "PS", + literal "\Gin@scalex\space + \Gin@scaley\space scale", + position = "bottom left", + include "#1\space"}% +} +% +% \end{macrocode} +% \section{emtex} +% A \LaTeXe\ graphics driver file for Eberhard Mattes' emTeX +% \begin{macrocode} +%<*emtex> +% \end{macrocode} +% \subsection{Graphics file inclusion} +% \begin{macrocode} +\def\Ginclude@bmp#1{% + \raise\Gin@req@height\hbox{\special{em:graph #1}}% +\typeout{WARNING: emtex does not permit graphics to be scaled}% +} +% +% \end{macrocode} +% \section{dvilaser/ps} +% A \LaTeXe\ graphics driver file for Arbortext's dvilaser/ps +% \begin{macrocode} +%<*dvilaser> +% \end{macrocode} +%\subsection{Graphic file inclusion} +% \begin{macrocode} +\def\Ginclude@eps#1{% +\ifGin@clip + \typeout{no clipping support in dvilaser/ps}% +\fi +\special{ps: epsfile #1\space \the\Gin@req@width}% +} +% +% \end{macrocode} +% \section{psprint} +% A \LaTeXe\ graphics driver file for Trevorrow's psprint +% \begin{macrocode} +%<*psprint> +% \end{macrocode} +%\subsection{Graphic file inclusion} +% \begin{macrocode} +\def\Ginclude@eps#1{% + \def\@tempa{!}% + \ifx\Gin@scaley\@tempa + \let\Gin@scaley\Gin@scalex + \else + \ifx\Gin@scalex\@tempa\let\Gin@scalex\Gin@scaley\fi + \fi + \ifGin@clip + \typeout{no clipping support in psprint}% + \fi + \special{#1\space + \Gin@scalex\space \Gin@scaley\space scale + \Gin@llx\space neg + \Gin@lly \space neg translate +}% +} +% +% \end{macrocode} +% \section{dvipsone} +% +% A \LaTeXe\ graphics driver file for Y\&Y's dvipsone +% \begin{macrocode} +%<*dvipsone> +% \end{macrocode} +% +% \subsection{Graphic file inclusion} +% +% PostScript Files. +% \begin{macrocode} +\def\Ginclude@eps#1{% + \message{<#1>}% + \bgroup + \def\@tempa{!}% + \dimen@\Gin@req@width + \dimen@ii.1bp% + \divide\dimen@\dimen@ii + \@tempdima\Gin@req@height + \divide\@tempdima\dimen@ii + \special{PSfile="#1"\space + llx=\Gin@llx\space + lly=\Gin@lly\space + urx=\Gin@urx\space + ury=\Gin@ury\space + \ifx\Gin@scalex\@tempa\else rwi=\number\dimen@\space\fi + \ifx\Gin@scaley\@tempa\else rhi=\number\@tempdima\space\fi + \ifGin@clip clip\fi}% + \egroup} +% \end{macrocode} +% +% Tiff files. +% \begin{macrocode} +\def\Ginclude@tiff#1{% +\message{<#1>}% + \special{insertimage: #1 \number\Gin@req@width\space + \number\Gin@req@height}} +% \end{macrocode} +% +% Windows Metafiles. +% \begin{macrocode} +\def\Ginclude@wmf#1{% + \message{<#1>}% + \special{insertmf: #1 0 0 \number\Gin@req@width\space + \number\Gin@req@height}} +% \end{macrocode} +% +% \begin{macrocode} +% \end{macrocode} +% +% \begin{macrocode} +\def\Gin@PS@raw#1{\special{ps: #1}} +% \end{macrocode} +% +% \subsection{Rotation} +% \begin{macrocode} +\def\Grot@start{% + \special{ps: gsave currentpoint + currentpoint translate \Grot@angle\space + rotate neg exch neg exch translate}} +\def\Grot@end{% + \special{ps: currentfont currentpoint grestore moveto setfont}} +% \end{macrocode} +% +% \subsection{Scaling} +% \begin{macrocode} +\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}} +% \end{macrocode} +% +% \subsection{File Extensions} +% +% \begin{macrocode} +\@namedef{Gin@rule@.wmf}#1{{wmf}{}{#1}} +\@namedef{Gin@rule@.clp}#1{{wmf}{}{#1}} +% \end{macrocode} +% +% \section{Literal Postscript} +% +% Raw PostScript code, no save/restore. +% \begin{macrocode} +\def\Gin@PS@raw#1{\special{ps: #1}} +% \end{macrocode} +% +% PostScript code, to be surrounded by save/restore by the driver. +% Coordinate system standard PostScript, but with origin +% at current (\TeX) position. +% \begin{macrocode} +\def\Gin@PS@restored#1{\special{" #1}} +% \end{macrocode} +% +% PostScript code to be inserted in the Header section of the final +% PostScript. Must be issued on the first page of a document. +% \begin{macrocode} +\def\Gin@PS@literal@header#1{\AtBeginDvi{\special{headertext=#1}}} +% \end{macrocode} +% +% Name of external file, the contents of which are to be inserted in +% the Header section of the final PostScript. Must be issued on the +% first page of a document. +% \begin{macrocode} +\def\Gin@PS@file@header#1{\AtBeginDvi{\special{header=#1}}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{dviwindo} +% A \LaTeXe\ graphics driver file for Y\&Y's dviwindo. +% +% This driver now uses the same file as |dvipsone|. +% +% \section{dvitops} +% A \LaTeXe\ graphics driver file for James Clark's dvitops +% \begin{macrocode} +%<*dvitops> +% \end{macrocode} +% \subsection{Rotation} +% \begin{macrocode} +\newcount\Grot@count +\Grot@count=\@ne +\def\Grot@start{\special{dvitops: origin + rot\the\@tempdima}% +\special{dvitops: begin rot\the\Grot@count}}% +\def\Grot@end{\special{dvitops: end}% +\special{dvitops: rotate rot\the\Grot@count \space + \Grot@angle}% +\global\advance\Grot@count by\@ne}% +% \end{macrocode} +% \subsection{Graphic file inclusion} +% \begin{macrocode} +\def\Ginclude@eps#1{% +% These cause an arithmetic overflow, so I've commented them +% out. Presumably they were there for some reason. +% Any dvitops users out there?? +% \multiply\Gin@req@width by \@m +% \multiply\Gin@req@height by \@m +\ifGin@clip + \typeout{no clipping support in dvitops}% +\fi +\special{import #1\space \the\Gin@req@width\space + \the\Gin@req@height\space fill}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +%\section{dvi2ps} +% A \LaTeXe\ graphics driver file for original dvi2ps +% \begin{macrocode} +%<*dvi2ps> +% \end{macrocode} +% +% \subsection{Graphic file inclusion} +% \begin{macrocode} +\def\Ginclude@eps#1{% + \def\@tempa{!}% + \ifx\Gin@scaley\@tempa + \let\Gin@scaley\Gin@scalex + \else + \ifx\Gin@scalex\@tempa\let\Gin@scalex\Gin@scaley\fi + \fi + \ifGin@clip + \typeout{no clipping support in dvi2ps}% + \fi + \special{psfile=#1\space + hscale=\Gin@scalex\space 1000 mul + vscale=\Gin@scaley\space 1000 mul}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{pctexps} +% A \LaTeXe\ graphics driver file for Personal TeX's PTI Laser/PS; +% from information supplied by Lance Carnes and Tao Wang +% ||. +% \begin{macrocode} +%<*pctexps> +% \end{macrocode} +% +% \subsection{Graphic file inclusion} +% +% \begin{macrocode} +\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}} +% \end{macrocode} +% +% \begin{macrocode} +\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}} +% \end{macrocode} +% +% \begin{macrocode} +\def\Gin@extensions{.eps,.ps} +\@namedef{Gin@rule@.ps}#1{{ps}{.ps}{#1}} +\@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +\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}} +% \end{macrocode} +% +% \begin{macrocode} +\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}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{pctex32} +% A \LaTeXe\ graphics driver file for Personal TeX's PC TeX for 32 bit +% Windows; Code supplied by Tao Wang ||. +% +% \subsection{Colour} +% Uses the generic `color1' code. +% +% \begin{macrocode} +%<*pctex32> +% \end{macrocode} +% +% \subsection{Graphic file inclusion}% +% \begin{macrocode} +% including PostScript graphics +\def\Ginclude@eps#1{% + \message{<#1>}% + \bgroup + \def\@tempa{!}% + \dimen@\Gin@req@width + \dimen@ii.1bp% + \divide\dimen@\dimen@ii + \@tempdima\Gin@req@height + \divide\@tempdima\dimen@ii + \special{PSfile="#1"\space + llx=\Gin@llx\space + lly=\Gin@lly\space + urx=\Gin@urx\space + ury=\Gin@ury\space + \ifx\Gin@scalex\@tempa\else rwi=\number\dimen@\space\fi + \ifx\Gin@scaley\@tempa\else rhi=\number\@tempdima\space\fi + \ifGin@clip clip\fi}% + \egroup} +% \end{macrocode} +% +% including BMP graphics +% \begin{macrocode} +\def\Ginclude@bmp#1{% +\message{<#1>}% + \ifGin@clip + \typeout{no clipping support for BMP graphics in PCTeX32}% + \fi + \Gin@req@width.03515\Gin@req@width + \Gin@req@height.03515\Gin@req@height + \special{bmp:#1\space x=\strip@pt\Gin@req@width cm, + y=\strip@pt\Gin@req@height cm}} +% \end{macrocode} +% +% including WMF graphics +% \begin{macrocode} +\def\Ginclude@wmf#1{% +\message{<#1>}% + \ifGin@clip + \typeout{no clipping support for WMF graphics in PCTeX32}% + \fi + \Gin@req@width.03515\Gin@req@width + \Gin@req@height.03515\Gin@req@height + \special{wmf:#1\space x=\strip@pt\Gin@req@width cm, + y=\strip@pt\Gin@req@height cm}} +% \end{macrocode} +% +% \subsection{Scaling and Rotating} +% PostScript rotation and scaling +% \begin{macrocode} +\def\Grot@start{% + \special{ps:: gsave currentpoint + currentpoint translate \Grot@angle\space neg + 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}} +% \end{macrocode} +% +% \begin{macrocode} +\def\Gin@PS@raw#1{\special{ps:: #1}} +\def\Gin@PS@restored#1{\special{" #1}} +% \end{macrocode} +% +% \subsection{Default Extensions} +% +% \begin{macrocode} +\def\Gin@extensions{.eps,.ps,.wmf,.bmp} +\@namedef{Gin@rule@.ps}#1{{eps}{.ps}{#1}} +\@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} +\@namedef{Gin@rule@.bmp}#1{{bmp}{}{#1}} +\@namedef{Gin@rule@.wmf}#1{{wmf}{}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{pctexwin} +% A \LaTeXe\ graphics driver file for Personal TeX's PC TeX for Windows; +% from information supplied by Lance Carnes and Tao Wang +% ||. +% \begin{macrocode} +%<*pctexwin> +% \end{macrocode} +% +% \subsection{Graphic file inclusion} +% +% \begin{macrocode} +\def\Ginclude@eps#1{% +\message{<#1>}% + \ifGin@clip + \typeout{no clipping support in pctexwin}% + \fi + \Gin@req@width.03515\Gin@req@width + \Gin@req@height.03515\Gin@req@height + \special{eps:#1\space x=\strip@pt\Gin@req@width cm, + y=\strip@pt\Gin@req@height cm}} +% \end{macrocode} +% +% \begin{macrocode} +\def\Ginclude@ps#1{% +\message{<#1>}% + \ifGin@clip + \typeout{no clipping support in pctexwin}% + \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% +}} +% \end{macrocode} +% +% \begin{macrocode} +\def\Ginclude@bmp#1{% +\message{<#1>}% + \ifGin@clip + \typeout{no clipping support in pctexwin}% + \fi + \Gin@req@width.03515\Gin@req@width + \Gin@req@height.03515\Gin@req@height + \special{bmp:#1\space x=\strip@pt\Gin@req@width cm, + y=\strip@pt\Gin@req@height cm}} +% \end{macrocode} +% +% \begin{macrocode} +\def\Ginclude@wmf#1{% +\message{<#1>}% + \ifGin@clip + \typeout{no clipping support in pctexwin}% + \fi + \Gin@req@width.03515\Gin@req@width + \Gin@req@height.03515\Gin@req@height + \special{wmf:#1\space x=\strip@pt\Gin@req@width cm, + y=\strip@pt\Gin@req@height cm}} +% \end{macrocode} +% +% \begin{macrocode} +\def\Gin@extensions{.eps,.ps,.wmf,.bmp} +\@namedef{Gin@rule@.bmp}#1{{bmp}{}{#1}} +\@namedef{Gin@rule@.wmf}#1{{wmf}{}{#1}} +\@namedef{Gin@rule@.ps}#1{{ps}{.ps}{#1}} +\@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{pctexhp} +% A \LaTeXe\ graphics driver file for Personal TeX's PTI Laser/HP; +% from information supplied by Lance Carnes and Tao Wang +% ||. +% \begin{macrocode} +%<*pctexhp> +% \end{macrocode} +% \subsection{Graphic file inclusion} +% \begin{macrocode} +\def\Ginclude@pcl#1{% +\message{<#1>}% + \ifGin@clip + \typeout{no clipping support in pctexhp}% + \fi + \hbox{\kern-\Gin@llx bp\raise-\Gin@lly bp\hbox{\special{pcl:#1}}}% + \typeout{WARNING: pctexhp does not permit graphics to be scaled}} +\@namedef{Gin@rule@.pcl}#1{{pcl}{}{#1}} +\def\Gin@extensions{.pcl} +% +% \end{macrocode} +% +% \section{pubps} +% A \LaTeXe\ graphics driver file for Arbortext's PUBps; +% information from Peter R Wilson |pwilson@rdrc.rpi.edu|. +% \begin{macrocode} +%<*pubps> +% \end{macrocode} +% \subsection{Rotation} +% \begin{macrocode} +\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}} +% +% \end{macrocode} +% +% \section{dviwin} +% A \LaTeXe\ graphics driver file for Hippocrates Sendoukas' dviwin +% \begin{macrocode} +%<*dviwin> +% \end{macrocode} +% \subsection{Graphic file inclusion} +% Dviwin sorts out the graphics type itself based on extension. +% They all use the same |\special|, so as far as graphics.sty is +% concerned they are all the same `type'. Use `bmp' for the type +% as that is as good a name as any. Make this the default. +% \begin{macrocode} +\@namedef{Gin@rule@*}#1{{bmp}{}{#1}} +\def\Ginclude@bmp#1{% + \raise\Gin@req@height\hbox{% + \special{anisoscale #1, + \the\Gin@req@width\space \the\Gin@req@height}}} +% \end{macrocode} +% The only exception is EPS files, as they may be read for BoundingBox +% \begin{macrocode} +\@namedef{Gin@rule@.ps}#1{{eps}{.ps}{#1}} +\@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} +\let\Ginclude@eps\Ginclude@bmp +% \end{macrocode} +% Add a few default extensions so |\includegraphics{a}| +% will pick up |a.eps| or |a.wmf|. +% This list can be reset with |\DeclareGraphicsExtensions|. +% Other extensions not in the list may be used explicitly, eg +% |\includegraphics{a.gif}| should work as long as dviwin has access +% to a gif filter. If |.gif| is added using |\DeclareGraphicsExtensions| +% then |\includegraphics{a}| would also find |a.gif|. +% \begin{macrocode} +\def\Gin@extensions{.eps,.ps,.wmf,.tif} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{ln} +% A \LaTeXe\ graphics driver file for B Hamilton Kelly's ln03 driver. +% Untested, but based on the graphics macros distributed with the +% driver. +% \begin{macrocode} +%<*ln> +% \end{macrocode} +% \subsection{Graphic file inclusion} +% \begin{macrocode} +\def\Ginclude@sixel#1{\special{ln03:sixel #1}} +% +% \end{macrocode} +% +% \section{trutex} +% A \LaTeXe\ graphics driver file for Kinch `truetex' driver. +% \begin{macrocode} +%<*truetex> +% \end{macrocode} +% +% \subsection{Colour} +% Uses the `color4' colour code. +% +% \subsection{Graphic file inclusion} +% +% EPS File inclusion: DVIPS style. +% \begin{macrocode} +\def\Ginclude@eps#1{% + \message{<#1>}% + \bgroup + \def\@tempa{!}% + \dimen@\Gin@req@width + \dimen@ii.1bp% + \divide\dimen@\dimen@ii + \@tempdima\Gin@req@height + \divide\@tempdima\dimen@ii + \special{PSfile="#1"\space + llx=\Gin@llx\space + lly=\Gin@lly\space + urx=\Gin@urx\space + ury=\Gin@ury\space + \ifx\Gin@scalex\@tempa\else rwi=\number\dimen@\space\fi + \ifx\Gin@scaley\@tempa\else rhi=\number\@tempdima\space\fi + \ifGin@clip clip\fi}% + \egroup} +% \end{macrocode} +% +% bmp File Inclusion. +% \begin{macrocode} +\def\Ginclude@bmp#1{% + \message{<#1>}% + \special{bmpfile #1}} +% \end{macrocode} +% +% tif(f) File inclusion +% \begin{macrocode} +\def\Ginclude@tiff#1{% + \message{<#1>}% + \special{tifffile #1}} +% \end{macrocode} +% +% \subsection{Literal PostScript} +% This is not supported, so uses `nops' code. +% +% \subsection{Default Rules} +% Support (e)ps, tif and bmp, default to eps. +% \begin{macrocode} +\def\Gin@extensions{.eps,.ps} +\@namedef{Gin@rule@.ps}#1{{eps}{.ps}{#1}} +\@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} +\@namedef{Gin@rule@.tif}#1{{tiff}{}{#1}} +\@namedef{Gin@rule@.bmp}#1{{bmp}{}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +\@namedef{Gin@rule@*}#1{{eps}{\Gin@ext}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{tcidvi} +% A \LaTeXe\ graphics driver file for Scientific Word/Workplace. +% Actually for the Kinch truetex driver, augmented with extra +% |\special| handling with the DLL supplied with SW. +% \begin{macrocode} +%<*tcidvi> +% \end{macrocode} +% +% \subsection{Colour} +% Uses the `color4' colour code. +% +% The above colours are handled by the Kinch-supplied dll +% The TCI dll adds support for |\colorbox|, but only grey scale +% The code below accepts any color model, but only the red +% component is used. +% \begin{macrocode} +\AtBeginDocument{\def\color@block#1#2#3{% + {\rlap{\ifcolors@ + \@defaultunits\count@\current@color\@nnil + \dimen@\count@\p@ + \divide\dimen@\@cclv + \dimen@ii#2% + \advance\dimen@ii#3% + \lower#3\hbox{% + \special{language "Scientific Word";% + type "greybox";% + greyscale \strip@pt\dimen@;% + height \the\dimen@ii;% + width \the#1;% + depth 0pt;}}% + \fi}}}} +% \end{macrocode} +% +% \subsection{Graphic file inclusion} +% +% EPS File inclusion. +% \begin{macrocode} +\def\Ginclude@eps#1{% + \message{<#1>}% + \raise\Gin@req@height\hbox{% +% \end{macrocode} +% +% If the bounding box has been changed by a trim or viewport +% key then need to calculate the crop ratios based on the original +% bb coordinates. (This assumes that clip key is also used). +% \begin{macrocode} + \ifx\Gin@ollx\@undefined + \else + \@tempdimb \Gin@ourx bp% + \advance\@tempdimb-\Gin@ollx bp% + \@tempdima\Gin@llx bp% + \advance\@tempdima-\Gin@ollx bp% + \Gscale@div\TCI@cropleft\@tempdima\@tempdimb + \@tempdima\Gin@urx bp% + \advance\@tempdima-\Gin@ollx bp% + \Gscale@div\TCI@cropright\@tempdima\@tempdimb + \@tempdimb \Gin@oury bp% + \advance\@tempdimb-\Gin@olly bp% + \@tempdima\Gin@lly bp% + \advance\@tempdima-\Gin@olly bp% + \Gscale@div\TCI@cropbottom\@tempdima\@tempdimb + \@tempdima\Gin@ury bp% + \advance\@tempdima-\Gin@olly bp% + \Gscale@div\TCI@croptop\@tempdima\@tempdimb + \fi +% \end{macrocode} +% +% \begin{macrocode} + \special{% + language \TCI@language;% + type \TCI@type;% + valid_file \TCI@validfile;% + width \the\Gin@req@width;% + height \the\Gin@req@height;% + depth 0pt;% + original-width \the\Gin@nat@width;% + original-height \the\Gin@nat@height;% + cropleft "\TCI@cropleft";% + croptop "\TCI@croptop";% + cropright "\TCI@cropright";% + cropbottom "\TCI@cropbottom";% + filename '#1';% + \ifx\TCI@temp\@empty\else tempfilename \TCI@temp;\fi + }}} +% \end{macrocode} +% +% Default values so documents produced elsewhere should work +% \begin{macrocode} +\def\TCI@language{"Scientific Word"} +\def\TCI@type{"GRAPHIC"} +\def\TCI@validfile{'F'} +\def\TCI@cropleft{0} +\def\TCI@croptop{1} +\def\TCI@cropright{1} +\def\TCI@cropbottom{0} +\let\TCI@temp\@empty +% \end{macrocode} +% +% Non PS Graphic files. +% +% File inclusion macro is always the same. Use a different name though +% as LaTeX thinks it can read eps files for BoundingBox. +% \begin{macrocode} +\let\Ginclude@bmp\Ginclude@eps +% \end{macrocode} +% +% \subsection{Literal PostScript} +% This is not supported, so uses `nops' code. +% +% \subsection{Default Rules} +% SW always gives the full name with extension. +% So leave this list empty. +% \begin{macrocode} +\def\Gin@extensions{} +% \end{macrocode} +% +% .ps .PS .eps .EPS are (E)PS +% rest are `bmp' which is a catch all type for anything +% that the inport filter can handle. +% \begin{macrocode} +\@namedef{Gin@rule@.ps}#1{{eps}{.ps}{#1}} +\@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} +\@namedef{Gin@rule@.PS}#1{{eps}{.PS}{#1}} +\@namedef{Gin@rule@.EPS}#1{{eps}{.EPS}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +\@namedef{Gin@rule@*}#1{{bmp}{\Gin@ext}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{Literal Postscript} +% Most drivers writing to PostScript allow some form of `literal' +% PostScript |\special| that inserts code into the final PostScript +% output. However Non-PS drivers can not support this (and some PS +% one's can't either). The code here makes all these commands no ops. +% Individual driver sections may define the commands to do something +% useful. +% +% \begin{macrocode} +%<*nops> +% \end{macrocode} +% +% Raw PostScript code, no save/restore. Coordinate system unspecified. +% \begin{macrocode} +\def\Gin@PS@raw#1{} +% \end{macrocode} +% +% PostScript code, to be surrounded by save/restore by the driver. +% Coordinate system standard PostScript, but with origin +% at current (\TeX) position. +% \begin{macrocode} +\def\Gin@PS@restored#1{} +% \end{macrocode} +% +% PostScript code to be inserted in the Header section of the final +% PostScript. Must be issued on the first page of a document. +% \begin{macrocode} +\def\Gin@PS@literal@header#1{} +% \end{macrocode} +% +% Name of external file, the contents of which are to be inserted in +% the Header section of the final PostScript. Must be issued on the +% first page of a document. +% \begin{macrocode} +\def\Gin@PS@file@header#1{} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \section{Graphics Inclusion Rules} +% \begin{macrocode} +%<*psrules> +% \end{macrocode} +% +% \begin{macrocode} +\def\Gin@extensions{.eps,.ps} +% \end{macrocode} +% +% \begin{macrocode} +\@namedef{Gin@rule@.ps}#1{{eps}{.ps}{#1}} +\@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +\@namedef{Gin@rule@*}#1{{eps}{\Gin@ext}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +% +%<*psrulesZ> +% \end{macrocode} +% +% \begin{macrocode} +\def\Gin@extensions{.eps,.ps,.eps.gz,.ps.gz,.eps.Z} +% \end{macrocode} +% +% \begin{macrocode} +\@namedef{Gin@rule@.ps}#1{{eps}{.ps}{#1}} +\@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} +\@namedef{Gin@rule@.pz}#1{{eps}{.bb}{`gunzip -c #1}} +\@namedef{Gin@rule@.eps.Z}#1{{eps}{.eps.bb}{`gunzip -c #1}} +\@namedef{Gin@rule@.ps.Z}#1{{eps}{.ps.bb}{`gunzip -c #1}} +\@namedef{Gin@rule@.ps.gz}#1{{eps}{.ps.bb}{`gunzip -c #1}} +\@namedef{Gin@rule@.eps.gz}#1{{eps}{.eps.bb}{`gunzip -c #1}} +% \end{macrocode} +% +% \begin{macrocode} +\@namedef{Gin@rule@*}#1{{eps}{\Gin@ext}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +% +%<*dosrules> +% \end{macrocode} +% +% \begin{macrocode} +%\def\Gin@extensions{.eps,.ps,.pcx,.bmp} +% \end{macrocode} +% +% \begin{macrocode} +\@namedef{Gin@rule@.pcx}#1{{bmp}{}{#1}} +\@namedef{Gin@rule@.bmp}#1{{bmp}{}{#1}} +\@namedef{Gin@rule@.msp}#1{{bmp}{}{#1}} +% \end{macrocode} +% +% \begin{macrocode} +% +%<*macrules> +%\def\Gin@extensions{{},.ps,.eps,.pict} +%\@namedef{Gin@rule@.ps}#1{{eps}{.ps}{#1}} +%\@namedef{Gin@rule@.eps}#1{{eps}{.eps}{#1}} +\@namedef{Gin@rule@.pict}#1{{pict}{}{#1}} +\@namedef{Gin@rule@.pntg}#1{{pntg}{}{#1}} +%\@namedef{Gin@rule@}#1{{pict}{\relax}{#1}} +% +%<*tiffrules> +\@namedef{Gin@rule@.tif}#1{{tiff}{}{#1}} +% +% \end{macrocode} +% +% \Finale +% diff --git a/Master/texmf-dist/source/latex/graphics/epsfig.dtx b/Master/texmf-dist/source/latex/graphics/epsfig.dtx new file mode 100644 index 00000000000..abd37b593d8 --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/epsfig.dtx @@ -0,0 +1,141 @@ +% +% \iffalse +% +%% epsfig.dtx Copyright (C) 1994-1996 1999 Sebastian Rahtz +%% +%% 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. +%% +%<*dtx> + \ProvidesFile{epsfig.dtx} +% +%\NeedsTeXFormat{LaTeX2e}[1994/06/01] +%\ProvidesPackage{epsfig} +% \ProvidesFile{epsfig.drv} +% \fi +% \ProvidesFile{epsfig.dtx} + [1999/02/16 v1.7a (e)psfig emulation (SPQR)] +% +% \iffalse +%<*driver> +\documentclass{ltxdoc} +\begin{document} + \DocInput{epsfig.dtx} +\end{document} +% +% \fi +% +% \GetFileInfo{epsfig.dtx} +% +% \title{The \textsf{epsfig} package\thanks{This file +% has version number \fileversion, last +% revised \filedate.}} +% \author{Sebastian Rahtz\\spqr@ftp.tex.ac.uk} +% \date{\filedate} +% \maketitle +% +% \CheckSum{176} +% +% \StopEventually{} +% +% \section{Preface} +% \begin{macrocode} +%<*package> +\DeclareOption*{\PassOptionsToPackage{\CurrentOption}{graphicx}} +\ProcessOptions +\RequirePackage{graphicx} +% \end{macrocode} +% \subsection{Emulation of `psfig' syntax} +% Emulate "epsfig.sty", and most varieties of psfig +% \begin{macro}{\psfig,\epsfig} +% \begin{macrocode} +\def\psfig#1{% + \let\Gin@ewidth\Gin@exclamation\let\Gin@eheight\Gin@ewidth + \def\Gin@req@sizes{% + \def\Gin@scalex{1}\let\Gin@scaley\Gin@exclamation + \Gin@req@height\Gin@nat@height + \Gin@req@width\Gin@nat@width}% + \begingroup + \let\Gfigname\relax + \@tempswafalse + \toks@{\Ginclude@graphics{\Gfigname}}% + \setkeys{Gin}{#1}% + \Gin@esetsize + \ifx\Gfigname\relax\ErrorNoFile\else + \the\toks@ + \fi + \endgroup} +\define@key{Gin}{figure}{\def\Gfigname{#1}} +\define@key{Gin}{file}{\def\Gfigname{#1}} +\define@key{Gin}{prolog}{\typeout{epsfig: header files are not needed}} +\define@key{Gin}{silent}[]{} +\def\psdraft{\Gin@drafttrue} +\def\psfull{\Gin@draftfalse} +\def\pssilent{\typeout{epsfig option `silent' ignored}} +\def\psnoisy{\typeout{epsfig option `noisy' ignored}} +\let\epsfig\psfig +\def\psfigdriver#1{\makeatletter\input{#1.def}\makeatother} +% \end{macrocode} +% \end{macro} +% \subsection{Emulation of `epsf' syntax} +% Emulate Rokicki's "epsf.tex" supplied with the ever-popular dvips. +% \begin{macro}{\epsfbox,\epsffile} +% \begin{macrocode} +\newdimen\epsfxsize +\newdimen\epsfysize +\epsfysize\z@ +\epsfxsize\z@ +\def\epsfsize#1#2{\epsfxsize} +\def\epsfbox{% + \@ifnextchar[% + {\Gin@bboxtrue\epsf@bb@box}% + {\Gin@bboxfalse\epsf@box}% +} +\def\epsf@bb@box[#1#2]{% + \expandafter\Gread@parse@bb#1#2 \\ + \epsf@box} +\def\epsf@box#1{% + \bgroup + \def\Gin@req@sizes{% + \epsfxsize\epsfsize{\Gin@nat@width}{\Gin@nat@height}% + \ifdim\epsfxsize=\z@ + \ifdim\epsfysize=\z@ + \Gin@req@height\Gin@nat@height + \Gin@req@width\Gin@nat@width + \else + \let\Gin@scalex\Gin@exclamation + \Gin@req@height\epsfysize + \Gscale@div\Gin@scaley\Gin@req@height\Gin@nat@height + \Gin@req@width\Gin@scaley\Gin@nat@width + \fi + \else + \Gin@req@width\epsfxsize + \Gscale@div\Gin@scalex\Gin@req@width\Gin@nat@width + \ifdim\epsfysize=\z@ + \let\Gin@scaley\Gin@exclamation + \Gin@req@height\Gin@scalex\Gin@nat@height + \else + \Gin@req@height\epsfysize + \Gscale@div\Gin@scaley\Gin@req@height\Gin@nat@height + \fi + \fi + }% + \Ginclude@graphics{#1}% + \egroup + \epsfysize\z@ + \epsfxsize\z@ +} +\let\epsffile\epsfbox +\def\epsfclipon{\Gin@cliptrue} +\def\epsfclipoff{\Gin@clipfalse} +\def\epsfverbosetrue{\typeout{epsf verbose option ignored}} +\def\epsfverbosefalse{\typeout{epsf verbose option ignored}} +% +% \end{macrocode} +% \end{macro} +% +% \Finale +% + diff --git a/Master/texmf-dist/source/latex/graphics/graphics.dtx b/Master/texmf-dist/source/latex/graphics/graphics.dtx new file mode 100644 index 00000000000..91c16e9141a --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/graphics.dtx @@ -0,0 +1,1782 @@ +% +% \iffalse +% +%% graphics.dtx Copyright (C) 1994 David Carlisle Sebastian Rahtz +%% Copyright (C) 1995--1999 2001 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. +%% +%<*dtx> + \ProvidesFile{graphics.dtx} +% +%\NeedsTeXFormat{LaTeX2e}[1995/12/01] +%\ProvidesPackage{graphics} +% \ProvidesFile{graphics.drv} +% \fi +% \ProvidesFile{graphics.dtx} + [2001/07/07 v1.0n Standard LaTeX Graphics (DPC,SPQR)] +% +% \iffalse +%<*driver> +\documentclass{ltxdoc} +\newenvironment{option}[1]{\expandafter\macro\expandafter{% + \csname ds@#1\endcsname}}{\endmacro} +\begin{document} + \DocInput{graphics.dtx} +\end{document} +% +% \fi +% +% \GetFileInfo{graphics.dtx} +% +% \title{The \textsf{graphics} package\thanks{This file +% has version number \fileversion, last +% revised \filedate.}} +% \author{D. P. Carlisle\and S. P. Q. Rahtz} +% \date{\filedate} +% \maketitle +% +% \CheckSum{1158} +% +% \changes{v0.3a}{1994/02/24} +% {First DPC version (after prototype by SPQR).} +% \changes{v0.4e}{1994/05/30} +% {Rename egraphics to graphicx} +% \changes{v1.0}{1996/05/29} +% {Version 1 at last} +% +% +% \def\star{{\ttfamily*}} +% \makeatletter +% \def\Describe@Macro#1{\endgroup +% \setbox0=\lastbox\llap{\PrintDescribeMacro{#1}}}% +% \makeatother +% \marginparsep0pt +% +% \section{Introduction} +% +% This package implements various `graphics' functions. The main +% features are a) inclusion of `graphics' files. b) Rotation of sections +% of the page, c) Scaling of sections of the page. +% +% The design is split into three `levels'. +% \begin{itemize} +% \item The user interface. This is the collection of commands designed +% to appear in a document text. Actually two separate user interface +% have been implemented. The `standard' interface, described here, and a +% more powerful, and more `user-friendly' interface provided by the +% |graphicx| package. +% \item The core functions. These functions, which are also implemented +% in this file do all the `main work'. The `user-interface functions +% just collect together the information from any optional-arguments or +% star-forms, and then call one of these functions. +% \item The driver files. It is not possible to achieve the +% functionality of this package just using \TeX. The |dvi| driver used +% must be given additional instructions. (Using the |\special| command +% of \TeX.) Unfortunately, the capabilities of various drivers differ, +% and the syntax required to pass instructions to the drivers is also +% not standardised. So the `core functions' never access |\special| +% directly, but rather call a series of commands that must be defined in +% a special file customised for each driver. The accompanying file, +% |drivers.dtx| has suitable files for a range of popular drivers. +% \end{itemize} +% +% \section{Package Options} +% Most of the options, such as |dvips|, |textures| etc., specify the +% driver that is to be used to print the document. You may wish to set +% up a configuration file so that this option always takes effect, even +% if not specified in the document. To do this, produce a file +% |graphics.cfg| containing the line:\\ +% |\ExecuteOptions{dvips}|\\ +% (or whichever other driver you wish.) +% +% Apart from the driver options there are a few other options to control +% the behaviour of the package. +% \begin{description} +% \item[draft] +% Do not include graphics files, but instead print a box of the size +% the graphic would take up, and the file name. This greatly speeds up +% previewing on most systems. +% \item[final] +% Turns off the |draft| option. +% \item[debugshow] +% Show a lot of tracing information on the terminal. If you are not me +% you probably do not want to use this option. +% \item[hiderotate] +% Do not show rotated text. Sometimes useful if your previewer can not +% rotate text. +% \item[hidescale] +% Do not show scaled text. +% \item[hiresbb] +% Look for Bounding Box lines of the form |%%HiResBoundingBox| instead +% of the standard |%%BoundingBox|. These are used by some applications +% to get round the restriction that BoundingBox comments should only +% have integer values. +% \end{description} +% +% \section{Standard Interface} +% +% \subsection{Graphics Inclusion} +% +% \DescribeMacro +% \includegraphics\star\oarg{llx,lly}\oarg{urx,ury}\marg{file}\\ +% Include a graphics file. +% +% If \star\ is present, then the graphic is `clipped' to the size +% specified. If \star\ is omitted, then any part of the graphic that is +% outside the specified `bounding box' will over-print the surrounding +% text. +% +% If the optional arguments are omitted, then the size of the graphic +% will be determined by reading an external file as described below. +% If \oarg{urx,ury} is present, then it should specify the coordinates +% of the top right corner of the image, as a pair of \TeX\ dimensions. +% If the units are ommited they default to |bp|. So |[1in,1in]| and +% |[72,72]| are equivalent. If only one optional argument appears, the +% lower left corner of the image is assumed to be at |[0,0]|. Otherwise +% \oarg{llx,lly} may be used to specify the cordinates of this point. +% +% \DescribeMacro +% \graphicspath\marg{dir-list}\\ +% This optional declaration may be used to specify a list of directories +% in which to search for graphics files. The format is as for the +% \LaTeXe\ primitive |\input@path|, a list of directories, each in a +% |{}| group (even if there is only one in the list). For example: +% |\graphicspath{{eps/}{tiff/}}| +% would cause the system to look in the subdirectories |eps| and |tiff| +% of the current directory. The default setting of this path is +% |\input@path| that is: graphics files will be found wherever \TeX\ +% files are found. +% +% \DescribeMacro +% \DeclareGraphicsExtensions\marg{ext-list}\\ +% This specifies the behaviour of the system when the argument to +% |\includegraphics| does not have an extension specified. +% Here \marg{ext-list} should be a comma-separated list of file +% extensions, each with a leading period (\texttt{.}). +% A file name is produced by appending \emph{sep} and one extension. +% If a file is found, the system acts as if that extension had been +% specified. If not, the next extension in \emph{ext-list} is tried. +% \changes{v1.0m}{2001/06/07}{Extended documentation (CAR) graphics/3228} +% +% Each use of |\DeclareGraphicsExtensions| overwrites all previous +% definitions. It is not possible to add an extension to an +% existing list. +% +% Early versions of this package defined a default argument for this +% command. This has been removed. +% +% \DescribeMacro +% \DeclareGraphicsRule +% \marg{ext}\marg{type}\marg{read-file}\marg{command}\\ +% Any number of these declarations can be made. They determine how the +% system behaves when a file with extension \emph{ext} is specified. +% (The extension may be specified explicitly or, if the argument to +% |\includegraphics| does not have an extension, it may be a default +% extension from the \emph{ext-list} specified with +% |\DeclareGraphicsExtensions|.) +% +% \emph{ext} is the \emph{extension} of the file. Any file with this +% extension will be processed by this graphics rule. Normally a file +% with an extension for which no rule has been declared will generate an +% error, however you may use |*| as the extension to define a +% \emph{default rule}. For instance the |dvips| driver file declares all +% files to be of type |eps| unless a more specific rule is declared. +% +% Since Version v0.6, extensions should be specified including the |.| +% that is, |.eps| not |eps|. +% +% \emph{type} is the `type' of file involved. All files of the same type +% will be input with the same internal command (which must be defined in +% a `driver file'). For example files with extensions |ps|, |eps|, +% |ps.gz| may all be classed as type |eps|. +% +% \emph{read-file} determines the extension of the file that should be +% read to determine size information. It may be the same as \emph{ext} +% but it may be different, for example |.ps.gz| files are not readable +% easily by \TeX, so you may want to put the bounding box information in +% a separate file with extension |.ps.bb|. If \emph{read-file} is empty, +% |{}|, then the system will not try to locate an external file for size +% info, and the size must be specified in the arguments of +% |\includegraphics|. As a special case |*| may be used to denote the +% same extension as the graphic file. This is mainly of use in +% conjuction with using |*| as the extension, as in that case the +% particular graphic extension is not known. For example +%\begin{verbatim} +% \DeclareGraphicsRule{*}{eps}{*}{} +%\end{verbatim} +% This would declare a default rule, such that all unknown extensions +% would be treated as EPS files, and the graphic file would be read for +% a BoundingBox comment. +% +% If the driver file specifies a procedure for +% reading size files for \emph{type}, that will be used, otherwise the +% procedure for reading |eps| files will be used. Thus the size of +% bitmap files may be specified in a file with a PostScript style +% |%%BoundingBox| line, if no other specific format is available. +% +% \emph{command} is usually empty, but if non empty it is used in place +% of the filename in the |\special|. Within this argument, |#1| may be +% used to denote the filename. Thus using the dvips driver, one may +% use\\ +% |\DeclareGrahicsRule{.ps.gz}{eps}{.ps.bb}{`zcat #1}|\\ +% the final argument causes dvips to use the |zcat| command to unzip the +% file before inserting it into the PostScript output. +% +% \subsection{Rotation} +% +% \DescribeMacro +% \rotatebox\marg{angle}\marg{text}\\ +% Rotate \emph{text} \emph{angle} degrees anti-clockwise. Normally +% the rotation is about the left-hand end of the baseline of +% \emph{text}. +% +% \subsection{Scaling} +% +% \DescribeMacro +% \scalebox\marg{h-scale}\oarg{v-scale}\marg{text}\\ +% Scale \emph{text} by the specified amounts. If \emph{v-scale} is +% omitted, the vertical scale factor is the same as the horizontal one. +% +% \DescribeMacro +% \resizebox\star\marg{h-length}\marg{v-length}\marg{text}\\ +% Scale \emph{text} so that the width is \emph{h-length}. +% If |!| is used as either length argument, the other argument is used +% to determine a scale factor that is used in both directions. +% Normally \emph{v-length} refers to the height of the box, but in the +% star form, it refers to the `height + depth'. +% As normal for \LaTeXe\ box length arguments, |\height|, +% |\width|, |\totalheight| and |\depth| may be used to refer to the +% original size of the box. +% +% \section{The Key=Value Interface} +% As mentioned in the introduction, apart from the above `standard +% interface', there is an alternative syntax to the |\includegraphics| +% and |\rotatebox| commands that some people may prefer. It is provided +% by the accompanying |graphicx| package. +% +% \StopEventually{} +% +% \section{The Graphics Kernel Functions} +% +% \subsection{Graphics Inclusion} +% +% \DescribeMacro +% {\Ginclude@graphics}\marg{file}\\ +% Insert the contents of the file \emph{file} at the current point. +% |\Ginclude@graphics| may use the four macros |\Gin@llx|, |\Gin@lly|, +% |\Gin@urx|, |\Gin@ury| to determine the `bounding box' of the graphic. +% The result will be a \TeX\ box of width $\mathit{urx}-\mathit{llx}$ +% and height $\mathit{ury}-\mathit{lly}$. If |\Gin@clip| is \meta{true} +% then part of the graphic that is outside this box should not be +% displayed. (Not all drivers can support this `clipping'.) Normally all +% these parameters are set by the `user interface level'. +% +% +% \DescribeMacro +% {\Gread@eps}\marg{file}\\ +% For each \emph{type} of graphics file supported, the driver file must +% define |\Ginclude@|\emph{type} and, optionally |\Gread@|\emph{type}. +% The read command is responsible for obtaining size information from +% the file specified in the |\DeclareGraphicsRule| command. However the +% kernel defines a function, |\Gread@eps|, which can read PostScript +% files to find the +% |%%BoundingBox| comment. This function will be used for any type for +% which a specific function has not been declared. |\Gread@eps| accepts +% a generalised version of the bounding box comment. \TeX\ units may be +% used (but there must be no space before the unit). If the unit is +% omitted |bp| is assumed. So\\ +% |%%BoundingBox 0 0 2in 3in|\\ +% Would be accepted by this function, to produce a 2in wide, by 3in high +% graphic. +% +% \subsection{Rotation} +% +% \DescribeMacro +% {\Grot@box}\\ +% Rotate the contents of |\box0| through |\Grot@angle| degrees +% (anti-clockwise). The user-interface is responsible for setting the +% macro |\Grot@angle|, and putting the appropriate text in |\Grot@box|. +% +% \subsection{Scaling} +% +% \DescribeMacro +% {\Gscale@box}\marg{xscale}\oarg{yscale}\marg{text}\\ +% (The second argument is not optional.) +% Scale \emph{text} by the appropriate scale factors. +% +% \DescribeMacro +% {\Gscale@box@dd}\marg{dima}\marg{dimb}\marg{text}\\ +% Scale \emph{text} in both directions by a factor +% \emph{dima}/\emph{dimb}. +% +% \DescribeMacro +% {\Gscale@box@dddd} +% \marg{dima}\marg{dimb}\marg{dimc}\marg{dimd}\marg{text}\\ +% Scale \emph{text} in horizontally by a factor \emph{dima}/\emph{dimb}, +% and vertically by a factor of \emph{dimc}/\emph{dimd}. +% +% \DescribeMacro +% {\Gscale@div}\marg{cmd}\marg{dima}\marg{dimb}\\ +% Define the macro \emph{cmd} to be the ratio of the lengths +% \emph{dima}/\emph{dimb}. +% +% +% \section{Interface to the Driver Files} +% +% \subsection{Graphics Inclusion} +% +% Each driver file must declare that its driver can include graphics of +% certain \emph{types}. It does this by declaring for each type a +% command of the form:\\ +% |\Ginclude@|\emph{type}\\ +% The Graphics kernel function will call this driver-defined function +% with the filename as argument, and certain additional information will +% be provided as follows.: +% +% \noindent\begin{tabular}{p{.4\textwidth}p{.5\textwidth}} +% |\Gin@llx|, |\Gin@lly|,\newline +% |\Gin@urx|, |\Gin@ury| &Macros storing the `bounding box'\\ +% |\Gin@nat@width|\newline |\Gin@nat@height| & +% Registers storing the natural size.\\ +% |\Gin@req@width|\newline |\Gin@req@height| & +% Registers storing the required size, after scaling.\\ +% |\Gin@scalex|, |\Gin@scaley| & macros with the scale factors. A value +% of |!| means: Scale by the same amount as the other direction.\\ +% |\ifGin@clip| & |\newif| token, true if the graphic should be +% `clipped' to the bounding box. +% \end{tabular} +% +% Optionally the driver may define a command of the form:\\ +% |\Gread@|\emph{type}\\ +% This is responsible for reading an external file to find the bounding +% box information. If such a command is not declared, but a read-file is +% specified the command |\Gread@eps|, which is defined in the Graphics +% Kernel will be used. +% +% \subsection{Literal Postscript} +% Drivers that are producing PostScript output may want to define +% the following macros. They each take one argument which should be +% passed to an appropriate special. They are not used directly by this +% package but allow other packages to use the standard configuration +% file and package options to customise to various drivers:\\ +% |\Gin@PS@raw|, Literal PostScript special.\\ +% |\Gin@PS@restored|, Literal PostScript special, the driver will +% surround this with a save-restore pair.\\ +% |\Gin@PS@literal@header|, Postscript to be inserted in the header +% section of the PostScript file.\\ +% |\Gin@PS@file@header|, external file to be inserted in the header +% section of the PostScript file. +% +% +% \subsection{Rotation} +% +% |\Grot@start|, |\Grot@end| These macros must be defined to insert the +% appropriate |\special| to rotate the text between them by +% |\Grot@angle| degrees. The kernel function will make sure that the +% correct \TeX\ spacing is produced, these functions only need insert +% the |\special|. +% +% \subsection{Scaling} +% +% |\Gscale@start|, |\Gscale@end|, as for rotation, but here scale the +% text by |\Gscale@x| and |\Gscale@y|. +% +% +% \section{Implementation} +% +% \begin{macrocode} +%<*package> +% \end{macrocode} +% +% \subsection{Initialisation} +% +% \begin{macro}{\Gin@codes} +% First we save the catcodes of some characters, and set them to +% fixed values whilst this file is being read. +% \changes{v0.5a}{1994/07/20} +% {Save and restore catcodes} +% \begin{macrocode} +\edef\Gin@codes{% + \catcode`\noexpand\^^A\the\catcode`\^^A\relax + \catcode`\noexpand\"\the\catcode`\"\relax + \catcode`\noexpand\*\the\catcode`\*\relax + \catcode`\noexpand\!\the\catcode`\!\relax + \catcode`\noexpand\:\the\catcode`\:\relax} +% \end{macrocode} +% +% \begin{macrocode} +\catcode`\^^A=\catcode`\% +\@makeother\"% +\catcode`\*=11 +\@makeother\!% +\@makeother\:% +% \end{macrocode} +% \end{macro} +% +% We will need to have an implementation of the trigonometric +% functions for the rotation feature. May as well load it now. +% \begin{macrocode} +\RequirePackage{trig} +% \end{macrocode} +% +% \begin{macro}{\Grot@start} +% \begin{macro}{\Grot@end} +% Initialise the rotation primitives. +% \begin{macrocode} +\providecommand\Grot@start{\@latex@error{Rotation not supported}\@ehc + \global\let\Grot@start\relax} +\providecommand\Grot@end{} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Gscale@start} +% \begin{macro}{\Gscale@end} +% Initialise the scaling primitives. +% \begin{macrocode} +\providecommand\Gscale@start{\@latex@error{Scaling not supported}\@ehc + \global\let\Gscale@start\relax} +\providecommand\Gscale@end{} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Gread@BBox} +% \changes{v1.0b}{1996/10/29} +% {Moved to initial section, for hiresbb option} +% |%%BoundingBox| as a macro for testing with |\ifx|. +% This may be redefined by the hiresbb option. +% \begin{macrocode} +\edef\Gread@BBox{\@percentchar\@percentchar BoundingBox} +% \end{macrocode} +% \end{macro} +% +% \subsection{Options} +% +% \begin{option}{draft} +% \begin{option}{final} +% \changes{v0.3i}{1994/03/23} +% {notdraft option added} +% \changes{v0.4a}{1994/04/13} +% {Rename option to nodraft} +% \changes{v0.4d}{1994/05/06} +% {Rename option to final} +% \begin{macrocode} +\DeclareOption{draft}{\Gin@drafttrue} +\DeclareOption{final}{\Gin@draftfalse} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{macro}{\ifGin@draft} +% True in draft mode. +% \begin{macrocode} +\newif\ifGin@draft +% \end{macrocode} +% \end{macro} +% +% \begin{option}{hiresbb} +% \changes{v1.0b}{1996/10/29} +% {hiresbb option added} +% If given this option the package will look for bounding box comments +% of the form |%%HiResBoundingBox| (which typically have real values) +% instead of the standard |%%BoundingBox| (which should have integer +% values). +% \begin{macrocode} +\DeclareOption{hiresbb}{% + \edef\Gread@BBox{\@percentchar\@percentchar HiResBoundingBox}} +% \end{macrocode} +% \end{option} +% +% \begin{macro}{\Gin@driver} +% Driver in use. +% \begin{macrocode} +\providecommand\Gin@driver{} +% \end{macrocode} +% \end{macro} +% +% \begin{option}{dvips} +% \changes{v0.3g}{1994/03/15} +% {Use dvips def file not development version} +% \begin{option}{xdvi} +% Tomas Rockiki's PostScript driver (unix, MSDOS, VMS\ldots). +% The |X11| previewer |xdvi| supports basically the same set of +% |\specials|. +% \begin{macrocode} +\DeclareOption{dvips}{\def\Gin@driver{dvips.def}} +\DeclareOption{xdvi}{\ExecuteOptions{dvips}} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{option}{dvipdf} +% \changes{v1.0c}{1996/10/31} +% {dvipdf added} +% Sergey Lesenko's dvipdf driver. +% \begin{macrocode} +\DeclareOption{dvipdf}{\def\Gin@driver{dvipdf.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{dvipdfm} +% \changes{v1.0k}{1999/01/13} +% {dvipdfm added} +% Mark Wick's dvipdfm driver. +% \begin{macrocode} +\DeclareOption{dvipdfm}{\def\Gin@driver{dvipdfm.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{pdftex} +% \changes{v1.0d}{1997/06/07} +% {pdftex added} +% Han The Thanh's \TeX\ variant. +% \begin{macrocode} +\DeclareOption{pdftex}{\def\Gin@driver{pdftex.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{dvipsone} +% \begin{option}{dviwindo} +% \changes{v0.3c}{1994/03/04} +% {dviwindo support.} +% \changes{v0.7c}{1995/09/07} +% {Merge dviwindo option with dvipsone} +% The drivers for the Y\&Y \TeX\ system. +% \begin{macrocode} +\DeclareOption{dvipsone}{\def\Gin@driver{dvipsone.def}} +\DeclareOption{dviwindo}{\ExecuteOptions{dvipsone}} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{option}{emtex} +% \begin{option}{dviwin} +% Two freely available sets of drivers for MSDOS, OS/2 and Windows. +% \begin{macrocode} +\DeclareOption{emtex}{\def\Gin@driver{emtex.def}} +\DeclareOption{dviwin}{\def\Gin@driver{dviwin.def}} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{option}{oztex} +% \changes{v1.0f}{1997/09/09} +% {Merge dvips and oztex options} +% Oz\TeX\ (Macintosh). +% Since release 3 of Oz\TeX, merge with dvips back end. +% \begin{macrocode} +\DeclareOption{oztex}{\ExecuteOptions{dvips}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{textures} +% Textures (Macintosh). +% \begin{macrocode} +\DeclareOption{textures}{\def\Gin@driver{textures.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{pctexps} +% \begin{option}{pctexwin} +% \begin{option}{pctexhp} +% \begin{option}{pctex32} +% \changes{v1.0b}{1996/10/29} +% {pctex32 option added} +% PC\TeX\ (MSDOS/Windows) . +% \begin{macrocode} +\DeclareOption{pctexps}{\def\Gin@driver{pctexps.def}} +\DeclareOption{pctexwin}{\def\Gin@driver{pctexwin.def}} +\DeclareOption{pctexhp}{\def\Gin@driver{pctexhp.def}} +\DeclareOption{pctex32}{\def\Gin@driver{pctex32.def}} +% \end{macrocode} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% +% \begin{option}{truetex} +% \changes{v1.0b}{1996/10/29} +% {truetex and tcidef options added} +% \begin{option}{tcidvi} +% Kinch TrueTeX, and its version with extended special support as +% shipped by Scientific Word. +% \begin{macrocode} +\DeclareOption{truetex}{\def\Gin@driver{truetex.def}} +\DeclareOption{tcidvi}{\def\Gin@driver{tcidvi.def}} +% \end{macrocode} +% \end{option} +% \end{option} +% +% \begin{option}{vtex} +% \changes{v1.0h}{1998/05/27} +% {vtex option added} +% V\TeX\ driver. +% \begin{macrocode} +\DeclareOption{vtex}{\def\Gin@driver{vtex.def}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{dvi2ps} +% \begin{option}{dvialw} +% \begin{option}{dvilaser} +% \begin{option}{dvitops} +% \begin{option}{psprint} +% \begin{option}{pubps} +% \begin{option}{ln} +% \changes{v0.6b}{1994/12/12} +% {ln support (untested)} +% \changes{v1.0b}{1996/10/29} +% {options for historic drivers depreciated} +% If \emph{anyone} is using any of these driver options +% would they let me know. All these are essentially untried +% and untested as far as I know. +% \begin{macrocode} +%\DeclareOption{dvi2ps}{\def\Gin@driver{dvi2ps.def}} +%\DeclareOption{dvialw}{\def\Gin@driver{dvialw.def}} +%\DeclareOption{dvilaser}{\def\Gin@driver{dvilaser.def}} +%\DeclareOption{dvitops}{\def\Gin@driver{dvitops.def}} +%\DeclareOption{psprint}{\def\Gin@driver{psprint.def}} +%\DeclareOption{pubps}{\def\Gin@driver{pubps.def}} +%\DeclareOption{ln}{\def\Gin@driver{ln.def}} +% \end{macrocode} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% \end{option} +% +% \begin{option}{debugshow} +% You probably don't want to use this\ldots +% \begin{macrocode} +\DeclareOption{debugshow}{\catcode`\^^A=9 \let\GDebug\typeout} +% \end{macrocode} +% \end{option} +% +% A local configuration file may define more options. +% It should also make one driver option the default, by calling +% |\ExecuteOptions| with the appropriate option. +% \changes{v0.4f}{1994/07/27} +% {Add missing 3rd argument to \cs{InputIfFileExists}} +% \begin{macrocode} +\InputIfFileExists{graphics.cfg}{}{} +% \end{macrocode} +% +% \begin{option}{hiderotate} +% \changes{v0.4a}{1994/04/13} +% {Rename option to hiderotate} +% \begin{macrocode} +\DeclareOption{hiderotate}{% + \def\Grot@start{\begingroup\setbox\z@\hbox\bgroup} + \def\Grot@end{\egroup\endgroup}} +% \end{macrocode} +% \end{option} +% +% \begin{option}{hidescale} +% \changes{v0.4a}{1994/04/13} +% {Rename option to hidescale} +% \begin{macrocode} +\DeclareOption{hidescale}{% + \def\Gscale@start{\begingroup\setbox\z@\hbox\bgroup} + \def\Gscale@end{\egroup\endgroup}} +% \end{macrocode} +% \end{option} +% +% After the options are processed, load the appropriate driver file. +% If a site wants a default driver (eg |textures|) it just needs to put +% |\ExecuteOptions{textures}| in a |graphics.cfg| file. +% \begin{macrocode} +\ProcessOptions +% \end{macrocode} +% +% Check that a driver has been specified (either as an option, or as a +% default option in the configuration file). Then load the `def' file +% for that option, if it has not already been loaded by some other +% package (for instance the \textsf{color} package). +% \changes{v0.5c}{1994/10/03} +% {Error if no driver specified} +% \begin{macrocode} +\if!\Gin@driver! + \PackageError{graphics} + {No driver specified} + {You should make a default driver option in a file \MessageBreak + graphics.cfg\MessageBreak + eg: \protect\ExecuteOptions{textures}% + } +\else + \PackageInfo{graphics}{Driver file: \Gin@driver} + \@ifundefined{ver@\Gin@driver}{\input{\Gin@driver}}{} +\fi +% \end{macrocode} +% +% +% \subsection{Graphics Inclusion} +% +% This Graphics package uses a lot of dimension registers. \TeX\ only +% has a limited number of registers, so rather than allocate new ones, +% re-use some existing \LaTeX\ registers. This is safe as long as all +% uses of the registers are \emph{local}, and that you can be sure +% that you \emph{never} need to have access to both uses within the +% same scope. +% +% \begin{macro}{\Gin@llx} +% \begin{macro}{\Gin@lly} +% \begin{macro}{\Gin@urx} +% \begin{macro}{\Gin@ury} +% In fact these four lengths are now stored as macros not as dimen +% registers, mainly so that integer |bp| lengths may be passed exactly. +% \changes{v0.7a}{1995/04/11} +% {Bounding box coords no longer in registers} +% \begin{macrocode} +\def\Gin@llx{0} +\let\Gin@lly\Gin@llx +\let\Gin@urx\Gin@llx +\let\Gin@ury\Gin@llx +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Gin@nat@width} +% \begin{macro}{\Gin@nat@height} +% The `natural' size of the graphic, before any scaling. +% \begin{macrocode} +\let\Gin@nat@width\leftmarginv +\let\Gin@nat@height\leftmarginvi +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\ifGin@clip} +% This switch is \meta{true} if any graphics outside the specified +% bounding box (really viewport) should not be printed. +% \begin{macrocode} +\newif\ifGin@clip +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\DeclareGraphicsExtensions} +% \changes{v0.6a}{1994/11/29} +% {Remove optional argument, ignore spaces in main argument.} +% Declare a comma separated list of default extensions to be used +% if the file is specified with no extension. +% \begin{macrocode} +\newcommand\DeclareGraphicsExtensions[1]{% + \edef\Gin@extensions{\zap@space#1 \@empty}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@extensions} +% Initialise the list of possible extensions. +% \changes{v0.4b}{1994/04/20} +% {Use \cmd{\providecommand} in case a previous def file has +% already defined it} +% \begin{macrocode} +\providecommand\Gin@extensions{} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\includegraphics} +% Top level command for the standard interface, just look for a |*|. +% \begin{macrocode} +\def\includegraphics{% + \@ifstar + {\Gin@cliptrue\Gin@i}% + {\Gin@clipfalse\Gin@i}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@i} +% If an optional argument is present, call |\Gin@ii| to process it, +% otherwise call |\Ginclude@graphics|. +% \changes{v0.3e}{1994/03/09} +% {Now specify ll before ur coordinate} +% \begin{macrocode} +\def\Gin@i{% + \@ifnextchar[%] + \Gin@ii + {\Gin@bboxfalse\Ginclude@graphics}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@ii} +% Look for a second optional argument. +% \begin{macrocode} +\def\Gin@ii[#1]{% + \@ifnextchar[%] + {\Gin@iii[#1]} + {\Gin@iii[0,0][#1]}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@iii} +% Set the cordinates of the {\bfseries l}lower {\bfseries l}eft corner, +% and the cordinates of the {\bfseries u}pper {\bfseries r}ight +% corner. The cordinates may be any \TeX\ dimension, defaulting to |bp|. +% \changes{v0.6c}{1994/12/15} +% {(Denis Roegel) Extra group to keep bb settings local} +% \begin{macrocode} +\def\Gin@iii[#1,#2][#3,#4]#5{% + \begingroup + \Gin@bboxtrue + \Gin@defaultbp\Gin@llx{#1}% + \Gin@defaultbp\Gin@lly{#2}% + \Gin@defaultbp\Gin@urx{#3}% + \Gin@defaultbp\Gin@ury{#4}% + \Ginclude@graphics{#5}% + \endgroup} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@defaultbp} +% \changes{v0.7a}{1995/04/11}{Macro added} +% \begin{macro}{\Gin@def@bp} +% \changes{v0.7a}{1995/04/11}{Macro added} +% This macro grabs a length, |#2|, which may or may not have a unit, +% and if a unit is supplied, converts to `bp' and stores the value in +% |#1|. If a unit is not supplied `bp' is assumed, and |#2| is directly +% stored in |#1|. Note that supplying `bp' is not quite the same as +% supplying no units, as in the former case a convertion via `pt' and +% back to `bp' takes place which can introduce rounding error. The error +% is invisibly small but files conforming to Adobe DSC should have +% \emph{integer} Bounding Box Coordinates, and conceivably some drivers +% might demand integer values. +% (Although most seem to accept real values (if they accept bounding box +% coordinates at all) in the |\special|. This is the reason why the +% mechanism uses |\def| and not \TeX\ lengths, as in earlier releases of +% the package. +% \begin{macrocode} +\def\Gin@defaultbp#1#2{% + \afterassignment\Gin@def@bp\dimen@#2bp\relax{#1}{#2}} +% \end{macrocode} +% +% \begin{macrocode} +\def\Gin@def@bp#1\relax#2#3{% + \if!#1!% + \def#2{#3}% + \else + \dimen@.99626\dimen@ + \edef#2{\strip@pt\dimen@}% + \fi} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\DeclareGraphicsRule} +% Declare what actions should be taken for a particular file +% extension. +% +% |#1| extension, |#2| type, |#3| read-file, |#4| command, +% \changes{v0.5d}{1994/10/24} +% {(Arthur Ogawa) Check arg3 is *, not arg2.} +% \begin{macrocode} +\def\DeclareGraphicsRule#1#2#3#4{% + \edef\@tempa{\string *}\def\@tempb{#3}% + \expandafter\edef\csname Gin@rule@#1\endcsname##1% + {{#2}% + {\ifx\@tempa\@tempb\noexpand\Gin@ext\else#3\fi}% + {\ifx\indent#4\indent##1\else#4\fi}}} +% \end{macrocode} +% \end{macro} +% +% An example rule base. +%\begin{verbatim} +% ext type read command +% \DeclareGrahicsRule{.ps} {eps} {.ps} {} +% \DeclareGrahicsRule{.eps} {eps} {.eps} {} +% \DeclareGrahicsRule{.ps.gz}{eps} {.ps.bb} {`zcat #1} +% \DeclareGrahicsRule{.pcx} {bmp} {} {} +%\end{verbatim} +% +% \begin{macro}{\graphicspath} +% User level command to set the input path for graphics files. +% A list of directories, each in a |{}| group. +% \begin{macrocode} +\def\graphicspath#1{\def\Ginput@path{#1}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Ginput@path} +% The default graphic path is |\input@path|. +% \begin{macrocode} +\ifx\Ginput@path\@undefined + \let\Ginput@path\input@path +\fi +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@getbase} +% \changes{v0.6a}{1994/11/29} +% {remove \cs{Gin@sep}} +% Given a possible extension, |#1|, check whether the file exists. If +% it does set |\Gin@base| and |\Gin@ext| to the filename stripped of +% the extension, and the extension, respectively. +% \begin{macrocode} +\def\Gin@getbase#1{% + \edef\Gin@tempa{% + \def\noexpand\@tempa####1#1\space{% + \def\noexpand\Gin@base{####1}}}% + \IfFileExists{\filename@area\filename@base#1}% + {\Gin@tempa + \expandafter\@tempa\@filef@und + \edef\Gin@ext{#1}}{}}% +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@ext} +% Initialise the macro to hold the extension. +% \begin{macrocode} +\let\Gin@ext\relax +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@sepdefault} +% \changes{v0.6a}{1994/11/29} +% {remove \cs{Gin@sep}} +% This must match the token used by |\filename@parse| to delimit the +% extension. +% \begin{macrocode} +\def\Gin@sepdefault{.} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Ginclude@graphics} +% The main internal function implementing graphics file inclusion. +% |#1| is the file name. +% \changes{v0.4c}{1994/04/28} +% {Improve the wording of error messages} +% \changes{v0.5a}{1994/07/20} +% {Add default (*) rule possibility} +% \changes{v0.6a}{1994/11/29} +% {remove \cs{Gin@sepdefault}} +% \begin{macrocode} +\def\Ginclude@graphics#1{% + \begingroup + \let\input@path\Ginput@path + \filename@parse{#1}% + \ifx\filename@ext\relax + \@for\Gin@temp:=\Gin@extensions\do{% + \ifx\Gin@ext\relax + \Gin@getbase\Gin@temp + \fi}% + \else + \Gin@getbase{\Gin@sepdefault\filename@ext}% +% \end{macrocode} +% \changes{v0.4d}{1994/05/06} +% {Make file not found a warning not an error} +% \changes{v0.6a}{1994/11/29} +% {remove \cs{Gin@sep}} +% If the user supplied an explicit extension, just give a warning if the +% file does not exist. (It may be created later.) +% \begin{macrocode} + \ifx\Gin@ext\relax + \@warning{File `#1' not found}% + \def\Gin@base{\filename@area\filename@base}% +% \end{macrocode} +% \changes{v0.6c}{1994/12/15} +% {(Piet van Oostrum) include `.' in \cs{Gin@ext}}% +% \begin{macrocode} + \edef\Gin@ext{\Gin@sepdefault\filename@ext}% + \fi + \fi +% \end{macrocode} +% If no extension is supplied, it is an error if the file does not +% exist, as there is no way for the system to know which extension to +% supply. +% \begin{macrocode} + \ifx\Gin@ext\relax + \@latex@error{File `#1' not found}% + {I could not locate the file with any of these extensions:^^J% + \Gin@extensions^^J\@ehc}% + \else + \@ifundefined{Gin@rule@\Gin@ext}% +% \end{macrocode} +% \changes{v0.5a}{1994/07/20} +% {Add default (*) rule possibility} +% Handle default rule. +% \begin{macrocode} + {\ifx\Gin@rule@*\@undefined + \@latex@error{Unknown graphics extension: \Gin@ext}\@ehc + \else + \expandafter\Gin@setfile\Gin@rule@*{\Gin@base\Gin@ext}% + \fi}% + {\expandafter\expandafter\expandafter\Gin@setfile + \csname Gin@rule@\Gin@ext\endcsname{\Gin@base\Gin@ext}}% + \fi + \endgroup} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\ifGread@} +% True if a file should be read to obtain the natural size. +% \begin{macrocode} +\newif\ifGread@\Gread@true +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@setfile} +% Set a file to the size specified in arguments, or in a `read file'. +% \changes{v0.5d}{1994/10/24} +% {(Arthur Ogawa) Add missing \cs{expandafter}} +% \begin{macrocode} +\def\Gin@setfile#1#2#3{% + \ifx\\#2\\\Gread@false\fi + \ifGin@bbox\else + \ifGread@ + \csname Gread@% + \expandafter\ifx\csname Gread@#1\endcsname\relax + eps% + \else + #1% + \fi + \endcsname{\Gin@base#2}% + \else +% \end{macrocode} +% \changes{v0.5a}{1994/07/20} +% {New error trap for missing size arguments} +% \changes{v0.7f}{1995/11/10} +% {Use \cs{Gin@nosize}} +% By now the natural size should be known either from arguments or +% from the file. If not generate an error. (The \textsf{graphicx} +% interface relaxes this condition slightly.) +% \begin{macrocode} + \Gin@nosize{#3}% + \fi + \fi +% \end{macrocode} +% \changes{v0.7a}{1995/04/11}{\cs{Gin@viewport@code} added.} +% The following call will modify the `natural size' if the user has +% supplied a viewport or trim specification. (Not available in the +% standard interface.) +% \begin{macrocode} + \Gin@viewport@code +% \end{macrocode} +% Save the natural size, and then call |\Gin@req@sizes| whic (in the +% key-val interface) will calculate the required size from the natural +% size, and any scaling info. +% \begin{macrocode} + \Gin@nat@height\Gin@ury bp% + \advance\Gin@nat@height-\Gin@lly bp% + \Gin@nat@width\Gin@urx bp% + \advance\Gin@nat@width-\Gin@llx bp% + \Gin@req@sizes +% \end{macrocode} +% +% Call |\Ginclude@|\emph{type} to include the figure unless +% this is not defined, or draft mode is being used. +% \changes{v0.7h}{1996/02/20} +% {missing \texttt{@} added in \texttt{Gread@} csnames} +% \begin{macrocode} + \expandafter\ifx\csname Ginclude@#1\endcsname\relax + \Gin@drafttrue + \expandafter\ifx\csname Gread@#1\endcsname\relax + \@latex@error{Can not include graphics of type: #1}\@ehc + \global\expandafter\let\csname Gread@#1\endcsname\@empty + \fi + \fi + \leavevmode + \ifGin@draft + \hb@xt@\Gin@req@width{% + \vrule\hss + \vbox to \Gin@req@height{% + \hrule \@width \Gin@req@width + \vss + \edef\@tempa{#3}% + \rlap{ \ttfamily\expandafter\strip@prefix\meaning\@tempa}% + \vss + \hrule}% + \hss\vrule}% + \else +% \end{macrocode} +% \changes{v0.3i}{1994/3/23} +% {Add file list info} +% Support |\listfiles| and then set the final box to the required size. +% \begin{macrocode} + \@addtofilelist{#3}% + \ProvidesFile{#3}[Graphic file (type #1)]% + \setbox\z@\hbox{\csname Ginclude@#1\endcsname{#3}}% + \dp\z@\z@ + \ht\z@\Gin@req@height + \wd\z@\Gin@req@width + \box\z@ + \fi} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\Gin@exclamation} +% \changes{v0.7g}{1995/12/06}{Macro added} +% Catcode 12 |!|, in case of French, or other language styles. +% \begin{macrocode} +\def\Gin@exclamation{!} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@req@sizes} +% \begin{macro}{\Gin@scalex} +% \begin{macro}{\Gin@scaley} +% \begin{macro}{\Gin@req@height} +% \begin{macro}{\Gin@req@width} +% In the standard interface there is no scaling, so the required size +% is the same as the natural size. In other interfaces |\Gin@req@sizes| +% will be responsible for setting these parameters. Here we can set them +% globally. +% \changes{v0.3g}{1994/03/15} +% {Initialise y-scale to !!} +% \changes{v1.0g}{1998/05/14} +% {Fix !! usage in changes entries. graphics/2724} +% \begin{macrocode} +\let\Gin@req@sizes\relax +\def\Gin@scalex{1}% +\let\Gin@scaley\Gin@exclamation +\let\Gin@req@height\Gin@nat@height +\let\Gin@req@width\Gin@nat@width +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Gin@viewport@code} +% In the standard interface there is no possibility of specifying +% a viewport, so this is a no-op. +% \changes{v0.7a}{1995/04/11}{Macro added} +% \begin{macrocode} +\let\Gin@viewport@code\relax +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@nosize} +% \changes{v0.7f}{1995/11/10} +% {Macro added} +% This command is called in the case that the graphics type +% specifies no `read file' and the user supplied no size arguments. +% In the standard interface can only generate an error. +% \begin{macrocode} +\def\Gin@nosize#1{% + \@latex@error + {Cannot determine size of graphic in #1 (no size specifed)}% + \@ehc} +% \end{macrocode} +% \end{macro} +% +% \subsection{Reading the BoundingBox in EPS files} +% +% \begin{macro}{\ifGin@bbox} +% \changes{v0.7a}{1995/04/11}{Name changed from \cs{ifGin@viewport}} +% This switch should be set \meta{true} once a size has been found, +% either in an argument, or in an external file. +% \begin{macrocode} +\newif\ifGin@bbox +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gread@eps} +% Read an EPS file (|#1|) and search for a line +% starting with |%%BoundingBox| and returns the result +% by setting four dimension registers +% |\Gin@llx|, |\Gin@lly|, |\Gin@urx| and |\Gin@ury|. +% \changes{v0.5e}{1994/1l/02} +% {Fix the catcodes of \cs{endlinechar} and ctrl-D} +% \changes{v0.7a}{1995/04/11} +% {Fix more catcodes, for binary headers of eps files} +% \begin{macrocode} +\def\Gread@eps#1{% + \begingroup +% \end{macrocode} +% Make it reasonably safe to have binary headers in the EPS file +% before the bounding box line. +% \begin{macrocode} + \@tempcnta\z@ + \loop\ifnum\@tempcnta<\@xxxii + \catcode\@tempcnta14 % + \advance\@tempcnta\@ne + \repeat + \catcode`\^^?14 % + \let\do\@makeother + \dospecials +% \end{macrocode} +% Make sure tab and space are accepted as white space. +% \changes{v1.0e}{1997/09/02} +% {Allow TAB in DSC comments graphics/2587} +% \changes{v1.0i}{1999/01/07} +% {Fix catcode of hyphen. graphics/2846} +% \begin{macrocode} + \catcode`\ 10 % + \catcode`\^^I10 % + \catcode\endlinechar5 % + \@makeother\:% + \@makeother\-% +% \end{macrocode} +% The first thing we need to do is to open the +% information file, if possible. +% \changes{v0.4d}{1994/05/06} +% {Improve the error message if the info file is not there.} +% \begin{macrocode} + \immediate\openin\@inputcheck#1 % + \ifeof\@inputcheck + \@latex@error{File `#1' not found}\@ehc + \else +% \end{macrocode} +% Now we'll scan lines until we find one that starts with +% |%%BoundingBox:| +% We need to reset the catcodes to read the file, and so this +% is done in a group. +% \begin{macrocode} + \Gread@true + \let\@tempb\Gread@false + \loop + \read\@inputcheck to\@tempa + \ifeof\@inputcheck + \Gread@false + \else + \expandafter\Gread@find@bb\@tempa:.\\% + \fi + \ifGread@ + \repeat + \immediate\closein\@inputcheck + \fi +% \end{macrocode} +% \changes{v0.3i}{1994/03/23} +% {Wording of error message improved} +% \changes{v1.0}{1996/05/29} +% {Use \cs{@gtempa} not \cs{g@tempa} /2090} +% \begin{macrocode} + \ifGin@bbox\else + \@latex@error + {Cannot determine size of graphic in #1 (no BoundingBox)}% + \@ehc + \gdef\@gtempa{0 0 72 72 }% + \fi + \endgroup + \expandafter\Gread@parse@bb\@gtempa\\} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gread@find@bb} +% If a line in the EPS file starts with a |%%BoundingBox:|, we +% will examine it more closely. Note using the `extra' argument |#2#3| +% causes any space after the |:| to be gobbled. +% \begin{macrocode} +\long\def\Gread@find@bb#1:#2#3\\{% + \def\@tempa{#1}% + \ifx\@tempa\Gread@BBox + \Gread@test@atend#2#3()\\% + \fi} +% \end{macrocode} +% \end{macro} +% \begin{macro}{\Gread@test@atend} +% Determine if the stuff following the |%%BoundingBox| is `(atend)', +% which will involve further reading of the file. This is accomplished +% by making |\@tempb| into a no-op, so that finding a |%%BoundingBox| +% does not stop the loop. +% \begin{macrocode} +\def\Gread@test@atend#1(#2)#3\\{% + \def\@tempa{#2}% + \ifx\@tempa\Gread@atend + \Gread@true + \let\@tempb\relax + \else + \gdef\@gtempa{#1}% + \@tempb + \Gin@bboxtrue + \fi} +% \end{macrocode} +% \end{macro} +% \begin{macro}{\Gread@parse@bb} +% We have |%%BoundingBox| and what follows is not `(atend)' so we +% will parse the rest of the line as a BB with four elements. +% PostScript files should never have units specified in the +% BoundingBox comment, but we allow arbitrary \TeX\ units in external +% files, or in other interfaces. +% \begin{macrocode} +\def\Gread@parse@bb#1 #2 #3 #4 #5\\{% + \Gin@defaultbp\Gin@llx{#1}% + \Gin@defaultbp\Gin@lly{#2}% + \Gin@defaultbp\Gin@urx{#3}% + \Gin@defaultbp\Gin@ury{#4}}% +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gread@atend} +% |atend| as a macro for testing with |\ifx|. +% \begin{macrocode} +\def\Gread@atend{atend} +% \end{macrocode} +% \end{macro} +% +% +% \subsection{Rotation} +% +% As above, we will re-use some existing local registers. +% +% \begin{macro}{\Grot@height} +% \begin{macro}{\Grot@left} +% \begin{macro}{\Grot@right} +% \begin{macro}{\Grot@depth} +% Final Rotated box dimensions +% \begin{macrocode} +\let\Grot@height\@ovxx +\let\Grot@left\@ovyy +\let\Grot@right\@ovdx +\let\Grot@depth\@ovdy +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Grot@h} +% \begin{macro}{\Grot@l} +% \begin{macro}{\Grot@r} +% \begin{macro}{\Grot@d} +% Original box dimensions +% \begin{macrocode} +\let\Grot@l\@ovro +\let\Grot@r\@ovri +\let\Grot@h\@xdim +\let\Grot@d\@ydim +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Grot@x} +% \begin{macro}{\Grot@y} +% Coordinates of centre of rotation. +% \begin{macrocode} +\let\Grot@x\@linelen +\let\Grot@y\@dashdim +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\rotatebox} +% The angle is specified by |#1|. The box to be rotated is |#2|. +% In the standard interface the centre of rotation is $(0,0)$. +% Then finally call |\Grot@box| to rotate the box. +% \changes{v0.3f}{1994/03/11}{Remove star form} +% \changes{v0.3h}{1994/03/17}{Fix Typo} +% \changes{v0.7a}{1995/04/11}{\cs{leavevmode} added graphics/1521} +% \changes{v1.0n}{2001/07/07} +% {Made long (CAR) graphics/2908 and 3345} +% \begin{macrocode} +\long\def\rotatebox#1#2{% + \leavevmode + \Grot@setangle{#1}% + \setbox\z@\hbox{{#2}}% + \Grot@x\z@ + \Grot@y\z@ + \Grot@box} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\Grot@setangle} +% Set the internal macro used by |\Grot@box|. In the standard +% interface this is trivial, but other interfaces may have more +% interesting definitions. For example: +%\begin{verbatim} +% \def\Grot@setangle#1{% +% \dimen@#1\p@ +% \dimen@-57.2968\dimen@ +% \edef\Grot@angle{\strip@pt\dimen@}} +%\end{verbatim} +% This would cause the argument of |\rotatebox| to be interpreted as +% an angle specified in \emph{radians}, \emph{clockwise}. +% \begin{macrocode} +\def\Grot@setangle#1{\edef\Grot@angle{#1}} +% \end{macrocode} +% \end{macro} +% +% \subsection{Deriving a `bounding box' for rotated object} +% We want to know the size of a `bounding box' enclosing the rotated +% box. +% We define two formulae (as \TeX\ macros) to work out the $x$ and $y$ +% coordinates of vertices of the rotated box +% in relation to its original coordinates (ie its width, height +% and depth). The box we visualize with vertices $B$, $C$, +% $D$ and $E$ is illustrated below. The vertex +% $S$ is the reference point on the baseline. $O$ is the centre of +% rotation, which in the standard interface is always $S$. +% +% \begin{center} +% \setlength{\unitlength}{3pt}% +% +% \begin{picture}(34,36)(12,44) +% \thicklines +% \put(20,52){\dashbox{1}(20,21){}} +% \put(20,80){\line(0,-1){36}} +% \put(12,58){\line(1, 0){34}} +% \put(41,59){A} +% \put(40,74){B} +% \put(21,74){C} +% \put(21,49){D} +% \put(40,49){E} +% \put(21,59){S} +% \put(33,65){O} +% \put(33,65){\circle*{1}} +% \end{picture} +% \end{center} +% +% The formulae are, for a point $P$ and angle $\alpha$: +%\[ +% \begin{array}{l} +% P'_x = P_x - O_x \\ +% P'_y = P_y - O_y \\ +% P''_x = ( P'_x \times \cos(\alpha)) - ( P'_y \times \sin(\alpha) ) \\ +% P''_y = ( P'_x \times \sin(\alpha)) + ( P'_y \times \cos(\alpha) ) \\ +% P'''_x = P''_x + O_x + L_x \\ +% P'''_y = P''_y + O_y +% \end{array} +% \] +% The `extra' horizontal translation $L_x$ at the end is calculated so +% that the leftmost point of the resulting box has $x$-coordinate $0$. +% This is desirable as \TeX\ boxes must have the reference point at +% the left edge of the box. +% +% \begin{macro}{\Grot@Px} +% Work out new $x$ coordinate of point after rotation. The parameters +% |#2| and |#3| are the original $x$ and $y$ coordinates of the point. +% The new $x$ coordinate is stored in |#1|. +% \begin{macrocode} +\def\Grot@Px#1#2#3{% + #1\Grot@cos#2% + \advance#1-\Grot@sin#3} +% \end{macrocode} +% \end{macro} +% \begin{macro}{\Grot@Py} +% Work out new $y$ coordinate of point after rotation. The parameters +% |#2| and |#3| are the original $x$ and $y$ coordinates of the point. +% The new $y$ coordinate is stored in |#1|. +% \begin{macrocode} +\def\Grot@Py#1#2#3{% + #1\Grot@sin#2% + \advance#1\Grot@cos#3} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Grot@box} +% This is the tricky bit. We can rotate the box, but then need +% to work out how much space to leave for it on the page. +% +% We simplify matters by working out first which quadrant we are in, and +% then picking just the right values. +% +% \begin{macrocode} +\def\Grot@box{% + \begingroup +% \end{macrocode} +% We are going to need to know the sine and cosine +% of the angle; simplest to calculate these now. +% \begin{macrocode} + \CalculateSin\Grot@angle + \CalculateCos\Grot@angle + \edef\Grot@sin{\UseSin\Grot@angle}% + \edef\Grot@cos{\UseCos\Grot@angle}% +^^A \GDebug{Rotate: angle \Grot@angle, sine is \Grot@sin, +^^A cosine is \Grot@cos}% +% \end{macrocode} +% Save the four extents of the original box. +% \begin{macrocode} + \Grot@r\wd\z@ \advance\Grot@r-\Grot@x + \Grot@l\z@ \advance\Grot@l-\Grot@x + \Grot@h\ht\z@ \advance\Grot@h-\Grot@y + \Grot@d-\dp\z@ \advance\Grot@d-\Grot@y +% \end{macrocode} +% Now a straightforward test to see which quadrant we are +% operating in; +% \begin{macrocode} + \ifdim\Grot@sin\p@>\z@ + \ifdim\Grot@cos\p@>\z@ +% \end{macrocode} +% First quadrant: +% Height=$By$, Right=$Ex$, Left=$Cx$, Depth=$Dy$ +% \begin{macrocode} + \Grot@Py\Grot@height \Grot@r\Grot@h%B + \Grot@Px\Grot@right \Grot@r\Grot@d%E + \Grot@Px\Grot@left \Grot@l\Grot@h%C + \Grot@Py\Grot@depth \Grot@l\Grot@d%D + \else +% \end{macrocode} +% Second quadrant: +% Height=$Ey$, Right=$Dx$, Left=$Bx$, Depth=$Cy$ +% \begin{macrocode} + \Grot@Py\Grot@height \Grot@r\Grot@d%E + \Grot@Px\Grot@right \Grot@l\Grot@d%D + \Grot@Px\Grot@left \Grot@r\Grot@h%B + \Grot@Py\Grot@depth \Grot@l\Grot@h%C + \fi + \else + \ifdim\Grot@cos\p@<\z@ +% \end{macrocode} +% Third quadrant: +% Height=$Dy$, Right=$Cx$, Left=$Ex$, Depth=$By$ +% \begin{macrocode} + \Grot@Py\Grot@height \Grot@l\Grot@d%D + \Grot@Px\Grot@right \Grot@l\Grot@h%C + \Grot@Px\Grot@left \Grot@r\Grot@d%E + \Grot@Py\Grot@depth \Grot@r\Grot@h%B + \else +% \end{macrocode} +% Fourth quadrant: +% Height=$Cy$, Right=$Bx$, Left=$Dx$, Depth=$Ey$ +% \begin{macrocode} + \Grot@Py\Grot@height \Grot@l\Grot@h%C + \Grot@Px\Grot@right \Grot@r\Grot@h%B + \Grot@Px\Grot@left \Grot@l\Grot@d%D + \Grot@Py\Grot@depth \Grot@r\Grot@d%E + \fi + \fi +% \end{macrocode} +% Now we should translate back by $(O_x,O_y)$, but \TeX\ can not really +% deal with boxes that do not have the reference point at the left edge. +% (Everything with a $-$ve $x$-coordinate would over-print earlier +% text). So we modify the horizontal translation so that the +% reference point as understood by \TeX\ \emph{is} at the left edge. +% This means that the `centre of rotation' is not fixed by |\rotatebox|, +% but typically moves horizontally. We also need to find the image of +% the original reference point, $S$, as that is where the rotation +% specials must be inserted. +% +% \begin{macrocode} + \advance\Grot@height\Grot@y + \advance\Grot@depth\Grot@y + \Grot@Px\dimen@ \Grot@x\Grot@y + \Grot@Py\dimen@ii \Grot@x\Grot@y + \dimen@-\dimen@ \advance\dimen@-\Grot@left + \dimen@ii-\dimen@ii \advance\dimen@ii\Grot@y +% \end{macrocode} +% +% \begin{macrocode} +^^A \GDebug{Rotate: (l,r,h,d)^^J% +^^A Original \the\Grot@l,\the\Grot@r,\the\Grot@h,\the\Grot@d,^^J% +^^A New..... \the\Grot@left,\the\Grot@right,% +^^A \the\Grot@height,\the\Grot@depth}% +% \end{macrocode} +% +% \begin{macrocode} + \setbox\z@\hbox{% + \kern\dimen@ + \raise\dimen@ii\hbox{\Grot@start\box\z@\Grot@end}}% + \ht\z@\Grot@height + \dp\z@-\Grot@depth + \advance\Grot@right-\Grot@left\wd\z@\Grot@right + \leavevmode\box\z@ + \endgroup} +% \end{macrocode} +% \end{macro} +% +% +% \subsection{Stretching and Scaling} +% +% +% \begin{macro}{\scalebox} +% The top level |\scalebox|. If the vertical scale factor is omitted it +% defaults to the horizontal scale factor, |#1|. +% \changes{v0.3d}{1994/03/06}{Better support for negative arguments.} +% \begin{macrocode} +\def\scalebox#1{% + \@ifnextchar[{\Gscale@box{#1}}{\Gscale@box{#1}[#1]}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gscale@box} +% Internal version of |\scalebox|. +% \changes{v0.7a}{1995/04/11} +% {\cs{leavevmode} moved earlier. graphics/1521} +% \changes{v1.0j}{1999/01/07} +% {made long. graphics/2908} +% \begin{macrocode} +\long\def\Gscale@box#1[#2]#3{% + \leavevmode + \def\Gscale@x{#1}\def\Gscale@y{#2}% + \setbox\z@\hbox{{#3}}% + \setbox\tw@\hbox{\Gscale@start\rlap{\copy\z@}\Gscale@end}% + \ifdim#2\p@<\z@ + \ht\tw@-#2\dp\z@ + \dp\tw@-#2\ht\z@ + \else + \ht\tw@#2\ht\z@ + \dp\tw@#2\dp\z@ + \fi + \ifdim#1\p@<\z@ + \hb@xt@-#1\wd\z@{\kern-#1\wd\z@\box\tw@\hss}% + \else + \wd\tw@#1\wd\z@ + \box\tw@ + \fi} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\reflectbox} +% Just an abbreviation for the appropriate scale to get reflection. +% \changes{v0.3e}{1994/03/09}{Macro added} +% \begin{macrocode} +\def\reflectbox{\Gscale@box-1[1]} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\resizebox} +% \changes{v0.3b}{1994/03/01}{Recode \cmd\resizebox.} +% \changes{v0.7b}{1995/04/27} +% {Add \cs{leavevmode} for graphics/1512} +% Look for a |*|, which specifies that a final vertical size refers to +% `height + depth' not just `height'. +% \begin{macrocode} +\def\resizebox{% + \leavevmode + \@ifstar{\Gscale@@box\totalheight}{\Gscale@@box\height}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gscale@@box} +% Look for the |!| in the arguments. +% \changes{v0.5a}{1994/07/20} +% {Support French active !!} +% \changes{v0.5d}{1994/10/24} +% {Correct the support for !!} +% \changes{v0.7g} +% {1995/12/06}{Use \cs{Gin@exclamation}} +% \begin{macrocode} +\def\Gscale@@box#1#2#3{% + \let\@tempa\Gin@exclamation + \expandafter\def\expandafter\@tempb\expandafter{\string#2}% + \expandafter\def\expandafter\@tempc\expandafter{\string#3}% + \ifx\@tempb\@tempa + \ifx\@tempc\@tempa + \toks@{\mbox}% + \else + \toks@{\Gscale@box@dd{#3}#1}% + \fi + \else + \ifx\@tempc\@tempa + \toks@{\Gscale@box@dd{#2}\width}% + \else + \toks@{\Gscale@box@dddd{#2}\width{#3}#1}% + \fi + \fi + \the\toks@} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gscale@box@dd} +% Scale the text |#3| in both directions by a factor $|#1|/|#2|$. +% \changes{v0.3i}{1994/03/23} +% {Missing percent added} +% \changes{v1.0i}{1999/01/07} +% {made long. graphics/2908} +% \begin{macrocode} +\long\def\Gscale@box@dd#1#2#3{% + \@begin@tempboxa\hbox{#3}% + \setlength\@tempdima{#1}% + \setlength\@tempdimb{#2}% + \Gscale@div\@tempa\@tempdima\@tempdimb + \Gscale@box\@tempa[\@tempa]{\box\@tempboxa}% + \@end@tempboxa} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gscale@box@dddd} +% Scale the text |#5| horizontally by a factor $|#1|/|#2|$ and +% vertically by a factor $|#3|/|#4|$. +% \changes{v0.3i}{1994/03/23} +% {Missing percent added} +% \changes{v0.7e}{1995/09/29} +% {Add \cs{ifGin@iso} code added} +% \changes{v1.0i}{1999/01/07} +% {made long. graphics/2908} +% \begin{macrocode} +\long\def\Gscale@box@dddd#1#2#3#4#5{% + \@begin@tempboxa\hbox{#5}% + \setlength\@tempdima{#1}% + \setlength\@tempdimb{#2}% + \Gscale@div\@tempa\@tempdima\@tempdimb + \setlength\@tempdima{#3}% + \setlength\@tempdimb{#4}% + \Gscale@div\@tempb\@tempdima\@tempdimb + \ifGin@iso + \ifdim\@tempa\p@>\@tempb\p@ + \let\@tempa\@tempb + \else + \let\@tempb\@tempa + \fi + \fi + \Gscale@box\@tempa[\@tempb]{\box\@tempboxa}% + \@end@tempboxa} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\ifGin@iso} +% If this flag is true, then specifying two lengths to |\resizebox| +% scales the box by the same factor in either direction, such that +% neither length \emph{exceeds} the stated amount. No user interface +% to this flag in the standard package, but it is used by the +% |keepaspectratio| key to |\includegraphics| in the \textsf{graphicx} +% package. +% \changes{v0.7e}{1995/09/29} +% {Maco added} +% \begin{macrocode} +\newif\ifGin@iso +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gscale@div} +% The macro |#1| is set to the ratio of the lengths |#2| and |#3|. +% \changes{v0.7a}{1995/04/11} +% {Add trap for division by 0} +% \changes{v0.7d}{1995/09/27} +% {Use \cs{setlength} to support calc package} +% \changes{v1.0a}{1996/09/16} +% {Stop infinite loop if 2nd arg zero. graphics/2259} +% \begin{macrocode} +\def\Gscale@div#1#2#3{% + \setlength\dimen@{#3}% + \ifdim\dimen@=\z@ + \PackageError{graphics}{Division by 0}\@eha + \dimen@#2% + \fi + \edef\@tempd{\the\dimen@}% + \setlength\dimen@{#2}% + \count@65536\relax + \ifdim\dimen@<\z@ + \dimen@-\dimen@ + \count@-\count@ + \fi + \ifdim\dimen@>\z@ + \loop + \ifdim\dimen@<8192\p@ + \dimen@\tw@\dimen@ + \divide\count@\tw@ + \repeat + \dimen@ii\@tempd\relax + \divide\dimen@ii\count@ + \divide\dimen@\dimen@ii + \fi + \edef#1{\strip@pt\dimen@}} +% \end{macrocode} +% \end{macro} +% +% Restore Catcodes +% \begin{macrocode} +\Gin@codes +\let\Gin@codes\relax +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \Finale +% diff --git a/Master/texmf-dist/source/latex/graphics/graphics.ins b/Master/texmf-dist/source/latex/graphics/graphics.ins new file mode 100644 index 00000000000..e991c95944c --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/graphics.ins @@ -0,0 +1,116 @@ +%% +%% 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. +%% + +% This file requires docstrip version 2.4 available from +% ftp.dante.de tex-archive/macros/latex/unpacked/docstrip.tex + +\input docstrip + + +\preamble +\endpreamble + +\keepsilent +\askforoverwritefalse + +\usedir{tex/latex/graphics} + +% The packages + +\generate{\file{graphics.sty}{\from{graphics.dtx}{package}}} + +\generate{\file{color.sty}{\from{color.dtx}{package}}} + +\generate{\file{graphicx.sty}{\from{graphicx.dtx}{package}}} + +\generate{\file{trig.sty}{\from{trig.dtx}{package}}} + +\generate{\file{keyval.sty}{\from{keyval.dtx}{package}}} + +\generate{\file{epsfig.sty}{\from{epsfig.dtx}{package}}} + +\generate{\file{pstcol.sty}{\from{pstcol.dtx}{package}}} + +\generate{\file{lscape.sty}{\from{lscape.dtx}{package}}} + + +%% Generate a `template' .def file as an example for a new driver. +%% (This is not set up yet.) +%%\generate{\file{template.def}{% +%% \from{drivers.dtx}{template}}} + + +% These ones probably work +\generate{% + \file{dvips.def}{% + \from{drivers.dtx}{dvips,color1,psrulesZ,dosrules,macrules}} + \file{dvipdf.def}{% + \from{drivers.dtx}{dvipdf,color1,psrulesZ}} + \file{dvipsone.def}{% + \from{drivers.dtx}{tiffrules,dvipsone,color1,dosrules,psrules}} + \file{dviwin.def}{% + \from{drivers.dtx}{dviwin,nops}} + \file{emtex.def}{% + \from{drivers.dtx}{emtex,dosrules,nops}} +% OzTeX (>3.0) uses dvips.def +% \file{oztex.def}{% +% \from{drivers.dtx}{oztex,macrules,nops}} + \file{pctexps.def}{% + \from{drivers.dtx}{pctexps,color3,colorfix}} + \file{pctex32.def}{% + \from{drivers.dtx}{pctex32,color1}} + \file{pctexhp.def}{% + \from{drivers.dtx}{pctexhp,nops}} + \file{pctexwin.def}{% + \from{drivers.dtx}{pctexwin,nops}} + \file{truetex.def}{% + \from{drivers.dtx}{truetex,color4,nops}} + \file{tcidvi.def}{% + \from{drivers.dtx}{tcidvi,color4,nops}} + \file{dvipsnam.def}{% + \from{drivers.dtx}{dvipsnames}}} + + +% these ones are largely untested and no longer generated by default. +%\generate{% +% \file{pubps.def}{% +% \from{drivers.dtx}{pubps,psrules}} +% \file{psprint.def}{% +% \from{drivers.dtx}{psprint,psrules}} +%% The textures code generated by this option does more or less work +%% I believe, but it does not use all of textures features, and as I +%% have not got a Mac to test it on, it seems better to remove it for +%% now. +%% This release of the graphics distribution contains a textures.def +%% written by Arthur Ogawa which is distributed as a separate file. +%% It should however be installed in the same directory as the .def +%% files generated by this .ins installation script. +%% \file{textures.def}{% +%% \from{drivers.dtx}{textures,color2,macrules}} +%% +%%%% Old versions of textures (prior to 1.7) do not have colour specials. +%%%% To use colour with these versions, uncomment the next two lines. +%% +%%%% \file{textures.def}{% +%%%% \from{drivers.dtx}{textures,color3,colorfix,macrules}} +%% +%% +% \file{ln.def}{% +% \from{drivers.dtx}{ln}} +% \file{dvi2ps.def}{% +% \from{drivers.dtx}{dvi2ps,psrules}} +% \file{dvitops.def}{% +% \from{drivers.dtx}{dvitops,psrules}} +% \file{dvilaser.def}{% +% \from{drivers.dtx}{dvilaser,psrules}} +% \file{dvialw.def}{% +% \from{drivers.dtx}{dvialw,psrules}}} +% +% +% + +\endbatchfile diff --git a/Master/texmf-dist/source/latex/graphics/graphicx.dtx b/Master/texmf-dist/source/latex/graphics/graphicx.dtx new file mode 100644 index 00000000000..9d897477845 --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/graphicx.dtx @@ -0,0 +1,863 @@ +% +% \iffalse +% +%% graphicx.dtx Copyright (C) 1994 David Carlisle Sebastian Rahtz +%% Copyright (C) 1995 1996 1997 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. +%% +%<*dtx> + \ProvidesFile{graphicx.dtx} +% +%\NeedsTeXFormat{LaTeX2e}[1995/12/01] +%\ProvidesPackage{graphicx} +% \ProvidesFile{graphicx.drv} +% \fi +% \ProvidesFile{graphicx.dtx} + [1999/02/16 v1.0f Enhanced LaTeX Graphics (DPC,SPQR)] +% +% \iffalse +%<*driver> +\documentclass{ltxdoc} +\newenvironment{key}[2]{\expandafter\macro\expandafter{% + \csname KV@#1@#2\endcsname}}{\endmacro} +% +\begin{document} + \DocInput{graphicx.dtx} +\end{document} +% +% \fi +% +% \GetFileInfo{graphicx.dtx} +% +% \title{The \textsf{graphicx} package\thanks{This file +% has version number \fileversion, last +% revised \filedate.}} +% \author{D. P. Carlisle\and S. P. Q. Rahtz} +% \date{\filedate} +% \maketitle +% +% \CheckSum{593} +% +% \changes{v0.3}{1994/03/01} +% {First DPC version (after prototype by SPQR).} +% \changes{v0.4b}{1994/05/30} +% {Rename from egraphics. 8+3 name for CDROM} +% \changes{v1.0}{1996/05/29} +% {Version 1 at last} +% +% \def\star{{\ttfamily*}} +% \makeatletter +% \def\Describe@Macro#1{\endgroup +% \setbox0=\lastbox\llap{\PrintDescribeMacro{#1}}}% +% \makeatother +% \marginparsep0pt +% +% \section{Introduction} +% +% This package provides an alternative interface to the \LaTeXe\ +% graphics functions. The command names provided are the same as in the +% standard package, and they use the same internal functions. However +% the meaning of the optional arguments is different. Note \emph{only} +% the optional arguments have changed: any document which only uses the +% graphics commands with the mandatory arguments and/or the star-forms +% will work identically (with essentially identical implementation) with +% the two packages. +% +% \section{Key=Value Interface} +% When the decision to produce \LaTeXe\ was made, certain `guiding +% principles' were made (and published in the original announcement). +% One of these was that all new features would `conform to the +% conventions of version 2.09'. Specifically this meant that new +% commands would obey the same basic syntax rules for arguments as the +% existing commands. +% +% Standard \LaTeX\ optional arguments are \emph{positional}. If a +% command were to take three optional arguments, then there would be no +% way of specifying only the third, one would have to give all three, +% even if the first two were repeats of the default values. Basically +% this means that `standard' optional arguments are not suitable if +% there is more than one option. Various existing packages (for +% \LaTeX~2.09) have recognised this, and used `named arguments' in +% various forms. Perhaps the two most noticeable are |psfig| and +% |pstricks|. With `named arguments' (sometimes called `attributes') +% each option is not tied to a particular position, but rather given a +% name (or key) and any options that must be set are set by explicitly +% associating this name with the desired value. +% +% The members of the \LaTeX3 project do appreciate the importance of +% this kind of syntax, but felt that rather than extending the syntax of +% \LaTeX\ in an uncoordinated way, it would be better to keep with +% `standard arguments' in \LaTeXe, which is intended as a `consolidation +% of existing \LaTeX\ variants'. The long term planning for an eventual +% \LaTeX3 release will then be able to consider the whole \LaTeX\ +% user interface, and a suitable syntax for named arguments. It is +% important that such an interface design is not hampered by having to +% retain compatibility with earlier attempts at a named argument +% syntax. For this reason this |graphicx| package, which uses the named +% argument mechanism from the |keyval| package should be considered `non +% standard' although it is supported by the same mechanism, and same +% authors as the `standard' |graphics| package. +% +% \section{The User Interface} +% +% \DescribeMacro +% \includegraphics\star\oarg{key-val list}\marg{file}\\ +% \DescribeMacro +% \includegraphics\star\oarg{llx,lly}\oarg{urx,ury}\marg{file}\\ +% Include a graphics file. +% +% The star form is just for +% compatibility with the standard interface, and essentially just adds +% |clip| to the keys specified. Similarly the second, two-optional +% argument form is for increased compatibility with the standard +% package. The two optional argument form is not needed in the |keyval| +% interface. +% +% Various `keys' or named arguments are supported. +% \begin{description} +% \item[bb] Set the bounding box. The argument should be four +% dimensions, separated by spaces. +% \item[bbllx,bblly,bburx,bbury] Set the bounding box. Mainly for +% compatibility with older packages. |bbllx=a,bblly=b,bburx=c,bbury=d| +% is equivalent to |bb = a b c d|. +% \item[natwidth,natheight] Again an alternative to |bb|. +% |natheight=h,natwidth=w| is equivalent to |bb = 0 0 h w|. +% \item[viewport] Modify the bounding box specified in the file. +% The four values specify a bounding box \emph{relative} to the +% |llx|,|lly| coordinate of the original box. +% \item[trim] Modify the bounding box specified in the file. +% The four values specify the amounts to remove from +% the left, bottom, right and top of the original box. +% \item[hiresbb] Boolean valued key. Defaults to |true|. +% Causes \TeX\ to look for |%%HiResBoundingBox| comments rather than +% the standard |%%BoundingBox|. May be set to |false| to override +% a default setting of true specified by the |hiresbb| package option. +% \item[angle] Rotation angle. +% \item[origin] Rotation origin (see |\rotatebox|, below). +% \item[width] Required width, a dimension (default units |bp|). The +% graphic will be scaled to make the width the specified dimension. +% \item[height] Required height. a dimension (default units |bp|). +% \item[totalheight] Required totalheight (ie height $+$ depth). a +% dimension (default units |bp|). Most useful after a rotation (when the +% height might be zero). +% \item[keepaspectratio] Boolean valued key (like |clip|). If it is set +% to true, modify the meaning of the |width| and |height| (and +% |totalheight|) keys such that if both are specified then rather than +% distort the figure the figure is scaled such that neither dimension +% \emph{exceeds} the stated dimensions. +% \item[scale] Scale factor. +% \item[clip] Either `true' or `false' (or no value, which is equivalent +% to `true'). Clip the graphic to the bounding box (or viewport if one +% is specified). +% \item[draft] a boolean valued key, like `clip'. locally switches to +% draft mode, ie.\ do not include the graphic, but leave the +% correct space, and print the filename. +% \item[type] Specify the file type. (Normally determined from the file +% extension.) +% \item[ext] Specify the file extension. +% \emph{Only} for use with |type|. +% \item[read] Specify the `read file' which is used for determining the +% size of the graphic. \emph{Only} for use with |type|. +% \item[command] Specify the file command. +% \emph{Only} for use with |type|. +% \end{description} +% +% The arguments are interpreted left to right. |clip|, |draft|, |bb|,, +% and |bbllx| etc.\ have the same effect wherever they appear. but the +% scaling and rotation keys interact. +% +% Any scaling that is specified \emph{before} rotation, is handled by +% the internal graphics inclusion function. Rotation, or any later +% scaling is handled by implicitly calling |\rotatebox| or |\scalebox|. +% So |[height=1in,angle=90]| scales the graphic to 1in, then rotates it, +% so it is one inch wide. |[angle=90,height=1in]| first rotates, then +% scales the result so that it is 1in high. A driver that can scale +% included graphics, but not arbitrary text will not be able to support +% the second form, as it will require a call to |\scalebox|, but the +% first form should work as there the scaling is handled by +% |\Ginclude@graphics|. +% +% \DescribeMacro +% \rotatebox\oarg{key-val list}\marg{angle}\marg{text}\\ +% Rotate \emph{text}. +% +% The keys supported by |\rotatebox| are: +% \begin{description} +% \item[origin] Specify the centre of rotation. |origin=|\meta{label}, +% where the labels are up to two of |lrctbB| (|B| denotes the +% baseline, as for PSTricks). +% \item[x,y] An alternative to +% |origin|. |x=|\meta{dimen}|,y=|\meta{dimen} The $x,y$ coordinate of +% the centre of rotation. As usual |\height| etc may be used. +% \item[units] Specify the units used in the main argument. eg +% |units=-360| would mean that the argument refered to degrees +% \emph{clockwise} instead of the default anti-clockwise rotation. +% \end{description} +% +% As an example |\rotatebox[origin=c]{180}{text}| will rotate ``text'' +% around its centre, thus creating a final box of the same dimensions as +% the original box. This is to be contrasted to the default behaviour, +% which rotates around the reference point on the baseline, thus +% producing a box that is mainly \emph{below} the baseline. +% +% \StopEventually{} +% +% +% \section{Implementation} +% +% \begin{macrocode} +%<*package> +% \end{macrocode} +% +% One new option is handled by keyval. It suppresses the error +% normally generated if an unknow keyval key is used. +% (This helps porting between drivers that use extended interfaces.) +% \changes{v1.0e}{1999/01/10}{new unknownkeysallowed option} +% \begin{macrocode} +\DeclareOption{unknownkeysallowed} + {\PassOptionsToPackage\CurrentOption{keyval}} +% \end{macrocode} +% +% All other options are handled by the \textsf{graphics} package. +% \begin{macrocode} +\DeclareOption*{\PassOptionsToPackage\CurrentOption{graphics}} +% \end{macrocode} +% +% \begin{macrocode} +\ProcessOptions +% \end{macrocode} +% +% This package requires these two building blocks. +% \begin{macrocode} +\RequirePackage{keyval,graphics} +% \end{macrocode} +% +% +% \subsection{Graphics Inclusion} +% +% +% First we declare the `bounding box' keys. These all use +% |\Gin@defaultbp| so that the \meta{value} can be given as a length in +% the usual \TeX\ units such as |cm| or as an integer, taken as |bp|. +% +% \begin{key}{Gin}{bb} +% \begin{macrocode} +\define@key{Gin}{bb} + {\Gin@bboxtrue\Gread@parse@bb#1 \\} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{bbllx} +% \begin{key}{Gin}{bblly} +% \begin{key}{Gin}{bburx} +% \begin{key}{Gin}{bbury} +% \changes{v0.3b}{1994/03/11}{use bbllx not llx} +% \changes{v0.3b}{1994/03/11}{add natheight and natwidth} +% \changes{v0.6a}{1995/04/11}{New \cs{Gin@defaultbb} code} +% \changes{v0.6b}{1995/06/26}{typos fixed for graphics/1685} +% \begin{macrocode} +\define@key{Gin}{bbllx} + {\Gin@bboxtrue\Gin@defaultbp\Gin@llx{#1}} +\define@key{Gin}{bblly} + {\Gin@bboxtrue\Gin@defaultbp\Gin@lly{#1}} +\define@key{Gin}{bburx} + {\Gin@bboxtrue\Gin@defaultbp\Gin@urx{#1}} +\define@key{Gin}{bbury} + {\Gin@bboxtrue\Gin@defaultbp\Gin@ury{#1}} +% \end{macrocode} +% \end{key} +% \end{key} +% \end{key} +% \end{key} +% +% \begin{key}{Gin}{hiresbb} +% \changes{v1.0b}{1996/10/29} +% {hiresbb key added} +% If set to true (the default) \TeX\ will look for bounding box +% comments of the form |%%HiResBoundingBox| (which typically have +% real values) instead of the standard |%%BoundingBox| (which should +% have integer values). +% It may be set to false to override a package option of hiresbb. +% \begin{macrocode} +\define@key{Gin}{hiresbb}[true]{% + \edef\Gread@BBox{% + \@percentchar\@percentchar + \csname if#1\endcsname HiRes\fi + BoundingBox}} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{natheight} +% \begin{key}{Gin}{natheight} +% \changes{v0.6d}{1995/09/22} +% {typos fixed in natheight and natwidth keys} +% \begin{macrocode} +\let\KV@Gin@natwidth\KV@Gin@bburx +\let\KV@Gin@natheight\KV@Gin@bbury +% \end{macrocode} +% \end{key} +% \end{key} +% +% \begin{key}{Gin}{viewport} +% \begin{key}{Gin}{trim} +% \changes{v0.6a}{1995/04/11}{viewport and trim keys added} +% \changes{v0.6c}{1995/09/07}{arithmetic in viewport key fixed} +% A `viewport' is a user-specified area of the graphic to be included. +% It should not be confused with the `Bounding Box' of a PS file. +% In fact, the origin for a viewport specification is the (llx,lly) +% lower left coordinate of the bounding box. If a viewport is +% specified, and clipping is turned on, clipping is based on the +% viewport, not on the boundingbox. +% +% Both `viewport' and `trim' were suggested (and originally, but +% differently, implemented) by Arthur Ogawa. +% \begin{macrocode} +\define@key{Gin}{viewport} + {\let\Gin@viewport@code\Gin@viewport\Gread@parse@vp#1 \\} +\define@key{Gin}{trim} + {\let\Gin@viewport@code\Gin@trim\Gread@parse@vp#1 \\} +% \end{macrocode} +% \end{key} +% \end{key} +% +% \begin{macro}{\Gread@parse@vp} +% Grabs four bounding box values like |\Gread@parse@bp| but saves them +% in alternative macros that are used in the viewport and trim cases to +% modify the bounding box read from the file. +% \begin{macrocode} +\def\Gread@parse@vp#1 #2 #3 #4 #5\\{% + \Gin@defaultbp\Gin@vllx{#1}% + \Gin@defaultbp\Gin@vlly{#2}% + \Gin@defaultbp\Gin@vurx{#3}% + \Gin@defaultbp\Gin@vury{#4}}% +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@viewport} +% \changes{v1.0c}{1996/10/31}{Original bb saved} +% If a viewport is specified, reset the bounding box cordinates +% by adding the original origin, |\Gin@llx|, |\Gin@lly| to the new +% values specified as the viewport. The original Bounding box +% coordinates are saved in |\Gin@ollx|\ldots\ some drivers +% might need this information (currently just |tcidvi|). +% \begin{macrocode} +\def\Gin@viewport{% + \let\Gin@ollx\Gin@llx + \let\Gin@olly\Gin@lly + \let\Gin@ourx\Gin@urx + \let\Gin@oury\Gin@ury + \dimen@\Gin@llx\p@\advance\dimen@ \Gin@vurx\p@ + \edef\Gin@urx{\strip@pt\dimen@}% + \dimen@\Gin@lly\p@\advance\dimen@ \Gin@vury\p@ + \edef\Gin@ury{\strip@pt\dimen@}% + \dimen@\Gin@llx\p@\advance\dimen@ \Gin@vllx\p@ + \edef\Gin@llx{\strip@pt\dimen@}% + \dimen@\Gin@lly\p@\advance\dimen@ \Gin@vlly\p@ + \edef\Gin@lly{\strip@pt\dimen@}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@trim} +% \changes{v1.0c}{1996/10/31}{Original bb saved} +% If a trim is specified, reset the bounding box cordinates +% by trimming the four specified values off each side of the +% graphic. +% \begin{macrocode} +\def\Gin@trim{% + \let\Gin@ollx\Gin@llx + \let\Gin@olly\Gin@lly + \let\Gin@ourx\Gin@urx + \let\Gin@oury\Gin@ury + \dimen@\Gin@llx\p@\advance\dimen@ \Gin@vllx\p@ + \edef\Gin@llx{\strip@pt\dimen@}% + \dimen@\Gin@lly\p@\advance\dimen@ \Gin@vlly\p@ + \edef\Gin@lly{\strip@pt\dimen@}% + \dimen@\Gin@urx\p@\advance\dimen@ -\Gin@vurx\p@ + \edef\Gin@urx{\strip@pt\dimen@}% + \dimen@\Gin@ury\p@\advance\dimen@ -\Gin@vury\p@ + \edef\Gin@ury{\strip@pt\dimen@}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@vllx} +% \begin{macro}{\Gin@vlly} +% \begin{macro}{\Gin@vurx} +% \begin{macro}{\Gin@vury} +% Four macros to hold the modifiers for the bounding box for viewport +% and trim specifications. +% \begin{macrocode} +\let\Gin@vllx\Gin@llx\let\Gin@vlly\Gin@llx +\let\Gin@vurx\Gin@llx\let\Gin@vury\Gin@llx +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{key}{Gin}{angle} +% Specify a rotation. This is just handled by wrapping the +% |\includegraphics| command in a call to the internal version of +% |\rotatebox|. Normally this is the `standard' version but if an +% |origin| key is used in |\includegraphics| then the \emph{keyval} +% version of origin is used, and the |origin| key is passed on. +% \begin{macrocode} +\define@key{Gin}{angle} + {\Gin@esetsize + \@tempswatrue + \edef\@tempa{\toks@{\noexpand\Gin@erotate{#1}{\the\toks@}}}% + \@tempa} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{origin} +% Pass the origin key value on to |\rotatebox|. |\Gin@erotate| is +% initialised to |\Grot@box@std| later in the file, after the latter has +% been defined. +% \changes{v0.6e}{1995/09/28} +% {key added} +% \begin{macrocode} +\define@key{Gin}{origin}[c]{% + \def\Gin@erotate{\Grot@box@kv[origin=#1]}} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{width} +% \begin{key}{Gin}{height} +% Save the required height and width. The actual scaling is done later. +% \begin{macrocode} +\define@key{Gin}{width}{\def\Gin@ewidth{#1}} +\define@key{Gin}{height}{\def\Gin@eheight{#1}} +% \end{macrocode} +% \end{key} +% \end{key} +% +% \begin{key}{Gin}{totalheight} +% \changes{v0.6a}{1995/04/11}{New totalheight key} +% The same as |height| key, but locally changes |\Gin@eresize| to +% |\totalheight| from its default value of |\height|. +% \begin{macrocode} +\define@key{Gin}{totalheight}{% + \def\Gin@eresize{\totalheight}\def\Gin@eheight{#1}} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{keepaspectratio} +% Boolean valued key (like |clip|). If it is set to true, +% modify the meaning of the |width| and |height| (and |totalheight|) +% keys such that if both are specified then rather than distort the +% figure the figure is scaled such that neither dimension \emph{exceeds} +% the stated dimensions. +% \changes{v0.6e}{1995/09/28} +% {key added} +% \changes{v0.6h}{1995/12/06} +% {Name changed to keepaspectratio} +% \begin{macrocode} +\define@key{Gin}{keepaspectratio}[true]{% + \lowercase{\Gin@boolkey{#1}}{iso}} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{scale} +% \changes{v0.6h}{1995/12/06} +% {Use \cs{Gin@exclamation}} +% If the scaling is being handled externally, wrap |\includegraphics| in +% the internal form of |\scalebox|, otherwise locally define +% |\Gin@req@sizes| to calculate the required sizes based on +% scale factor. +% \begin{macrocode} +\define@key{Gin}{scale}{% + \if@tempswa + \edef\@tempa{\toks@{\noexpand\Gscale@box{#1}[#1]{\the\toks@}}}% + \@tempa + \else + \def\Gin@req@sizes{% + \def\Gin@scalex{#1}\let\Gin@scaley\Gin@exclamation + \Gin@req@height\Gin@scalex\Gin@nat@height + \Gin@req@width\Gin@scalex\Gin@nat@width}% + \fi + \@tempswatrue} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{draft} +% Locally set the draft switch to true. This is used by the code in +% \textsf{graphics} package to suppress the file inclusion. +% \begin{macrocode} +\define@key{Gin}{draft}[true]{% + \lowercase{\Gin@boolkey{#1}}{draft}} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{clip} +% Locally set the clip switch to true. This is used by the code in +% \textsf{graphics} package to suppress the printing of anything outside +% the bounding box specified. +% \begin{macrocode} +\define@key{Gin}{clip}[true]{% + \lowercase{\Gin@boolkey{#1}}{clip}} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{type} +% If you use `type' you must use no extension in the main argument +% and you must use `ext'. You can also use `read' and `command'. +% \changes{v0.5a}{1994/11/29} +% {remove \cs{Gin@sep}} +% \begin{macrocode} +\define@key{Gin}{type}{% + \def\Ginclude@graphics##1{% + \begingroup + \def\Gin@base{##1}% + \edef\@tempa{{#1}{\Gin@eread}{\Gin@ecom{##1\Gin@eext}}}% + \expandafter\Gin@setfile\@tempa + \endgroup}} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{ext} +% \changes{v1.0d}{1997/06/09}{initialise ext to empty} +% Specify an extension, for use with the `type' key. +% \begin{macrocode} +\define@key{Gin}{ext}{\def\Gin@eext{#1}} +\let\Gin@eext\@empty +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{read} +% Specify a read file, for use with the `type' key. +% You may want to globally set this to |*| using |\setkeys|. +% |*| means read the graphic file for size info, as in +% |\DeclareGraphicsRule|. +% \changes{v0.5a}{1994/11/29} +% {Add default * possibility.} +% \begin{macrocode} +\define@key{Gin}{read}{% + \def\Gin@eread{#1}% + \def\@tempa{*}\ifx\@tempa\Gin@eread\def\Gin@eread{\Gin@eext}\fi} +\let\Gin@eread\@empty +% \end{macrocode} +% \end{key} +% +% \begin{key}{Gin}{command} +% Specify a command, for use with the `type' key. +% \begin{macrocode} +\define@key{Gin}{command}{\def\Gin@ecom##1{#1}} +\let\Gin@ecom\@firstofone +% \end{macrocode} +% \end{key} +% +% \begin{macro}{\Gin@boolkey} +% Helper function for defining boolean valued functions. The order of +% arguments allows |\lowercase| to only act on the user-supplied +% argument. +% \changes{v0.4a}{1994/04/14}{Make `empty'!=true so clip!= works} +% \begin{macrocode} +\def\Gin@boolkey#1#2{% + \csname Gin@#2\ifx\relax#1\relax true\else#1\fi\endcsname} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@esetsize} +% \changes{v0.6h}{1995/12/06} +% {Use \cs{Gin@exclamation}} +% Arrange for the final size to be set, either by wrapping the include +% graphics call in |\scalebox|, or by redefining |\Gin@req@sizes| +% appropriately. +% \begin{macrocode} +\def\Gin@eresize{\height} +\def\Gin@esetsize{% + \let\@tempa\Gin@exclamation + \if@tempswa +% \end{macrocode} +% External. Wrap the |\includegraphics| command in a call to the +% internal form of |\scalebox| to handle the rotation. +% \begin{macrocode} + \edef\@tempa{\toks@{\noexpand + \Gscale@@box\noexpand\Gin@eresize + {\Gin@ewidth}{\Gin@eheight}{\the\toks@}}}% + \@tempa + \else +% \end{macrocode} +% Internal. Handle scaling with the |\includegraphics| command directly +% rather than calling |\scalebox|. +% \begin{macrocode} + \ifx\Gin@ewidth\@tempa + \ifx\Gin@eheight\@tempa +% \end{macrocode} +% No resizing. +% \begin{macrocode} + \else +% \end{macrocode} +% Just height specified. +% \changes{v0.6e}{1995/09/28} +% {Use \cs{setlength} to support calc package} +% \changes{v0.6h}{1995/12/06} +% {Use \cs{Gin@exclamation}} +% \begin{macrocode} + \let\Gin@@eheight\Gin@eheight + \def\Gin@req@sizes{% + \Gscale@div\Gin@scaley\Gin@@eheight\Gin@nat@height + \let\Gin@scalex\Gin@exclamation + \setlength\Gin@req@height\Gin@@eheight + \Gin@req@width\Gin@scaley\Gin@nat@width}% + \fi + \else + \ifx\Gin@eheight\@tempa +% \end{macrocode} +% Just width specified. +% \changes{v0.6e}{1995/09/28} +% {Use \cs{setlength} to support calc package} +% \changes{v0.6h}{1995/12/06} +% {Use \cs{Gin@exclamation}} +% \begin{macrocode} + \let\Gin@@ewidth\Gin@ewidth + \def\Gin@req@sizes{% + \Gscale@div\Gin@scalex\Gin@@ewidth\Gin@nat@width + \let\Gin@scaley\Gin@exclamation + \setlength\Gin@req@width\Gin@@ewidth + \Gin@req@height\Gin@scalex\Gin@nat@height}% + \else +% \end{macrocode} +% Both height and width specified. +% \begin{macrocode} + \let\Gin@@ewidth\Gin@ewidth + \let\Gin@@eheight\Gin@eheight +% \end{macrocode} +% \changes{v0.6g}{1995/11/10} +% {Use \cs{ifGin@iso} to support isoscale key} +% At this point can locally redefine |\Gin@nosize|. Instead +% of generating an error, just set the `natural' size to be the +% `requested size'. Previous versions of this package did not +% allow the use of |height| and |width| unless the natural size was +% known as otherwise \LaTeX\ can not calculate the scale factor. +% However many drivers (especially for bitmap formats) can work this out +% themselves, so as long as both |height| and |width| are given, so +% \LaTeX\ knows the size to leave, accept this. This assumes the code in +% the driver file will use the `required height' information, not the +% scale factors, which will be set to 1!. +% \changes{v1.0a}{1996/08/05} +% {Missing percent added for graphics/2244} +% \begin{macrocode} + \def\Gin@nosize##1{% + \KV@Gin@natwidth\Gin@@ewidth + \KV@Gin@natheight\Gin@@eheight}% +% \end{macrocode} +% +% \begin{macrocode} + \def\Gin@req@sizes{% + \Gscale@div\Gin@scalex\Gin@@ewidth\Gin@nat@width + \Gscale@div\Gin@scaley\Gin@@eheight\Gin@nat@height +% \end{macrocode} +% \changes{v0.6f}{1995/09/29} +% {Use \cs{ifGin@iso} to support isoscale key} +% Donald Arseneau requested this feature. If both |height| +% and |width| are chosen, choose the smaller scale factor rather than +% distort the graphic. This mode is turned on with the +% \textsf{keepaspectratio} key. +% \begin{macrocode} + \ifGin@iso + \ifdim\Gin@scaley\p@>\Gin@scalex\p@ + \let\Gin@scaley\Gin@scalex + \else + \let\Gin@scalex\Gin@scaley + \fi + \fi + \Gin@req@width\Gin@scalex\Gin@nat@width + \Gin@req@height\Gin@scaley\Gin@nat@height}% + \fi + \fi + \fi + \let\Gin@ewidth\Gin@exclamation + \let\Gin@eheight\Gin@ewidth} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@req@height} +% \begin{macro}{\Gin@req@width} +% The required final size. +% \begin{macrocode} +\newdimen\Gin@req@height +\newdimen\Gin@req@width +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Gin@outer@scalex} +% \begin{macro}{\Gin@outer@scaley} +% Scale factors to pass to |\scalebox|. +% \begin{macrocode} +\let\Gin@outer@scalex\relax +\let\Gin@outer@scaley\relax +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Gin@angle} +% Rotation angle. +% \begin{macrocode} +\let\Gin@angle\relax +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Gin@ewidth} +% \changes{v0.6h}{1995/12/06} +% {Use \cs{Gin@exclamation}} +% \begin{macro}{\Gin@eheight} +% Final size, initialised for no scaling. +% \begin{macrocode} +\let\Gin@ewidth\Gin@exclamation +\let\Gin@eheight\Gin@ewidth +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Gin@scalex} +% \begin{macro}{\Gin@scaley} +% \changes{v0.6h}{1995/12/06} +% {Use \cs{Gin@exclamation}} +% Scale factors. Initialised for no scaling. +% \begin{macrocode} +\def\Gin@scalex{1} +\let\Gin@scaley\Gin@exclamation +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\Gin@i} +% Use the same top level |\includegraphics| command as the standard +% interface. This will set the clipping switch, and then call |\Gin@i|. +% \changes{v0.3c}{1994/03/15}{Dont locally initialise width/height} +% \changes{v0.3c}{1994/03/15}{Always call \cmd{\Gin@ii}} +% \changes{v0.4c}{1994/09/12}{Use `standard' version if two opt.\ args.} +% \begin{macrocode} +\def\Gin@i{% + \def\Gin@req@sizes{% + \Gin@req@height\Gin@nat@height + \Gin@req@width\Gin@nat@width}% + \@ifnextchar[\Gin@ii{\Gin@ii[]}} +% \end{macrocode} +% \end{macro} +% +% +% \begin{macro}{\Gin@ii} +% Look for a second optional argument. +% If one optional argument is present, call |\setkeys| to process it, +% \begin{macrocode} +\def\Gin@ii[#1]#2{% + \def\@tempa{[}\def\@tempb{#2}% + \ifx\@tempa\@tempb + \def\@tempa{\Gin@iii[#1][}% + \expandafter\@tempa + \else + \begingroup + \@tempswafalse + \toks@{\Ginclude@graphics{#2}}% + \setkeys{Gin}{#1}% + \Gin@esetsize + \the\toks@ + \endgroup + \fi} +% \end{macrocode} +% \end{macro} +% +% \changes{v0.4b}{1994/05/06} +% {Remove incorrect initialisation of \cs{Gin@scalex}} +% +% \section{Rotation} +% +% \begin{macro}{\rotatebox} +% Look for an optional argument. +% \changes{v0.3b}{1994/03/11}{Remove star form} +% \begin{macrocode} +\def\rotatebox{% + \@ifnextchar[\Grot@box@kv\Grot@box@std} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Grot@box@std} +% If no KV argument, just repeat the standard definition. +% \begin{macrocode} +\def\Grot@box@std#1#2{% + \Grot@setangle{#1}% + \setbox\z@\hbox{{#2}}% + \Grot@x\z@ + \Grot@y\z@ + \Grot@box} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\Grot@box@kv} +% \begin{macrocode} +\def\Grot@box@kv[#1]#2#3{% + \@begin@tempboxa\hbox{#3}% + \Grot@x\width \divide\Grot@x\tw@ + \Grot@y\height \advance\Grot@y-\depth \divide\Grot@y\tw@ + \setkeys{Grot}{#1}% + \setbox\z@\box\@tempboxa + \Grot@setangle{#2}% + \Grot@box + \@end@tempboxa} +% \end{macrocode} +% \end{macro} +% +% +% There are two ways of specifying the centre of rotation. +% +% \begin{key}{Grot}{origin} +% |origin=|\meta{label}, where the labels are up to two of |lrctbB| +% (|B| denotes the baseline, as for PSTricks). +% \begin{macrocode} +\define@key{Grot}{origin}[c]{% + \@tfor\@tempa:=#1\do{% + \if l\@tempa \Grot@x\z@\else + \if r\@tempa \Grot@x\width\else + \if t\@tempa \Grot@y\height\else + \if b\@tempa \Grot@y-\depth\else + \if B\@tempa \Grot@y\z@\fi\fi\fi\fi\fi}} +% \end{macrocode} +% \end{key} +% +% \begin{key}{Grot}{x} +% \begin{key}{Grot}{y} +% |x=|\meta{dimen}|,y=|\meta{dimen} The $x,y$ coordinate of the centre +% of rotation. As usual |\height| etc may be used. +% \begin{macrocode} +\define@key{Grot}{x}{\setlength\Grot@x{#1}} +\define@key{Grot}{y}{\setlength\Grot@y{#1}} +% \end{macrocode} +% \end{key} +% \end{key} +% +% \begin{key}{Grot}{units} +% `units' specifies the number or units in one anti-clockwise circle. +% So the default is $360$. $-360$ gives clockwise rotation, $6.283185$ +% gives radians etc. +% \begin{macrocode} +\define@key{Grot}{units}{% + \def\Grot@setangle##1{% + \dimen@##1\p@ + \dimen@ii#1\p@ + \divide\dimen@ii360\relax + \divide\dimen@\dimen@ii + \edef\Grot@angle{\number\dimen@}}} +% \end{macrocode} +% \end{key} +% +% \begin{macro}{\Gin@erotate} +% Initialise the rotation command to use in |\includegraphics|. +% \changes{v0.6e}{1995/09/28}{macro added} +% \begin{macrocode} +\let\Gin@erotate\Grot@box@std +% \end{macrocode} +% \end{macro} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \Finale +% diff --git a/Master/texmf-dist/source/latex/graphics/keyval.dtx b/Master/texmf-dist/source/latex/graphics/keyval.dtx new file mode 100644 index 00000000000..6cc3f169a37 --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/keyval.dtx @@ -0,0 +1,401 @@ +% +% \iffalse +%% keyval.dtx Copyright (C) 1993 1994 1995 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. +%% +% +%<*dtx> + \ProvidesFile{keyval.dtx} +% +%<*!plain> +%\NeedsTeXFormat{LaTeX2e} +%\ProvidesPackage{keyval} +% \ProvidesFile{keyval.drv} +% \fi +% \ProvidesFile{keyval.dtx} + [1999/03/16 v1.13 key=value parser (DPC)] +% +% \iffalse +% +%<*driver> +\documentclass{ltxdoc} +\usepackage{keyval} +\begin{document} + \DocInput{keyval.dtx} +\end{document} +% +% \fi +% +% \GetFileInfo{keyval.dtx} +% \title{The \textsf{keyval} package\thanks{This file +% has version number \fileversion, last +% revised \filedate.}} +% \author{David Carlisle} +% \date{\filedate} +% \maketitle +% +% \begin{abstract} +% A \LaTeX\ package implementing a system allowing the setting +% of parameters (or `named arguments' with a +% \meta{key}${}={}$\meta{value} syntax. +% +% Eg: |\foo[height=3in, shadow = true ]{bar}| +% \end{abstract} +% +% \CheckSum{149} +% +% \changes{v1.03} +% {1993/10/13}{Initial version} +% \changes{v1.04}{1993/11/15} +% {Upgrade after comments from Timothy van Zandt} +% \changes{v1.05}{1993/11/17} +% {Further small improvements} +% \changes{v1.06}{1994/02/01} +% {Update to LaTeX2e} +% \changes{v1.07}{1994/03/15} +% {New style ltxdoc} +% \changes{v1.08}{1994/09/12} +% {Improve docstrip handling} +% \changes{v1.09}{1995/09/21} +% {Move a comma for graphics/1698} +% +% +% This package implements a system of defining and using sets of +% parameters, which are set using the syntax \meta{key}=\meta{value}. +% +% For each keyword in such a set, there exists a function which is +% called whenever the parameter appears in a parameter list. For +% instance if the set |dpc| is to have the keyword |scale| then I +% would define.\\ +% | \define@key{dpc}{scale}{scale ({\tt\string#1})\\}|\\ +% The first argument of |\define@key| is the set of keywords being +% used, the second is the keyword, and the third is the function to +% call. This function will be given as |#1| the \meta{value} specified +% by the user. +% +% Normally it is an error to omit the `=\meta{value}' however if an +% optional \meta{value} is supplied when the keyword is defined, then +% just the keyword need be supplied.\\ +% |\define@key{dpc}{clip}[true]{...}|\\ +% For `|clip|' you can go `|clip = true|' or `|clip = false|' or +% just `|clip|', which is the same as `|clip = true|' +% +% To use these keywords, just call `|\setkeys|' with a comma +% separated list of settings, each of the form +% \meta{key}=\meta{value}, or just \meta{key}. Any white space around +% the `|=|' and `|,|' is ignored. +% +% As the \meta{key} is passed as a macro argument, if it consists +% entirely of a |{ }| group, the outer braces are stripped off. Thus +% |,key=foo,| and |,key={foo},| are equivalent. This fact enables one to +% `hide' any commas or equals signs that must appear in the value. i.e.\ +% in |foo={1,2,3},bar=4|, |foo| gets the value |1,2,3|, the comma after +% |1| does not terminate the keyval pair, as it is `hidden' by the +% braces. +% +% Empty entries, with nothing between the commas, are silently ignored. +% This means that it is not an error to have a comma after the last +% term, or before the first. +% +% \section{Example} +% +% We may extend the examples above to give a `fake' graphics +% inclusion macro, with a syntax similar to that used in the psfig +% macros. +% +% \makeatletter +% \def\dpcgraphics{\@ifnextchar[\@dpcgraphics{\@dpcgraphics[]}} +% +% |\dpcgraphics| has one optional argument which is passed through +% |\setkeys|, and one mandatory argument, the filename. It actually +% just typesets its arguments, for demonstration. +% +% \def\@dpcgraphics[#1]#2{{\setkeys{dpc}{#1}INPUT: #2}}% +% +% \define@key{dpc}{scale}{scale ({\tt\string#1\relax})\\} +% \define@key{dpc}{height}{height ({\tt#1})\\} +% \define@key{dpc}{width}{width ({\tt#1})\\} +% \define@key{dpc}{bb}{bounding box ({\tt#1})\\} +% \define@key{dpc}{clip}[true]{clip ({\tt\string#1\relax})\\} +% \makeatother +% +% The declared keys are: |scale|, |height|, |width|, |bb|, +% and |clip|. Except for the last, they must all be given a value if +% used. +% +% Note how in the following, any white space arround |=| or |,| is +% ignored, as are the `empty' arguments caused by extra commas. Note +% also that each macro receives \emph{exactly} the tokens that you +% specify as arguments, no premature expansion is done. +% +% \begin{verbatim} +% \def\dpcgraphics{\@ifnextchar[\@dpcgraphics{\@dpcgraphics[]}} +% \def\@dpcgraphics[#1]#2{{\setkeys{dpc}{#1}INPUT: #2}} +% +% \define@key{dpc}{scale}{scale ({\tt\string#1\relax})\\} +% \define@key{dpc}{clip}[true]{clip ({\tt\string#1\relax})\\} +% \end{verbatim} +% +% \begin{minipage}{.4\textwidth} +% \begin{verbatim} +% \def\scalemacro{9} +% \dpcgraphics +% [ height =4in, , +% width = 3in, +% scale = \scalemacro, +% bb = 20 20 300 400 , +% clip, +% ]{aaa} +% \end{verbatim} +% \end{minipage} +% \hfill +% \begin{minipage}{.4\textwidth} +% \def\scalemacro{9} +%\dpcgraphics +% [ height =4in, , +% width = 3in, +% scale = \scalemacro , +% bb = 20 20 300 400 , +% clip , +% ]{aaa} +% \end{minipage} +% +% +% \section{The Internal Interface} +% A declaration of the form:\\ +% |\define@key{family}{key}{...}|\\ +% Defines a macro |\KV@prefix@key| with one argument. When used in a +% keyval list, the macro receives the value as its argument. +% +% A declaration of the form:\\ +% |\define@key{family}{key}[default]{...}|\\ +% Defines a macro |\KV@family@key| as above, however it also defines the +% macro |\KV@family@key@default| as a macro with no arguments, and +% definition\\ +% |\KV@family@key{default}|. +% +% Thus if macros are defined using |\define@key|, the use of a key with +% no value \ldots|,foo,|\ldots\ is always equivalent to the use of the +% key with some value, \ldots|,foo=default,|\ldots. However a package +% writer may wish that the `default' behaviour for some key is not +% directly equivalent to using that key with a value. (In particular, as +% pointed out to me by Timothy Van Zandt, you may wish to omit error +% checking on the default value as you know it is correct.) In these +% cases one simply needs to define the two macros +% |\KV@|\meta{family}|@key| and |\KV@|\meta{family}|@key@default| +% directly using |\def| (or |\newcommand|). I do not supply a user +% interface for this type of definition, but it is supported in the +% sense that I will try to ensure that any future upgrades of this +% package do not break styles making use of these `low level' +% definitions. +% +% \StopEventually{} +% +% \section{The Macros} +% +% From version~1.05, all `internal' macros associated to keys have names +% of the form:\\ +% |\KV@|\meta{family}|@|\meta{key} or +% |\KV@|\meta{family}|@|\meta{key}|@|\meta{default} +% +% \begin{macrocode} +%<*package> +% \end{macrocode} +% +% \begin{macro}{\setkeys} +% The top level macro. |#2| should be a comma separated values of the +% form \meta{key} |=| \meta{value} or just simply \meta{key}. +% The macro associated with this key in the `family' |#1| is called with +% argument \meta{value}. The second form is only allowed if the key was +% declared with a default value. +% \begin{macrocode} +\def\setkeys#1#2{% +% \end{macrocode} +% Save the `family' for later. Then begin acting on the comma +% separated list. +% \changes{v1.11}{1998/06/05} +% {Make \cs{@tempc} safe (in case it is an \cs{if}.} +% \begin{macrocode} + \def\KV@prefix{KV@#1@}% + \let\@tempc\relax + \KV@do#2,\relax,} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\KV@do} +% Iterate down the list of comma separated argument pairs. +% \begin{macrocode} +\def\KV@do#1,{% + \ifx\relax#1\empty\else + \KV@split#1==\relax + \expandafter\KV@do\fi} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\KV@split} +% Split up the keyword and value, and call the appropriate command. +% This macro was slightly reorganised for version 1.04, after some +% suggestions from Timothy Van Zandt. +% \begin{macrocode} +\def\KV@split#1=#2=#3\relax{% + \KV@@sp@def\@tempa{#1}% + \ifx\@tempa\@empty\else + \expandafter\let\expandafter\@tempc + \csname\KV@prefix\@tempa\endcsname + \ifx\@tempc\relax +% \KV@err +% \KV@errx + {\@tempa\space undefined}% + \else + \ifx\@empty#3\@empty + \KV@default + \else + \KV@@sp@def\@tempb{#2}% + \expandafter\@tempc\expandafter{\@tempb}\relax + \fi + \fi + \fi} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\KV@default} +% Run the default code, or raise an error. +% \begin{macrocode} +\def\KV@default{% + \expandafter\let\expandafter\@tempb + \csname\KV@prefix\@tempa @default\endcsname + \ifx\@tempb\relax + \KV@err{No value specified for \@tempa}% + \else + \@tempb\relax + \fi} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\KV@err} +% \changes{v1.10}{1997/11/10} +% {Use \cs{PackageError}} +% \changes{v1.12}{1998/11/18} +% {Option system added} +% Error messages. +% \begin{macrocode} +%\def\KV@err#1{\errmessage{key-val: #1}} +%<*!plain> +\DeclareOption{unknownkeysallowed}{% + \def\KV@errx#1{\PackageInfo{keyval}{#1}}} +\DeclareOption{unknownkeyserror}{% + \def\KV@errx#1{\PackageError{keyval}{#1}\@ehc}} +\ExecuteOptions{unknownkeyserror} +\let\KV@err\KV@errx +\ProcessOptions +% +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\KV@@sp@def} +% \changes{v1.10}{1997/11/10} +% {Reorganise to not require doubled hash tokens, and to not +% lose initial brace groups.} +% \begin{macro}{\KV@@sp@b} +% \begin{macro}{\KV@@sp@c} +% \begin{macro}{\KV@@sp@d} +% |\KV@@sp@def|\meta{cmd}\meta{token list} is like |\def|, except that +% a space token at the beginning or end of \meta{token list} is +% removed before making the assignment. \meta{token list} may not +% contain the token |\@nil|, unless it is within a brace group. +% The names of these commands were changed at version~1.05 to ensure +% that they do not clash with `internal' macros in a key family `sp'. +% +% Since v1.10, |#| may appear in the second argument without it +% needing to be doubled as |##|. Also earlier versions would +% drop any initial brace group, so |{abc}d| would incorrectly +% be treated as |abcd|. The current version only removes brace +% groups that surround the entire value, so |{abcd}| \emph{is} treated +% correctly as |abcd|. In fact, two levels of bracing are removed, if +% you require the entire argument to be a single brace group, you must +% use |{{{abcd}}}|. +% +% \begin{macrocode} +\def\@tempa#1{% +% \end{macrocode} +% +% \begin{macrocode} +\def\KV@@sp@def##1##2{% + \futurelet\KV@tempa\KV@@sp@d##2\@nil\@nil#1\@nil\relax##1}% +% \end{macrocode} +% +% Early release removed initial space by having an `extra' argument +% in |\KV@@sp@b| but that removed too many braces, so now make +% |\KV@@sp@b| explicitly remove a single space token. That unfortunately +% means we need the new |\KV@@sp@d| command to add a space token if +% one was not there before. +% \begin{macrocode} +\def\KV@@sp@d{% + \ifx\KV@tempa\@sptoken + \expandafter\KV@@sp@b + \else + \expandafter\KV@@sp@b\expandafter#1% + \fi}% +% \end{macrocode} +% +% \begin{macrocode} +\def\KV@@sp@b#1##1 \@nil{\KV@@sp@c##1}% +% \end{macrocode} +% +% \begin{macrocode} +%\def\@sptoken{#1}% +% \end{macrocode} +% +% Make the above definitions, inserting the space token where needed. +% \begin{macrocode} + } +\@tempa{ } +% \end{macrocode} +% +% \begin{macrocode} +\def\KV@@sp@c#1\@nil#2\relax#3{\KV@toks@{#1}\edef#3{\the\KV@toks@}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\KV@toks@} +% Macro register used above to prevent |#| doubling. +% Avoid uding one of the normal scratch registers, as this code +% is not in a local group. +% \begin{macrocode} +\newtoks\KV@toks@ +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\define@key} +% Define the command associated to the key |#2| in the family |#1|. +% First looks for a default argument (the default value for the +% key) +% \begin{macrocode} +\def\define@key#1#2{% + \@ifnextchar[{\KV@def{#1}{#2}}{\@namedef{KV@#1@#2}####1}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\KV@def} +% Make the definitions of the command, and the default value. +% \begin{macrocode} +\def\KV@def#1#2[#3]{% + \@namedef{KV@#1@#2@default\expandafter}\expandafter + {\csname KV@#1@#2\endcsname{#3}}% + \@namedef{KV@#1@#2}##1} +% \end{macrocode} +% \end{macro} +% +% \begin{macrocode} +% +% \end{macrocode} +% \Finale +% +\endinput diff --git a/Master/texmf-dist/source/latex/graphics/lscape.dtx b/Master/texmf-dist/source/latex/graphics/lscape.dtx new file mode 100644 index 00000000000..9168ec24425 --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/lscape.dtx @@ -0,0 +1,134 @@ +% +% \iffalse +% +%% lscape.dtx Copyright (C) 1994 1999-2000 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. +%% +%<*dtx> + \ProvidesFile{lscape.dtx} +% +%\NeedsTeXFormat{LaTeX2e}[1994/06/01] +%\ProvidesPackage{lscape} +% \ProvidesFile{lscape.drv} +% \fi +% \ProvidesFile{lscape.dtx} + [2000/10/22 v3.01 Landscape Pages (DPC)] +% +% \iffalse +%<*driver> +\documentclass{ltxdoc} +\usepackage{lscape} +\begin{document} + \DocInput{lscape.dtx} +\end{document} +% +% \fi +% +% \GetFileInfo{lscape.dtx} +% +% \title{The \textsf{lscape} package\thanks{This file +% has version number \fileversion, last +% revised \filedate.}} +% \author{D. P. Carlisle} +% \date{\filedate} +% +% \CheckSum{69} +% +% \begin{landscape} +% \maketitle +% +% All text, within the \texttt{landscape} environment is rotated through +% 90 degrees. The environment may span several pages. It works well +% with, and was originally created for, use with \textsf{longtable} to +% produce long wide tables. +% +% All the work is done by the \textsf{graphics} package, the trick is to +% call it at the right place in the output routine to rotate the current +% page before the page head and foot are added. +% +% +% \StopEventually{\end{landscape}} +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% +% \changes{v1.00}{1992/04/28}{Initial release} +% \changes{v2.00}{1992/11/18}{Support for footnotes and floats. +% Special thanks to Sarah J. McQuay for testing this release} +% \changes{v3.00}{1994/10/05}{Update using LaTeX2e graphics package} +% \changes{v3.01}{1999/06/22}{Added better pdfTeX support +% by Scott Pakin, from graphics/3063} +% +% +% \begin{macrocode} +%<*package> +% \end{macrocode} +% Here is what Scott Pakin wrote about the pdftex option: +% \begin{quote} +% I've made a minor improvement to lscape.dtx that I'd like to share +% with the world. My addition makes lscape rotate the PDF "paper" -- +% not just the text on the page -- when given the "pdftex" option. +% (Naturally, this works only with pdfLaTeX.) The result is that the +% text is viewable online without the reader having to rotate his/her +% head 90 degrees. The document still prints normally. +% \end{quote} +% +% +% \begin{macrocode} +\newif\ifGin@pdftex +\Gin@pdftexfalse +\DeclareOption{pdftex}{% + \PassOptionsToPackage\CurrentOption{graphics} + \Gin@pdftextrue +} +\DeclareOption*{\PassOptionsToPackage\CurrentOption{graphics}} +\ProcessOptions +\RequirePackage{graphics} +% \end{macrocode} +% +% \begin{macrocode} +\let\LS@makecol=\@makecol +\let\LS@makefcolumn=\@makefcolumn +\def\LS@rot{% + \setbox\@outputbox\vbox{\hbox{\rotatebox{90}{\box\@outputbox}}}} +% \end{macrocode} +% +% First set up the page size for landscape. +% \begin{macrocode} +\def\landscape{% + \clearpage + \begingroup + \vsize=\textwidth + \hsize=\textheight + \linewidth=\hsize + \columnwidth=\hsize + \@colroom=\vsize + \textheight=\vsize + \@colht=\vsize +% \end{macrocode} +% Rotate the page body (text and float pages). +% \begin{macrocode} + \def\@makecol{\LS@makecol\LS@rot}% + \def\@makefcolumn##1{\LS@makefcolumn{##1}\LS@rot}} +% \end{macrocode} +% +% Restore everything. This is where the pdftex option makes a +% difference. +% \begin{macrocode} +\def\endlandscape{% + \ifGin@pdftex + \pdfpageattr{/Rotate 90} + \fi + \clearpage + \endgroup + \global\@colht=\textheight + \global\vsize=\textheight + \global\@colroom=\textheight} +% +% \end{macrocode} +% +% +% \Finale +% diff --git a/Master/texmf-dist/source/latex/graphics/pstcol.dtx b/Master/texmf-dist/source/latex/graphics/pstcol.dtx new file mode 100644 index 00000000000..7fba93a1dd1 --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/pstcol.dtx @@ -0,0 +1,159 @@ +% +% \iffalse +% +%% pstcol.dtx Copyright (C) 1994--1996 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. +%% +%<*dtx> + \ProvidesFile{pstcol.dtx} +% +%\NeedsTeXFormat{LaTeX2e} +%\ProvidesPackage{pstcol} +% \ProvidesFile{pstcol.drv} +% \fi +% \ProvidesFile{pstcol.dtx} + [2001/06/20 v1.1 PSTricks color colompatibility (DPC)] +% +% \iffalse +%<*driver> +\documentclass{ltxdoc} +\begin{document} +\DocInput{pstcol.dtx} +\end{document} +% +% \fi +% +% \CheckSum{98} +% +% \GetFileInfo{pstcol.dtx} +% +% \changes{v0.1}{1994/10/27} +% {Initial version} +% \changes{v1.0}{1996/10/28} +% {Documentation improvements} +% +% \title{\textsf{pstcol} package\thanks{This file +% has version number \fileversion, last +% revised \filedate.}} +% \author{David Carlisle} +% \date{\filedate} +% +% +% \maketitle +% +% \begin{abstract} +% Hopefully temporary package modifying PSTricks colour interface to +% work with standard LaTeX colours. +% \end{abstract} +% +% \StopEventually{} +% +% \begin{macrocode} +%<*package> +% \end{macrocode} +% +% Require PSTricks +%%%%%%%%%%%%%%%%%% +% \begin{macrocode} +\let\saved@gray\color@gray +\RequirePackage{pstricks} +\let\color@gray\saved@gray +% \end{macrocode} +% +% Require Colour +%%%%%%%%%%%%%%%% +% \begin{macrocode} +\DeclareOption*{\PassOptionsToPackage\CurrentOption{color}} +\ProcessOptions +\RequirePackage{color} +% \end{macrocode} +% +% Redefine PST access functions in terms of color.sty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \begin{macrocode} +\def\pst@getcolor#1#2{% +\@ifundefined{\string\color@#1}% +{\@pstrickserr{Color `#1' not defined}\@eha}% + {\edef#2{\expandafter\expandafter\expandafter + \c@lor@to@ps\csname\string\color @#1\endcsname\@@}}} +% \end{macrocode} +% +% \begin{macrocode} +\def\pst@usecolor#1{#1\space} +% \end{macrocode} +% +% Redefine some predefined colors that are in pst but not in color.sty +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \begin{macrocode} +\definecolor{darkgray}{gray}{.25} +\definecolor{gray}{gray}{.5} +\definecolor{lightgray}{gray}{.75} +\definecolor{gradbegin}{rgb}{0,1,1} +\definecolor{gradend}{rgb}{0,.1,.95} +% \end{macrocode} +% +% Redeclare the default colours with the new definitions +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \begin{macrocode} +\psset@bordercolor{white} +\psset@doublecolor{white} +\psset@linecolor{black} +\psset@fillcolor{white} +\psset@hatchcolor{black} +\psset@gridcolor{black} +\psset@gridlabelcolor{black} +\psset@shadowcolor{darkgray} +\psset@subgridcolor{gray} +% \end{macrocode} +% +% +% Redefine the PST user-definition commands in terms of |\definecolor| +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \begin{macrocode} +\def\newgray#1{% + \definecolor{#1}{gray}} +% \end{macrocode} +% +% \begin{macrocode} +\def\newrgbcolor#1#2{% + \newrgbcolorx{#1}#2\@@} +\def\newrgbcolorx#1#2 #3 #4\@@{% + \definecolor{#1}{rgb}{#2,#3,#4}} +% \end{macrocode} +% +% \begin{macrocode} +\def\newcmykcolor#1#2{% + \newcmykcolorx{#1}#2\@@} +\def\newcmykcolorx#1#2 #3 #4 #5\@@{% + \definecolor{#1}{cmyk}{#2,#3,#4,#5}} +% \end{macrocode} +% +% \changes{v1.1}{2001/06/20}{Added redefinitions for PSTricks' +% predefined color commands (CAR) graphics/3233} +% Finally, redefine some predefined user commands from pst +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \begin{macrocode} +\renewcommand\black {\color{black}} +\renewcommand\darkgray {\color{darkgray}} +\renewcommand\gray {\color{gray}} +\renewcommand\lightgray{\color{lightgray}} +\renewcommand\white {\color{white}} +\renewcommand\blue {\color{blue}} +\renewcommand\red {\color{red}} +\renewcommand\green {\color{green}} +\renewcommand\yellow {\color{yellow}} +\renewcommand\magenta {\color{magenta}} +\renewcommand\cyan {\color{cyan}} +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \Finale +% + diff --git a/Master/texmf-dist/source/latex/graphics/trig.dtx b/Master/texmf-dist/source/latex/graphics/trig.dtx new file mode 100644 index 00000000000..8540ec3dee7 --- /dev/null +++ b/Master/texmf-dist/source/latex/graphics/trig.dtx @@ -0,0 +1,308 @@ +% \iffalse +%% File: trig.dtx Copyright (C) 1993 1994 1995 1996 1997 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. +%% +% +%<*dtx> + \ProvidesFile{trig.dtx} +% +%<*!plain> +%\NeedsTeXFormat{LaTeX2e} +%\ProvidesPackage{trig} +% \ProvidesFile{trig.drv} +% \fi +% \ProvidesFile{trig.dtx} + [1999/03/16 v1.09 sin cos tan (DPC)] +% +% \iffalse +% +%<*driver> +\documentclass{ltxdoc} +\usepackage{trig} +\begin{document} + \DocInput{trig.dtx} +\end{document} +% +% \fi +% +% \GetFileInfo{trig.dtx} +% \title{The \textsf{trig} package\thanks{This file +% has version number \fileversion, last +% revised \filedate.}} +% \author{David Carlisle} +% \date{\filedate} +% \maketitle +% +% \CheckSum{246} +% +% \changes{v1.00}{1993/00/00}{Undocumented versions} +% \changes{v1.05}{1993/10/07}{Documented, added tan} +% \changes{v1.06}{1994/02/01}{Update for LaTeX2e} +% \changes{v1.07}{1994/03/15}{Use ltxdoc} +% \changes{v1.08}{1994/10/16}{Change \cs{@xc} to \cs{nin@ty}} +% +% \section{Introduction} +% +% These macros implement the trigonometric functions, sin, cos and tan. +% In each case two commands are defined. For instance the command +% |\CalculateSin{33}| may be isued at some point, and then anywhere +% later in the document, the command |\UseSin{33}| will return the +% decimal expansion of $\sin(33^\circ)$. +% +% The arguments to these macros do not have to be whole numbers, +% although in the case of whole numbers, \LaTeX\ or plain \TeX\ counters +% may be used. In \TeX{}Book syntax, arguments must be of type: +% \meta{optional signs}\meta{factor} +% +% Some other examples are:\\ +% |\CalculateSin{22.5}|, |\UseTan{\value{mycounter}}|, +% |\UseCos{\count@}|. +% +% Note that unlike the psfig macros, these save all previously +% computed values. This could easily be changed, but I thought that in +% many applications one would want many instances of the +% same value. (eg rotating all the headings of a table by the +% \emph{same} amount). +% +% I don't really like this need to pre-calculate the values, I +% originally implemented |\UseSin| so that it automatically calculated +% the value if it was not pre-stored. This worked fine in testing, until +% I remembered why one needs these values. You want to be able to say +% |\dimen2=\UseSin{30}\dimen0|. Which means that |\UseSin| must +% \emph{expand} to a \meta{factor}. +% +% \StopEventually{} +% +% \section{The Macros} +% +% \begin{macrocode} +%<*package> +% \end{macrocode} +% +% \begin{macro}{\nin@ty}\begin{macro}{\@clxx} +% \begin{macro}{\@lxxi}\begin{macro}{\@mmmmlxviii} +% Some useful constants for converting between degrees and radians. +% $$\frac{\pi}{180}\simeq\frac{355}{113\times180}=\frac{71}{4068}$$ +% \begin{macrocode} +\chardef\nin@ty=90 +\chardef\@clxx=180 +\chardef\@lxxi=71 +\mathchardef\@mmmmlxviii=4068 +% \end{macrocode} +% \end{macro}\end{macro}\end{macro}\end{macro} +% +% The approximation to $\sin$. I experimented with various +% approximations based on Tchebicheff polynomials, and also some +% approximations from a SIAM handbook `Computer Approximations' However +% the standard Taylor series seems sufficiently accurate, and used by +% far the fewest \TeX\ tokens, as the coefficients are all rational. +% \begin{eqnarray*} +% \sin(x)& \simeq& x - (1/3!)x^3 + (1/5!)x^5 - (1/7!)x^7 + (1/9!)x^9\\ +% &\simeq&\frac{((((7!/9!x^2-7!/7!)x^2+7!/5!)x^2 +7!/3!)x^2+7!/1!)x} +% {7!}\\ +% &=&\frac{((((1/72x^2-1)x^2+42)x^2 +840)x^2+5040)x} +% {5040} +% \end{eqnarray*} +% The nested form used above reduces the number of operations required. +% In order to further reduce the number of operations, and more +% importantly reduce the number of tokens used, we can precompute the +% coefficients. Note that we can not use $9!$ as the denominator as +% this would cause overflow of \TeX's arithmetic. +% \begin{macro}{\@coeffz}\begin{macro}{\@coeffa}\begin{macro}{\@coeffb} +% \begin{macro}{\@coeffc}\begin{macro}{\@coeffd} +% Save the coefficients as |\|(|math|)|char|s. +% \begin{macrocode} +\chardef\@coeffz=72 +%\chardef\@coefa=1 +\chardef\@coefb=42 +\mathchardef\@coefc=840 +\mathchardef\@coefd=5040 +% \end{macrocode} +% \end{macro}\end{macro}\end{macro}\end{macro}\end{macro} +% +% \begin{macro}{\TG@rem@pt} +% The standard trick of getting a real number out of a \meta{dimen}. +% This gives a maximum accuracy of approx.\ 5 decimal places, which +% should be sufficient. It puts a space after the number, perhaps it +% shouldn't. +% \begin{macrocode} +{\catcode`t=12\catcode`p=12\gdef\noPT#1pt{#1}} +\def\TG@rem@pt#1{\expandafter\noPT\the#1\space} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\TG@term} +% Compute one term of the above nested series. Multiply the previous sum +% by $x^2$ (stored in |\@tempb|, then add the next coefficient, |#1|. +% \begin{macrocode} +\def\TG@term#1{% + \dimen@\@tempb\dimen@ + \advance\dimen@ #1\p@} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\TG@series} +% Compute the above series. the value in degrees will be in |\dimen@| +% before this is called. +% \begin{macrocode} +\def\TG@series{% + \dimen@\@lxxi\dimen@ + \divide \dimen@ \@mmmmlxviii +% \end{macrocode} +% |\dimen@| now contains the angle in radians, as a \meta{dimen}. We +% need to remove the units, so store the same value as a \meta{factor} +% in |\@tempa|. +% \begin{macrocode} + \edef\@tempa{\TG@rem@pt\dimen@}% +% \end{macrocode} +% Now put $x^2$ in |\dimen@| and |\@tempb|. +% \begin{macrocode} + \dimen@\@tempa\dimen@ + \edef\@tempb{\TG@rem@pt\dimen@}% +% \end{macrocode} +% The first coefficient is $1/72$. +% \begin{macrocode} + \divide\dimen@\@coeffz + \advance\dimen@\m@ne\p@ + \TG@term\@coefb + \TG@term{-\@coefc}% + \TG@term\@coefd +% \end{macrocode} +% Now the cubic in $x^2$ is completed, so we need to multiply by $x$ and +% divide by $7!$. +% \begin{macrocode} + \dimen@\@tempa\dimen@ + \divide\dimen@ \@coefd} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\CalculateSin} +% If this angle has already been computed, do nothing, else store the +% angle, and call |\TG@@sin|. +% \begin{macrocode} +\def\CalculateSin#1{{% + \expandafter\ifx\csname sin(\number#1)\endcsname\relax + \dimen@=#1\p@\TG@@sin + \expandafter\xdef\csname sin(\number#1)\endcsname + {\TG@rem@pt\dimen@}% + \fi}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\CalculateCos} +% As above, but use the relation $\cos(x) = \sin(90-x)$. +% \begin{macrocode} +\def\CalculateCos#1{{% + \expandafter\ifx\csname cos(\number#1)\endcsname\relax + \dimen@=\nin@ty\p@ + \advance\dimen@-#1\p@ + \TG@@sin + \expandafter\xdef\csname cos(\number#1)\endcsname + {\TG@rem@pt\dimen@}% + \fi}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\TG@reduce} +% Repeatedly use one of the the relatations +% $\sin(x)=\sin(180-x)=\sin(-180-x)$ to get $x$ in the range $-90 \leq +% x\leq 90$. Then call |\TG@series|. +% \begin{macrocode} +\def\TG@reduce#1#2{% +\dimen@#1#2\nin@ty\p@ + \advance\dimen@#2-\@clxx\p@ + \dimen@-\dimen@ + \TG@@sin} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\TG@@sin} +% Slightly cryptic, but it seems to work\ldots +% \begin{macrocode} +\def\TG@@sin{% + \ifdim\TG@reduce>+% + \else\ifdim\TG@reduce<-% + \else\TG@series\fi\fi}% +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\UseSin} +% \begin{macro}{\UseCos} +% Use a pre-computed value. +% \begin{macrocode} +\def\UseSin#1{\csname sin(\number#1)\endcsname} +\def\UseCos#1{\csname cos(\number#1)\endcsname} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% A few shortcuts to save space. +% \begin{macrocode} +\chardef\z@num\z@ +\expandafter\let\csname sin(0)\endcsname\z@num +\expandafter\let\csname cos(0)\endcsname\@ne +\expandafter\let\csname sin(90)\endcsname\@ne +\expandafter\let\csname cos(90)\endcsname\z@num +\expandafter\let\csname sin(-90)\endcsname\m@ne +\expandafter\let\csname cos(-90)\endcsname\z@num +\expandafter\let\csname sin(180)\endcsname\z@num +\expandafter\let\csname cos(180)\endcsname\m@ne +% \end{macrocode} +% +% \begin{macro}{\CalculateTan} +% Originally I coded the Taylor series for tan, but it seems to be +% more accurate to just take the ratio of the sine and cosine. +% This is accurate to 4 decimal places for angles up to +% $50^\circ$, after that the accuracy tails off, giving +% 57.47894 instead of 57.2900 for $89^\circ$. +% \begin{macrocode} +\def\CalculateTan#1{{% + \expandafter\ifx\csname tan(\number#1)\endcsname\relax + \CalculateSin{#1}% + \CalculateCos{#1}% + \@tempdima\UseCos{#1}\p@ + \divide\@tempdima\@iv + \@tempdimb\UseSin{#1}\p@ + \@tempdimb\two@fourteen\@tempdimb + \divide\@tempdimb\@tempdima + \expandafter\xdef\csname tan(\number#1)\endcsname + {\TG@rem@pt\@tempdimb}% + \fi}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\UseTan} +% Just like |\UseSin|. +% \begin{macrocode} +\def\UseTan#1{\csname tan(\number#1)\endcsname} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\two@fourteen} +% \begin{macro}{\@iv} +% two constants needed to keep the division within \TeX's range. +% \begin{macrocode} +\mathchardef\two@fourteen=16384 +\chardef\@iv=4 +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% Predefine $\tan(\pm90)$ to be an error. +% \begin{macrocode} +\expandafter\def\csname tan(90)\endcsname{\errmessage{Infinite tan !}} +\expandafter\let\csname tan(-90)\expandafter\endcsname + \csname tan(90)\endcsname +% \end{macrocode} +% +% \begin{macrocode} +% +% \end{macrocode} +% +% \Finale +% +\endinput -- cgit v1.2.3