<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">% pdcmisc.dtx -- documentation and source code for misc macro files -*-tex-*-

%%%@TeX-document-file {
%%% title 	= "Miscellanous macro files",
%%% filename 	= "$texmf/doc/plain/pdcmac/pdcmisc.dtx",
%%% version 	= "$Revision: 1.4 $",
%%% package 	= "pdcmac 1.0",
%%% date 	= "$Date: 1995/03/30 16:13:08 $",
%%% author	= "P. Damian Cugley",
%%% email	= "damian.cugley@comlab.ox.ac.uk",
%%% address	= "Oxford University Computing Laboratory,"
%%%                Parks Road, Oxford  OX1 3QD, UK",
%%% abstract	= "This document describes and is the source code for 
%%%                the TeX definitions files pdcmigr.tex, pdcimth.tex,
%%%                pdchyex.tex, pdcmasyb.tex.
%%%                Running plain TeX on this file produces both the
%%%                definitions files and the printed documentation.",
%%% copyright	= "Copyright (c) 1991-1995 P. Damian Cugley",
%%% copying	= "This program is free software; you can redistribute
%%%		   it and/or modify it under the terms of the GNU
%%%		   General Public License as published by the Free
%%%		   Software Foundation; either version 2 of the License,
%%%		   or (at your option) any later version.",
%%% notice	= "This program is distributed in the hope that it will
%%%		   be useful, but WITHOUT ANY WARRANTY; without even the
%%%		   implied warranty of MERCHANTABILITY or FITNESS FOR A
%%%		   PARTICULAR PURPOSE.  See the GNU General Public
%%%		   License for more details.",
%%% notice	= "You should have received a copy of the GNU General
%%%		   Public License along with this program; if not, write
%%%		   to the Free Software Foundation, Inc., 675 Mass Ave,
%%%		   Cambridge, MA 02139, USA.",
%%% codetable	= "USASCII",
%%% dependencies = "pdccode.tex"
%%%}
	
%{{{ pdcmisc.dtx
%{{{  preamble

\relax
\input pdccode

\document
\rcs$Id: pdcmisc.dtx,v 1.4 1995/03/30 16:13:08 pdc Exp $\endrcs

\def\newfile{\lineno=0 }
%}}}  preamble
%{{{  intro
\author{P. Damian Cugley}
\title{Miscellaneous macro files}

%}}}  intro
%{{{  pdcmigr
	
\newfile
\section{PDCMIGR: Use math italic Greek capitals}

	Knuth notes that it is conventional to use unslanted Greek
	capitals in maths, even though other letters are slanted
	(I~personally think that it looks nicer to use slanted Greek
	caps).  Thus \TeX\ takes the Greek capitals from fam~0 by
	default.

	If you are using a body text font that does not have the Greek
	capitals---for example, almost any PostScript or Cork-style
	font---then this no longer works.  Better then to switch to
	using the Greek capitals from the math italic font (fam~1).
	That's what the file |pdcmigr.tex| does.  The characters are
	still in maths class~7, meaning that they will respect changes
	to |\fam| made by font-switching commands.
	
\codefile{pdcmigr.tex}

\code
	\|\% pdcmigr.tex \fileversion~\filedate -- see end of file %
		for more info
	\|\\message\{\fileversion~&lt;\fileauthor~\filedate&gt;\}
\smallbreak
	|\mathchardef\Gamma   = "7100
	|\mathchardef\Delta   = "7101
	|\mathchardef\Theta   = "7102
	|\mathchardef\Lambda  = "7103
	|\mathchardef\Xi      = "7104
	|\mathchardef\Pi      = "7105
	|\mathchardef\Sigma   = "7106
	|\mathchardef\Upsilon = "7107
	|\mathchardef\Phi     = "7108
	|\mathchardef\Psi     = "7109
	|\mathchardef\Omega   = "710A
\endcode

	This file has more comments than code.  Since the code is so
	short I think I'll get away with putting the comments after an
	|\endinput|.
\code
	|\endinput
\smallskip
	|%%%@TeX-definition-file {
	|%%% filename       = "$texmf/tex/plain/pdcmac/pdcmigr.tex",
	\|\%\%\% version~~~~~~~~= "\fileversion",
	\|\%\%\% date~~~~~~~~~~~= "\filedate",
	|%%% package        = "pdcmac 1.0",
	|%%% author         = "P. Damian Cugley",
	|%%% email          = "damian.cugley@comlab.ox.ac.uk",
	|%%% address        = "Oxford University Computing Laboratory,
	|%%%                   Parks Road, Oxford  OX1 3QD, UK",
	|%%% codetable      = "USASCII",
	|%%% keywords       = "TeX, plain TeX, macros",
	|%%% supported      = "Maybe",
	|%%% abstract       = "A definition file for TeX, which redefines
	|%%%                   \Gamma, ..., \Omega to use letters from the
	|%%%                   maths italic font instead of the roman font.
	|%%%                   This file was generated by running
	|%%%                   plain TeX on pdcmisc.dtx",
	|%%% copyright      = "Copyright (c) 1991, 1995 P. Damian Cugley",
	|%%% copying        = "DO NOT DISTRIBUTE THIS FILE.
	|%%%                   Distribute pdcmisc.dtx only as part of the
	|%%%                   package it came in.",
	|%%% dependencies   = "",
	|%%% }
\endcode

\endcodefile
%}}}  pdcmigr
%{{{  pdcimth

\newfile
\section{PDCIMTH: use text italic letters in maths mode}

	Very few existing font families have a separate math-italic font.  When
	using these fonts as body fonts, with the Computer Modern fonts as
	maths fonts, it looks wrong to have the maths letters in a completely
	different style form the text italic.  Therefore it makes sense to
	redefine maths mode so that the letters come from the text italic font.

	This is also useful when multiple-letter identifiers are used in maths
	mode.  We c an say |$difference:=height+depth$| and get `$\it
	difference:=height+depth$' instead of `$difference:=height+depth$'.

	In the following, the counters |\count0| to |\count4| are used as
	follows:
$$\centerline{\vbox{\halign{\tt\cs{#}\hfil&amp;&amp;\quad#\hfil\cr
	count0&amp;mathcode for current upper case char\cr
	count1&amp;mathcode for current lower case char\cr
	count2&amp;ASCII code of current upper case char\cr
	count3&amp;ASCII code of current lower case char\cr
	count4&amp;number of characters left to redefine\cr
}}}$$
 	The grouping prevents this temporary use conflicting with \TeX's
	use of these counters.
	
\codefile{pdcimth.tex}
\code
	\|\% pdcimth.tex \fileversion~\filedate~- maths letters in text italic
	\|\\message\{\fileversion~\filedate\}
	|
	|\begingroup
\smallbreak
	|    \count0="7400 \count1=\count0
	|    \advance\count0 by`A \advance\count1 by`a
	|    \count2=`A \count3=`a \count4=26
\smallbreak
	|    \loop\ifnum\count4&gt;0
	|        \advance\count4 by-1
	|        \global\mathcode\count2=\count0 
	|        \global\mathcode\count3=\count1
	|        \advance\count0 by1 \advance\count1 by1
	|        \advance\count2 by1 \advance\count3 by1
	|    \repeat
\smallbreak
	|\endgroup
\endcode
\noindent
	The value $\hbox{\H{}\tt 7400} + c$ used above means mathcode~7,
	fam~4 (|\itfam|), character~$c$.

	Once again, the code is short enough that I think I can get away
	with putting the comments at the end:
\code
	|\endinput
\smallskip
	|%%%@TeX-definition-file {
	|%%% filename       = "$texmf/tex/plain/pdcmac/pdcimth.tex",
	\|\%\%\% version~~~~~~~~= "\fileversion",
	\|\%\%\% date~~~~~~~~~~~= "\filedate",
	|%%% package        = "pdcmac 1.0",
	|%%% author         = "P. Damian Cugley",
	|%%% email          = "damian.cugley@comlab.ox.ac.uk",
	|%%% address        = "Oxford University Computing Laboratory,
	|%%%                   Parks Road, Oxford  OX1 3QD, UK",
	|%%% codetable      = "USASCII",
	|%%% keywords       = "TeX, plain TeX, macros",
	|%%% supported      = "Maybe",
	|%%% abstract       = "A definition file for TeX, which redefines
	|%%%                   mathcodes to use letters from the
	|%%%                   text italic font instead of math italic.
	|%%%                   This file was generated by running
	|%%%                   plain TeX on pdcmisc.dtx",
	|%%% copyright      = "Copyright (c) 1991, 1995 P. Damian Cugley",
	|%%% copying        = "DO NOT DISTRIBUTE THIS FILE.
	|%%%                   Distribute pdcmisc.dtx only as part of the
	|%%%                   package it came in.",
	|%%% dependencies   = "",
	|%%% }
\endcode
\endcodefile
%}}}  pdcimth
%{{{  pdchyex

\newfile
\section{PDCHYEX: Hyphenation exceptions}

	These hyphenation exceptions are ones I~use for must documents.

\notepar
	Of all the macro files in this package, this is the one you
	should be most chary of using.  These are written for a \TeX\
	system which uses American English hyphenation patterns, but are
	intended to help it produce hyphenations suitable for British
	English, and this peverse approach will probably lead to all
	sorts of anomalies. Ideally separate hyphenation patterns will
	be used for British English documents.
\endnotepar

\codefile{pdchyex.tex}

\subsec{File identification}

	The list of exceptions is expected to grow, so it seems best to
	have the identification at the top of the file.

\code
	\|\% pdchyex.tex \fileversion~\filedate~-- some British hyphenations
\smallskip
	|%%%@TeX-definition-file {
	|%%% filename       = "$texmf/tex/plain/pdcmac/pdchyex.tex",
	\|\%\%\% version~~~~~~~~= "\fileversion",
	\|\%\%\% date~~~~~~~~~~~= "\filedate",
	|%%% package        = "pdcmac 1.0",
	|%%% author         = "P. Damian Cugley",
	|%%% email          = "damian.cugley@comlab.ox.ac.uk",
	|%%% address        = "Oxford University Computing Laboratory,
	|%%%                   Parks Road, Oxford  OX1 3QD, UK",
	|%%% codetable      = "USASCII",
	|%%% keywords       = "TeX, plain TeX, macros",
	|%%% supported      = "Maybe",
	|%%% abstract       = "A non-exhaustive set of hyphenation exceptions
	|%%%                   designed to make TeX with American hyphenation
	|%%%                   tables produce some British hyphenations.
	|%%%                   This file was generated by running
	|%%%                   plain TeX on pdcmisc.dtx",
	|%%% copyright      = "Copyright (c) 1991, 1995 P. Damian Cugley",
	|%%% copying        = "DO NOT DISTRIBUTE THIS FILE.
	|%%%                   Distribute pdcmisc.dtx only as part of the
	|%%%                   package it came in.",
	|%%% dependencies   = "",
	|%%%}
	|
	\|\\message\{\fileversion~&lt;\fileauthor~\filedate&gt;\}
	|
\endcode

\subsec{Setting parameters}

	These settings are from {\it Hart's Rules} p.\thinspace141.
\code
	|\lefthyphenmin=2 \righthyphenmin=3 \uchyph=0
\endcode

\subsec{And finally, the hyphenation exceptions}

\code
	|\hyphenation{
\endcode
	First, some words from {\it Hart's Rules}\/ pp.\thinspace14--15.
	I've taken the list on p.\thinspace14 and included here those
	which were given wrong hyphenation by \TeX's default tables.
\code
	|    le-gend le-gends re-adjust re-appear exact-ing
\smallbreak

	|    abs-cess abs-cess-es abs-cessed ana-lyse ana-lyses
	|    ana-lysis ana-lyses appear-ance appear-ances bio-graphy
	|    celeb-rate celeb-rates celeb-rations cor-respond-ence
	|    depend-ent des-pise des-pises dis-pised dimin-ish
	|    dimin-ish-es dimin-ish-ed dis-connect dis-connect-ed
	|    dis-connects forget-ting gener-ally haemor-rhage
	|    illus-trate immedi-ate immedi-ately immport-ance
	|    inexplic-able inter-pret inter-est inter-ested
	|    inter-est-ing minis-ter origin-ally philo-sophy
	|    philo-sophic philo-sophic-ally prim-ary prob-ably
	|    semb-lance
\smallbreak
	|    calm-est debt-ors fea-ther fea-thers post-humous lamb-like
	|    poingn-ant tough-ish ach-ing archaeo-logy etymo-logy
	|    philo-logist psycho-logist tauto-logy zoolo-gist
\endcode
	Now some random hyphenations I~encountered in my own documents
	at some point.  I~haven't checked these in a spelling
	dictionary, so don't use them in documents where your life
	depends on correct hyphenation.
\code	

	|    art-iest cig-ar-ette bio-logy bio-chem-is-try boy-friend
	|    brit-ain brit-ish com-ic com-ics cug-ley dogs-body
	|    dor-mouse gai-man graph-ic immedie-ate immedi-ate
	|    immedi-ately issue mckean mis-hap mis-haps news-letter
	|    news-paper night-crawler origin-ally origin-ator phys-ique
	|    phys-iques porn-o-graphy porn-o-graphic rec-om-mend-ation
	|    Ser-geant ser-geant Sien-kie-wicz spon-tan-e-ous
	|    spon-tan-e-ously stop-ped strip-ped teen-ager teen-agers
	|    tem-per-men-tal Thatch-er-ism Thatch-er-ite under-ground
	|    under-grounds var-i-able venge-ance warp-smith warp-smiths
	|    whirl-pool

	|}
\endcode
\endcodefile
	
%}}}  pdchyex
%{{{  pdccmsub

\newfile
\codefile{pdccmsub.tex}
\section{PDCCNSUB: Substitutions using Computer Modern glyphs}

	The Malvern and PostScript repertoire includes some characters
	not included in the \TeX\ Text fonts used by plain \TeX.  I~have
	made macros for some of these that assemble symbols from
	existing characters.  This way documents can be switched between
	the different font encoding schemes mroe easily.  They won't
	look very pretty though.

\notepar
	These work acceptably with ten-point Computer Modern but might
	need adjustment with other fonts.
\endnotepar
	
%{{{   indentification
\subsec{File dientification}

\code
	\|\% \filename~\fileversion~\filedate~-- CM subs for PS glyphs
\smallskip
	|%%%@TeX-definition-file {
	|%%% filename       = "$texmf/tex/plain/pdcmac/pdcmigr.tex",
	\|\%\%\% version~~~~~~~~= "\fileversion",
	\|\%\%\% date~~~~~~~~~~~= "\filedate",
	|%%% package        = "pdcmac 1.0",
	|%%% author         = "P. Damian Cugley",
	|%%% email          = "damian.cugley@comlab.ox.ac.uk",
	|%%% address        = "Oxford University Computing Laboratory,
	|%%%                   Parks Road, Oxford  OX1 3QD, UK",
	|%%% codetable      = "USASCII",
	|%%% keywords       = "TeX, plain TeX, macros",
	|%%% supported      = "Maybe",
	|%%% abstract       = "Macros for simulating some PostScript characters
	|%%%                   using glyphs form the Computer Modern family.
	|%%%                   This file was generated by running
	|%%%                   plain TeX on pdcmisc.dtx",
	|%%% copyright      = "Copyright (c) 1991-1995 P. Damian Cugley",
	|%%% copying        = "DO NOT DISTRIBUTE THIS FILE.
	|%%%                   Distribute pdcmisc.dtx only as part of the
	|%%%                   package it came in.",
	|%%% dependencies   = "",
	|%%% }
	|
	\|\\message\{\fileversion~\filedate\}
	|
\endcode

%}}}   indentification


\code
	|\dimendef\dimena=0
\endcode
\dimendef\dimena=0

%{{{   currency

\subsec{Currency signs}

\def\yen{{%
    \ooalign{%
        \hfil\raise0.25ex\hbox{$\scriptscriptstyle=$}\hfil\crcr
        \hfil Y\hfil
    }%
}} 
\def\currency{{%
    \ooalign{%
	\dimena-0.10em
	\hskip\dimena \raise0.2ex \hbox{\mathhexbox202}\hskip\dimena\crcr
	\hfil \raise0.2ex \hbox{\mathhexbox20E}\hfil
    }%
}} 
	
 	The Yen sign looks like `50\thinspace000\yen', the cents sign
	like `37\rlap/c'.  The pounds-sterling sign is always italic.
\code
	|\def\pounds{{\it\char36 }}
\smallbreak
	|\def\yen{{%
	|    \ooalign{%
	|        \hfil\raise0.25ex\hbox{$\scriptscriptstyle=$}\hfil\crcr
	|        \hfil Y\hfil
	|    }%
	|}}
\smallbreak
	|\def\cents{\leavevmode\hbox{\rm\rlap/c}}
\endcode

	The ISO~646 currency sign---originally created to replace the
	dollar sign in the international reference version character
	set---is supposed to be drawn as a circle with four `ears';
	we'll have to fake it rather crudely: `\currency', as in
	`\currency100' or possibly `100\currency'.
\code
	|\def\currency{{%
	|    \ooalign{%
	|        \hskip-0.1em
	|            \raise0.2ex \hbox{\mathhexbox202}\hskip-0.1em\crcr
	|        \hfil \raise0.2ex \hbox{\mathhexbox20E}\hfil
	|    }%
	|}} 
\endcode	

	The florin sign `{\it f}' seems to have started life as a way of
	getting an italic {\it f} on dot-matrix printers.  In an italic
	context it still has to be in itaics---switching to a roman
	letter does not seem appropriate.
\code
	|\def\florin{{\it f\/}}
\endcode

%}}}   currency
%{{{   circled letters
	

\subsec{Things in circles}

\def\circledletter#1#2{{%
    \ooalign{%
	\hfil\kern#1\hbox{$\scriptstyle\rm #2$}\hfil\crcr
        \mathhexbox20D%
    }%
}}
\def\registered{\circledletter{0.02em}R}
\def\copyright{\circledletter{-0.045em}C}
	Here's a general macro for making letters in circles---like
	the registered trade mark sign `\registered', or the signs
	`\circledletter{0.04em}P' and `\circledletter{0.02em}S'
	(I~don't use them so I~haven't given them names) or even `\circledletter{0.05em}1'.  A matching
	copyright sing (using a small capital {\it c} instead of a
	lower case {\it c}) looks like `\copyright'.  Parameter |#1|
	to the macro is the amount to shift the small letter relative
	to the circle to get it optically centred.
\code
	|\def\circledletter#1#2{{%
	|    \ooalign{%
	|        \hfil\kern#1\raise0.00ex \hbox{$\scriptstyle\rm #2$}\hfil\crcr
	|        \mathhexbox20D%
	|    }%
	|}}
\smallbreak
	|\def\registered{\circledletter{0.02em}R}
	|\def\copyright{\circledletter{-0.045em}C}
\endcode
%}}}   circled letters
%{{{   guillemets
	
\subsec{Guillemets}

\def\lguillemet{\leavevmode \raise0.5ex \hbox{$\scriptscriptstyle\langle\!\langle$}}
\def\rguillemet{\leavevmode \raise0.5ex \hbox{$\scriptscriptstyle\rangle\!\rangle$}}

	Ersatz guillemets look like \lguillemet this\rguillemet.
\code
	|\def\lguillemet{%
	|    \leavevmode 
	|    \raise0.5ex \hbox{$\scriptscriptstyle\langle\!\langle$}%
	|}
\smallbreak
	|\def\rguillemet{%
	|    \leavevmode 
	|    \raise0.5ex \hbox{$\scriptscriptstyle\rangle\!\rangle$}%
	|}
\endcode
%}}}   guillemets
%{{{   misc
\subsec{Miscellaneous}

\def\permille{{%
    \setbox0 \hbox{/}%
    \flushtop{$\scriptstyle0\!$}/%
    \lower\dp0 \hbox{$\!\scriptstyle00$}%
}}
\def\orda{\flushtop{\the\scriptfont\ifnum\fam&gt;0 \fam\else 0\fi \b a}}
\def\ordo{\flushtop{\the\scriptfont\ifnum\fam&gt;0 \fam\else 0\fi \b o}}

	The per-mille sign `\permille' can't be made from `\%' sign because
	matching the rings is impossible, so we use `0/00':
\code
	|\def\permille{{%
	|    \setbox0 \hbox{/}%
	|    \flushtop{$\scriptstyle0\!$}/%
	|    \lower\dp0 \hbox{$\!\scriptstyle00$}%
	|}}
\endcode

	The British decimal point is a raised dot: `3\mathhexbox201141'
	instead of `3.141'.
\code
	|\def\gbdecimal{\mathhexbox201}
\endcode
	Unfortunately, this symbol has become a casualty of the `DTP
	revolution', and the American use of a full stop as a decimal
	point has become common.

	The glyphs `\orda' and `\ordo' are used in to abbreviate Spanish
	ordinal numbers: the feminine {\it primera} becomes 1\orda, and
	the masculine {\it primero} 1\ordo.
\code
	|\def\orda{\flushtop{\the\scriptfont\ifnum\fam&gt;0 \fam\else 0\fi \b a}}
	|\def\ordo{\flushtop{\the\scriptfont\ifnum\fam&gt;0 \fam\else 0\fi \b o}}
\endcode

	
%}}}   misc
%{{{   sc and csc
	
\subsec{Substitutions for Malvern's alphabet-switching commands}
	
	The macros used to select small capitals etc.\ in Malvern fonts
	cannot work with Computer Modern, but might appear in documents
	anyway.  Instead they are all made equivalent to |\relax|.  

\code
	|\let\sc=\relax
	|\let\csc=\relax
	|\let\mc=\relax
\endcode

%}}}   sc and csc

\endcodefile
	
%}}}  pdcmasub
\enddocument	
\bye
%}}} pdcmisc.dtx
%Local Variables:
%fill-prefix: "	"
%fold-folded-p: t
%End:
</pre></body></html>