summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/pictexsum/useful.sty
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-12-28 23:47:28 +0000
committerKarl Berry <karl@freefriends.org>2011-12-28 23:47:28 +0000
commit30a1fd9b015947c4d93f8696ea8367c8f9fa167a (patch)
tree6c06ac85980b47a7b9cf273cf3f22130b2943677 /Master/texmf-dist/doc/latex/pictexsum/useful.sty
parente12ff80ff1745a62a4fcd2b949a4e410bc6eb3ae (diff)
new/old pictexsum document (28dec11)
git-svn-id: svn://tug.org/texlive/trunk@24965 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/pictexsum/useful.sty')
-rw-r--r--Master/texmf-dist/doc/latex/pictexsum/useful.sty176
1 files changed, 176 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/pictexsum/useful.sty b/Master/texmf-dist/doc/latex/pictexsum/useful.sty
new file mode 100644
index 00000000000..541b383ad38
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/pictexsum/useful.sty
@@ -0,0 +1,176 @@
+% Copyright (c) 1990 Angus Duggan
+% All rights reserved.
+%
+% Redistribution and use in source and binary forms, with or without
+% modification, are permitted provided that the following conditions are met:
+%
+% Redistributions of source code must retain the above copyright
+% notice, this list of conditions and the following disclaimer.
+%
+% Redistributions in binary form must reproduce the above copyright
+% notice, this list of conditions and the following disclaimer in the
+% documentation and/or other materials provided with the distribution.
+%
+% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
+% IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
+% TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
+% PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
+% HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+% SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
+% TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+% PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+% LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+% NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+% SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+% useful.sty - useful LaTeX macros for my documents
+% AJCD 18/1/90
+
+% \makeatletter
+%\catcode`@=11
+
+
+% CHARACTERS
+\def\bsl{{\tt\char'134}} % backslash
+\def\crt{\char'136} % caret
+\def\tld{\char'176} % tilde
+\def\bar{\char'174} % vertical bar
+\def\and{\char'046} % ampersand
+\def\squ{{\tt\char'015}} % straight quote
+
+\def\tc#1{\hbox{\tt\bs#1}}
+\def\ctr#1{\quad#1\hfil}
+%\def\type#1{{\tt#1}}
+
+
+% FONTS
+% oldstyle (for numerals)
+\def\oldstyle{\fam\@ne \tenmi}
+
+
+% LOGOS
+% AMS logo
+\def\AMS{American Mathematical Society}
+
+% AmSTeX logo
+\def\AmSTeX{$\cal A\kern-.1667em\lower.5ex\hbox{$\cal M$}\kern-.075em S$-\TeX}
+
+% BiBTeX logo
+\def\BibTeX{{\rm B\kern-.05em{\sc i\kern-.025em b}\kern-.08em \TeX}}
+
+% Metafont logo
+\font\manual=manfnt
+\def\MF{{\manual META}\-{\manual FONT}}
+
+% SliTeX logo
+\def\SliTeX{{\rm S\kern-.06em{\sc l\kern-.035emi}\kern-.06em \TeX}}
+
+% PiCTeX logo
+\def\PiCTeX{P\kern-.12em\lower.5ex\hbox{I}\kern-.075emC\kern-.11em\TeX}
+
+% PiC logo
+\def\PiC{P\kern-.12em\lower.5ex\hbox{I}\kern-.075emC}
+
+
+% COMMANDS
+% discretionary break
+\def\nl{\discretionary{}{}{}}
+
+% linestack: like shortstack, but defaults to normal line spacing
+\def\linestack{\@ifnextchar[{\@linestack}{\@linestack[c]}}
+\def\@linestack[#1]{\leavevmode
+\vbox\bgroup%\baselineskip-1pt\lineskip 3pt
+\let\mb@l\hss
+\let\mb@r\hss \expandafter\let\csname mb@#1\endcsname\relax
+\let\\\@stackcr\@ishortstack}
+
+% inputwith: input file with local style files
+% if first char is '*', count & dimen allocations are shared between styles
+% if second char is also '*', allocations are shared with input file also.
+% This is not clean.
+\newif\ifrealloc \newif\ifmaxalloc
+\newcount\b@secount \newcount\m@xcount
+\newcount\b@sedimen \newcount\m@xdimen
+\def\inputwith{\reallocfalse\maxalloctrue
+ \@ifnextchar*{\realloctrue\@inwithalloc}{\@inwithshare*}}
+\def\@inwithalloc*{\@ifnextchar*{\maxallocfalse\@inwithshare}{\@inwithshare*}}
+\def\@inwithshare*{\@ifnextchar[{\@inwithstyle}{\@inwithstyle[]}}
+\def\@inwithstyle[#1]#2{\bgroup\makeatletter
+ \b@secount\count10 \b@sedimen\count11
+ \m@xcount\b@secount \m@xdimen\b@sedimen
+ \@for\@tempa:={#1}\do
+ {\ifrealloc \count10\b@secount \count11\b@sedimen \fi
+ \expandafter\input\@tempa.sty\relax
+ \ifmaxalloc \ifnum\count10>\m@xcount \m@xcount\count10 \fi
+ \ifnum\count11>\m@xdimen \m@xdimen\count11 \fi\fi}\makeatother
+ \global\count10\m@xcount \global\count11\m@xdimen
+ \input #2\relax\egroup
+}
+
+% readaux: reads another aux file, ignoring table of contents, etc, but
+% collecting references
+\def\readaux#1{% probably want some redefinition here...
+ \makeatletter
+ \@input{#1.aux}
+ \makeatother}
+
+
+% ENVIRONMENTS
+% hanging indentation on a list
+\newbox\hangb@x
+\def\labelled{%
+ \begin{list}{}{\renewcommand{\makelabel}[1]{\setbox\hangb@x\hbox{##1}%
+ \ifdim\wd\hangb@x>\leftmargin
+ \vbox{\hbox to\labelwidth{\box\hangb@x\hss}\hbox{}}%
+ \else \box\hangb@x\hfil
+ \fi}%
+ \setlength{\leftmargin}{2\leftmargin}%
+ \setlength{\labelsep}{.5em}%
+ \setlength{\labelwidth}{\leftmargin}%
+ \addtolength{\labelwidth}{-\labelsep}%
+ \setlength{\listparindent}{1.5em}%
+ }%
+}
+\def\endlabelled{%
+ \end{list}%
+}
+
+% extracts (in small type)
+\def\extract{%
+ \begin{quote}\small
+}
+\def\endextract{\end{quote}}
+
+% newverbatim ripped out of verbatim.tex:
+\def\newverbatim#1{\@ifnextchar[{\@new@v@env{#1}}{\@new@v@env{#1}[0]}}
+% In the definition of \@new@v@env, the easy part (definition of \endFOO) comes
+% first. The definition of \FOOVERBATIM is harder, and finally \FOO is defined
+% to have \verb@syntax\FOOVERBATIM at the end of its expansion.
+\def\@new@v@env#1[#2]#3#4{\expandafter\def\csname end#1\endcsname{#4}\relax
+ \expandafter\def@verbatim\csname #1VERBATIM\endcsname{#1}{##1\end{#1}}\relax
+ \expandafter\newcommand\csname #1\endcsname
+ [#2]{#3\verb@syntax\csname #1VERBATIM\endcsname}}
+% Define verbatim syntax.
+\def\verb@syntax{\obeylines\tt\let\do\@makeother\dospecials\frenchspacing\@vobeyspaces}
+% Finally, an auxiliary function to define a macro whose argument is delimited
+% by \end{foo} in special syntax, \def@verbatim{\CS}{foo}{...body...}.
+\begingroup \catcode `|=0 \catcode `[= 1
+\catcode`]=2 \catcode `\{=12 \catcode `\}=12
+\catcode`\\=12 |gdef|def@verbatim#1#2#3[|def#1##1\end{#2}[#3]]
+|endgroup
+
+
+% ANGLICISED COMMANDS
+% british itemize
+\let\itemise\itemize
+\let\enditemise\enditemize
+
+% british center
+\let\centre\center
+\let\endcentre\endcenter
+% ...and while we're at it
+\let\centring\centering
+\let\centreline\centerline
+
+% \makeatother
+%\catcode`@=12