diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /graphics/pictex/postpictex.tex |
Initial commit
Diffstat (limited to 'graphics/pictex/postpictex.tex')
-rw-r--r-- | graphics/pictex/postpictex.tex | 44 |
1 files changed, 44 insertions, 0 deletions
diff --git a/graphics/pictex/postpictex.tex b/graphics/pictex/postpictex.tex new file mode 100644 index 0000000000..d46612a862 --- /dev/null +++ b/graphics/pictex/postpictex.tex @@ -0,0 +1,44 @@ +% This is postpictex.tex Version 1.1 9/10/87 + +% To use the PiCTeX macros under LaTeX, you first need to \input the +% file prepictex.tex, then the main corpus of PiCTeX macros (pictex.tex), +% and finally this file. Do not \input the file latexpicobjs.tex. + +\catcode`@=11 \catcode`!=11 + +% Save meanings of PiCTeX keywords that duplicate LaTeX keywords +\let\!pictexendpicture=\endpicture +\let\!pictexframe=\frame +\let\!pictexlinethickness=\linethickness +\let\!pictexmultiput=\multiput +\let\!pictexput=\put + +% Redefine the PiCTeX \beginpicture macro +\def\beginpicture{% + \setbox\!picbox=\hbox\bgroup% + \let\endpicture=\!pictexendpicture + \let\frame=\!pictexframe + \let\linethickness=\!pictexlinethickness + \let\multiput=\!pictexmultiput + \let\put=\!pictexput + \let\input=\@@input % \@@input is LaTeX's saved version of TeX's primitive + \!xleft=\maxdimen + \!xright=-\maxdimen + \!ybot=\maxdimen + \!ytop=-\maxdimen} + +% Reestablish LaTeX's meaning of \frame. This makes +% PiCTeX's meaning of \frame available only inside a PiCture. +\let\frame=\!latexframe + +% Make PiCTeX's meaning of \frame available everywhere in the +% guise of \pictexframe +\let\pictexframe=\!pictexframe + +% Now do the same for \linethickness +\let\linethickness=\!latexlinethickness +\let\pictexlinethickness=\!pictexlinethickness + +% Reset LaTeX's default meaning of \\ +\let\\=\@normalcr +\catcode`@=12 \catcode`!=12 |