Plan 9 from Bell Labs’s /usr/web/sources/contrib/steve/root/sys/lib/texmf/source/latex/graphics/epsfig.dtx

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


%
% \iffalse
%
%% epsfig.dtx Copyright (C) 1994-1996 Sebastian Rahtz
%%
%% This file is part of the Standard LaTeX `Graphics Bundle'.
%%
%% It should be distributed *unchanged* and together with all other
%% files in the graphics bundle. The file 00readme.txt contains a list
%% of all of these files.
%%
%% A modified version of this file may be distributed, but it should
%% be distributed with a *different* name. Changed files must be
%% distributed *together with a complete and unchanged* distribution
%% of these files.
%%
%<*dtx>
          \ProvidesFile{epsfig.dtx}
%</dtx>
%<package>\NeedsTeXFormat{LaTeX2e}[1994/06/01]
%<package>\ProvidesPackage{epsfig}
%<driver> \ProvidesFile{epsfig.drv}
% \fi
%         \ProvidesFile{epsfig.dtx}
                  [1996/10/04 v1.7 (e)psfig emulation (SPQR)]
%
% \iffalse
%<*driver>
\documentclass{ltxdoc}
\begin{document}
 \DocInput{epsfig.dtx}
\end{document}
%</driver>
% \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}}
%</package>
%    \end{macrocode}
% \end{macro}
%
% \Finale
%


Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to webmaster@9p.io.