1 %% xypdf-l.tex from $Id: xypdf-l.doc,v $

     2 %%

     3 %% Xy-pic ``Line extension'' PDF backend support.

     4 %% Copyright (c) 1999-1999 Ross Moore <ross@mpce.mq.edu.au>

     5 %%

     6 %% This file is part of the Xy-pic package for graphs and diagrams in TeX.

     7 %% See the companion README and INSTALL files for further information.

     8 %% Copyright (c) 1991-1999 Kristoffer H. Rose <krisrose@brics.dk>

     9 %%

    10 %% The Xy-pic package is free software; you can redistribute it and/or modify

    11 %% it under the terms of the GNU General Public License as published by the

    12 %% Free Software Foundation; either version 2 of the License, or (at your

    13 %% option) any later version.

    14 %%

    15 %% The Xy-pic package is distributed in the hope that it will be useful, but

    16 %% WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY

    17 %% or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License

    18 %% for more details.

    19 %%

    20 %% You should have received a copy of the GNU General Public License along

    21 %% with this package; if not, write to the Free Software Foundation, Inc.,

    22 %% 675 Mass Ave, Cambridge, MA 02139, USA.

    23 %%

    24 %% As a special exception, you may use this file and all files derived

    25 %% from it without restrictions. This special exception was added with

    26 %% version 3.7 of Xy-pic.

    27 %%

    28 \expandafter\ifx\csname xypdf-lloaded\endcsname\empty

    29  \message{not reloaded}\endinput \fi

    30 \expandafter\let\csname xypdf-lloaded\endcsname=\empty \xycatcodes

    31 \expandafter\ifx\csname xypdf-sloaded\endcsname\empty\else

    32  \xyinputorelse@{xypdf-s}{\xyerror@{Could not load xypdf-s}{}}%

    33  \xycatcodes\fi

    34 \xydef@\installPDFline@{\installPDFstyle@

    35  \installPDFlinestyles@ \installPDFpolylines@ }

    36 \xydef@\UsePDFlines{\installPDFline@}

    37 \xydef@\NoPDFlines{\UnloadLine@\relax}

    38 \xydef@\xyPDFlineSpecial@#1{\xyPDFrawZ@{ #1 w}}

    39 \xydef@\xyPDFcapSpecial@#1{\xyPDFrawZ@{ #1 J}}

    40 \xydef@\xyPDFjoinSpecial@#1{\xyPDFrawZ@{ #1 j}}

    41 \xydef@\xyPDFmiterSpecial@#1{\xyPDFrawZ@{ #1 M}}

    42 \xydef@\installPDFlinestyles@{%

    43  \let\xylinewidth@@=\xylinewidth@

    44  \let\transxyline@@=\transxyline@

    45  \let\xylineSpecial@@=\xyPDFlineSpecial@

    46  \let\resetxyline@@=\resetxyline@i

    47  \let\xy@linecap@@=\xy@linecap@

    48  \let\xycapSpecial@@=\xyPDFcapSpecial@

    49  \let\resetxylinecap@@=\resetxylinecap@i

    50  \let\xy@linejoin@@=\xy@linejoin@

    51  \let\xyjoinSpecial@@=\xyPDFjoinSpecial@

    52  \let\resetxylinejoin@@=\resetxylinejoin@i

    53  \let\xy@linemiter@@=\xy@linemiter@

    54  \let\xymiterSpecial@@=\xyPDFmiterSpecial@

    55  \let\resetxylinemiter@@=\resetxylinemiter@i

    56 }

    57 \xydef@\xypolylinePDF@Special#1{\PDFspecial@@{ q [] 0 d #1 S Q}}

    58 \xydef@\xypolydotPDF@Special#1{\PDFspecial@@{ q [1 3] 0 d S Q}}

    59 \xydef@\xypolydashPDF@Special#1{\PDFspecial@@{ q [5] 0 d #1 S Q}}

    60 \xydef@\xypolyfillPDF@Special#1{\PDFspecial@@{ q #1 f Q}}

    61 \xydef@\xypolyeofillPDF@Special#1{\PDFmacro@{ q #1 f* Q}}

    62 \xydef@\installPDFpolylines@{%

    63  \let\xypolyline@Special=\xypolylinePDF@Special

    64  \let\xypolydot@Special=\xypolydotPDF@Special

    65  \let\xypolydash@Special=\xypolydashPDF@Special

    66  \let\xypolyfill@Special=\xypolyfillPDF@Special

    67 %\let\xypolyeofill@Special=\xypolyeofillPDF@Special

    68  \let\xy@polystyle@@=\xy@polystyle@ }

    69 \endinput