summaryrefslogtreecommitdiff
path: root/indexing/glo+idxtex/crlext.sty
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /indexing/glo+idxtex/crlext.sty
Initial commit
Diffstat (limited to 'indexing/glo+idxtex/crlext.sty')
-rw-r--r--indexing/glo+idxtex/crlext.sty387
1 files changed, 387 insertions, 0 deletions
diff --git a/indexing/glo+idxtex/crlext.sty b/indexing/glo+idxtex/crlext.sty
new file mode 100644
index 0000000000..8851b28c8d
--- /dev/null
+++ b/indexing/glo+idxtex/crlext.sty
@@ -0,0 +1,387 @@
+% CRL Extensions to LaTeX
+%
+\typeout{CRDS Extensions to LaTeX, V1.1. (RL Aurbach, 09-Sep-1986)}
+%
+%****************************************************************************
+%* *
+%* Outline Environment *
+%* *
+%* Description: *
+%* The outline environment is a modified enumerate environment in *
+%* which the numbering is done using standard outlining conventions. *
+%* *
+%* Syntax: *
+%* \begin{outline} \item text \end{outline} *
+%* *
+%****************************************************************************
+%
+\@definecounter{outlni} \@definecounter{outlnii} \@definecounter{outlniii}
+\@definecounter{outlniv} \@definecounter{outlnv}
+\newcount\@outlndepth \@outlndepth =0
+\def\outline{\ifnum \@outlndepth >4 \@toodeep \else \advance\@outlndepth\@ne
+ \edef\@outlnctr{outln\romannumeral\the\@outlndepth}\list
+ {\csname label\@outlnctr\endcsname}{\usecounter{\@outlnctr}
+ \def\makelabel##1{\hss\llap{##1}}}\fi}
+\let\endoutline =\endlist
+\def\labeloutlni{\Roman{outlni}.} \def\theoutlni{\Roman{outlni}}
+\def\labeloutlnii{\Alph{outlnii}.} \def\theoutlnii{\Alph{outlnii}}
+\def\labeloutlniii{\arabic{outlniii}.} \def\theoutlniii{\arabic{outlniii}}
+\def\labeloutlniv{\alph{outlniv}.} \def\theoutlniv{\alph{outlniv}}
+\def\labeloutlnv{(\roman{outlnv})} \def\theoutlnv{\roman{outlnv}}
+\def\p@outlnii{\theoutlni.} \def\p@outlniii{\p@outlnii\theoutlnii.}
+\def\p@outlniv{\p@outlniii\theoutlniii.}\def\p@outlnv{\p@outlniv\theoutlniv.}
+%
+%****************************************************************************
+%* *
+%* InfoMap Environment *
+%* *
+%* Description: *
+%* The infomap environment is a modified description environment in *
+%* which the label is set off from the text as a signpost. The *
+%* signpost is implemented in a \parbox to allow for a multi-line *
+%* label. *
+%* *
+%* Syntax: *
+%* \begin{infomap} \item[label] text \end{infomap} *
+%* *
+%* Where: *
+%* label is the text to be placed in the Signpost at the current *
+%* left margin. *
+%* *
+%* Note: *
+%* The signpost is implemented as a \parbox set in a \raisebox which *
+%* has a depth of 0pt. This is necessary to make a multi-line sign- *
+%* work correctly, but occasionally, you will need to add extra *
+%* vertical space if the signpost occupies more lines than the text. *
+%* *
+%****************************************************************************
+%
+\newdimen\infomapmargin
+\newdimen\infomapwidth
+\infomapmargin 115pt
+\infomapwidth 103pt
+\def\infomaplabel#1{\raisebox{0pt}[1em][0pt]{\makebox[\labelwidth][l]
+ {\parbox[t]{\infomapwidth}{\bf #1}}}}
+\def\infomap{\list{}{\leftmargin\infomapmargin
+ \labelwidth\leftmargin\advance\labelwidth-\labelsep
+ \let\makelabel\infomaplabel}}
+\let\endinfomap\endlist
+\def\ttitem[#1]{\item[{\tt #1}]}
+%
+%****************************************************************************
+%* *
+%* Note Environment *
+%* *
+%* Description: *
+%* The note environment is a modified version of the quote environment.*
+%* It is distinctive in that it has a centered title for the note *
+%* prior to the beginning of the text. The title may be specified, *
+%* using the optional argument. If no title is specified, the title *
+%* "Note" is used. *
+%* *
+%* Syntax: *
+%* \begin{note}[title] text \end{note} *
+%* *
+%* Where: *
+%* title is the text to be used as the title. If not specified *
+%* "Note" is used. The title is centered above the text, *
+%* in boldface. *
+%* *
+%* Note: *
+%* It is possible for the title and text of a note to be separated *
+%* across a page break. So far, I haven't been able to discover a *
+%* fool-proof way to prevent this from occurring, so check the output. *
+%* *
+%****************************************************************************
+%
+\def\note{\@ifnextchar [{\@note}{\@note[Note]}}
+\def\@note[#1]{\par \list{}{\leftmargin 2em \rightmargin\leftmargin }
+ \item[] \hfil {\bf #1} \hfil \par \item[]}
+\let\endnote\endlist
+%
+%****************************************************************************
+%* *
+%* Ctl Command *
+%* *
+%* Description: *
+%* The \ctl command is used to place a representation of a control *
+%* character in the document. \ctl{x} is represented as ^x. *
+%* *
+%* Syntax: *
+%* \ctl{ch} *
+%* *
+%* Where: *
+%* ch is the character to be represented. *
+%* *
+%* Note: *
+%* The character is displayed in \tt. *
+%* *
+%****************************************************************************
+%
+\def\ctl#1{{\tt $^\wedge$#1}}
+%
+%****************************************************************************
+%* *
+%* Trademark Command *
+%* *
+%* Description: *
+%* This command generates a trademark symbol (an R in a circle). The *
+%* symbol is normally used as "foo$^\trademark$". *
+%* *
+%* Syntax: *
+%* \trademark *
+%* *
+%* Note: *
+%* Thanks to Kent McPherson of Lear/Siegler for this command. *
+%* *
+%****************************************************************************
+%
+\def\trademark{{\ooalign
+ {\tiny \hfill \raise .085ex\hbox{R}\hfill \crcr
+ \scriptsize \mathhexbox20D}}}
+%
+%****************************************************************************
+%* *
+%* ULine Command *
+%* *
+%* Description: *
+%* The \uline command is used to underline text. Unlike the *
+%* \underline command, \uline provides the user with the ability to *
+%* control the thickness of the line. *
+%* *
+%* Syntax: *
+%* \uline{text}{thickness} *
+%* *
+%* Where: *
+%* text is the text which will be underlined. *
+%* *
+%* thickness is the thickness of the line. This dimension is *
+%* typically .3pt --.5pt. *
+%* *
+%* Note: *
+%* Thanks to Kent McPherson of Lear/Siegler for this command. *
+%* *
+%****************************************************************************
+%
+\newlength{\ulength}
+\newcommand{\uline}[2]{\settowidth{\ulength}{#1}
+ \parbox{\ulength}{{#1} \\[-.75\baselineskip] \rule{\ulength}{#2}}}
+%
+%****************************************************************************
+%* *
+%* ClearDoublePage Command *
+%* *
+%* Description: *
+%* This command is a modification of the standard LaTeX command of the *
+%* same name. Unlike standard LaTeX, this command uses the "empty" *
+%* pagestyle for the blank page it throws, so that the page is totally *
+%* blank. *
+%* *
+%* Syntax: *
+%* \cleardoublepage *
+%* *
+%****************************************************************************
+%
+\def\cleardoublepage{\clearpage\if@twoside \ifodd\c@page\else
+ \if@twocolumn\hbox{}\newpage\fi\hbox{}\thispagestyle{empty}\newpage\fi\fi}
+%
+%****************************************************************************
+%* *
+%* ForceRightPage Command *
+%* *
+%* Description: *
+%* The \forcerightpage command is a variant on the \cleardoublepage *
+%* command. It conditionally throws a blank page to force the text *
+%* which follows to appear on a right-hand page. The blank page will *
+%* contain an optional, centered message. *
+%* *
+%* Syntax: *
+%* \forcerightpage[text] *
+%* *
+%* Where: *
+%* text is the text to be displayed centered on the page. If *
+%* not specified, "This page intentionally left blank" *
+%* is used. *
+%* *
+%* Note: *
+%* This command will not correctly handle a two-column document and *
+%* should not be used in that environment. *
+%* *
+%****************************************************************************
+%
+\def\forcerightpage{\@ifnextchar [{\@forcerightpage}
+ {\@forcerightpage[This page intentionally left blank]}}
+\def\@forcerightpage[#1]{\clearpage\if@twoside \ifodd\c@page\else
+ \hbox{} \vfill \centerline{#1} \vfill \newpage\fi\fi}
+%
+%****************************************************************************
+%* *
+%* ForceLeftPage Command *
+%* *
+%* Description: *
+%* The \forceleftpage command is a variant on the \cleardoublepage *
+%* command. It conditionally throws a blank page to force the text *
+%* which follows to appear on a left-hand page. The blank page will *
+%* contain an optional, centered message. *
+%* *
+%* Syntax: *
+%* \forceleftpage[text] *
+%* *
+%* Where: *
+%* text is the text to be displayed centered on the page. If *
+%* not specified, "This page intentionally left blank" *
+%* is used. *
+%* *
+%* Note: *
+%* This command will not correctly handle a two-column document and *
+%* should not be used in that environment. *
+%* *
+%****************************************************************************
+%
+\def\forceleftpage{\@ifnextchar [{\@forceleftpage}
+ {\@forceleftpage[This page intentionally left blank]}}
+\def\@forceleftpage[#1]{\clearpage \if@twoside \ifodd\c@page
+ \hbox{} \vfill \centerline{#1} \vfill \newpage\fi\fi}
+%
+%****************************************************************************
+%* *
+%* Input Command *
+%* *
+%* Description: *
+%* The \input command is a variation of the standard LaTeX command of *
+%* the same name. It reads in an external file. It differs from the *
+%* normal LaTeX command in that if the specified file is not found, *
+%* the routine displays a message and continues, rather than prompting *
+%* for a new file name. *
+%* *
+%* Syntax: *
+%* \input{file} *
+%* *
+%* Where: *
+%* file is the file specification of the input file to be read. *
+%* By default, the file has the file type ".tex" unless *
+%* specified otherwise. If the file is not found in the *
+%* current default directory, it will be searched for in *
+%* TEX$INPUTS. *
+%* *
+%****************************************************************************
+%
+\def\input{\@ifnextchar \bgroup{\@input}{\@@input }}
+%
+%****************************************************************************
+%* *
+%* CoverStyle Command *
+%* *
+%* Description: *
+%* This routine defines a cover style for a document. It reads in a *
+%* ".cvrsty" file, which contains the necessary information. *
+%* *
+%* Syntax: *
+%* \coverstyle{name} *
+%* *
+%* Where: *
+%* name is the name of a coverstyle. The file name.cvrsty will *
+%* be input. *
+%* *
+%****************************************************************************
+%
+\def\coverstyle#1{\def\@coverstyle{#1}
+ \makeatletter \input \@coverstyle.cvrsty \relax \makeatother}
+%
+%****************************************************************************
+%* *
+%* ScreenPix Environment *
+%* *
+%* Description: *
+%* The screenpix environment is used to display the image of a screen *
+%* in a document. A curved line is drawn at the top, which represents *
+%* the beginning of the screen. After the verbatim text, another line *
+%* is drawn at the bottom to represent the bottom of the screen. *
+%* *
+%* Lines up to 80 characters long may appear. You should place a *
+%* leading space at the beginning of each line, so that the text will *
+%* not overwrite the curved lines. Since tabs are not expanded in *
+%* verbatim mode, they should be explicitly converted to spaces. *
+%* *
+%* Syntax: *
+%* \begin{screenpix} *
+%* \begin{verbatim} *
+%* lines of verbatim screen-image text *
+%* \end{verbatim} *
+%* \end{screenpix} *
+%* *
+%* Where: *
+%* The lines of verbatim text may be up to 80 characters long, not *
+%* counting the REQUIRED leading space on each line. *
+%* *
+%* Note: *
+%* This environment assumes that a text width of 6 inches is available *
+%* for the display of the screen. *
+%* *
+%****************************************************************************
+%
+\def\screenpix{\small \setlength{\unitlength}{1in} \thicklines
+ \begin{picture}(6,.35) \put(3,0){\oval(6,.7)[t]} \end{picture}\par
+ \vspace*{-3\parskip}}
+\def\endscreenpix{\vspace*{-3\parskip}
+ \begin{picture}(6,.35) \put(3,.35){\oval(6,.7)[b]} \end{picture}}
+%
+%****************************************************************************
+%* *
+%* Glossaryfile Command *
+%* *
+%* Description: *
+%* This command is used to specify one or more Glossary Definition *
+%* files which will be searched for glossary definitions by GloTeX. *
+%* *
+%* Syntax: *
+%* \glossaryfile{filelist} *
+%* *
+%* Where: *
+%* filelist is a file specification of a .gdf file or a comma-list *
+%* of file specifications. *
+%* *
+%* Note: *
+%* This command writes a \glofile command to the .glo file *
+%* *
+%****************************************************************************
+%
+\def\glossaryfile#1{\if@filesw\write\@glossaryfile{\string
+ \glofile{#1}}\fi}
+%
+%****************************************************************************
+%* *
+%* InsertGlossary Command *
+%* *
+%* Description: *
+%* This command causes a .gls file to be read in and processed. *
+%* *
+%* Syntax: *
+%* \insertglossary *
+%* *
+%* Note: *
+%* The .gls file is assumed to have the same name as the root latex *
+%* source file. *
+%* *
+%****************************************************************************
+%
+\def\insertglossary{\@input{\jobname.gls}}
+%
+%****************************************************************************
+%* *
+%* InsertIndex Command *
+%* *
+%* Description: *
+%* This command causes an .ind file to be read in and processed. *
+%* *
+%* Syntax: *
+%* \insertindex *
+%* *
+%* Note: *
+%* The .ind file is assumed to have the same name as the root latex *
+%* source file. *
+%* *
+%****************************************************************************
+%
+\def\insertindex{\@input{\jobname.ind}}
+%