% pdcadobe.tex 1.3 1995/03/30 -- macros for Adobe style fonts

%%%@TeX-definition-file {
%%% filename       = "$texmf/tex/plain/pdcmac/pdcadobe.tex",
%%% version        = "1.3",
%%% date           = "1995/03/30",
%%% 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       = "Formatting macros for Adobe-style fonts.
%%%                   This file was generated by running
%%%                   plain TeX on pdcadobe.dtx",
%%% copyright      = "Copyright (c) 1991-1995 P. Damian Cugley",
%%% copying        = "DO NOT DISTRIBUTE THIS FILE.
%%%                   Distribute pdcadobe.dtx only as part of the
%%%                   package it came in.",
%%% dependencies   = "",
%%% }

\message{1.3 <pdc 1995/03/30>}

\chardef\quotesingle="0D
\chardef\quotedouble="22
\chardef\_="5F
\chardef\asciicircum="80
\chardef\asciitilde="81
\chardef\cents="A2
\chardef\pounds="A3
\chardef\fractionslash="A4
\chardef\yen="A5
\chardef\florin="A6
\chardef\S="A7
\chardef\currency="A8
\chardef\lguillemet="AB
\chardef\dag="B2
\chardef\ddag="B3
\chardef\gbdecimal="B4
\chardef\P="B6
\chardef\bullet="B7
\chardef\quotesinglebase="B8
\chardef\quotedblbase="B9
\chardef\rguillemet="BB
\chardef\ellipsis="BC \def\dots{\ellipsis\thinspace}
\chardef\permille="BD
\chardef\orda="E3
\chardef\ordo="EB
\mathchardef\backslash="205C
\edef\lbrace{\delimiter"407B308} \let\{=\lbrace \mathcode`\{="407B
\mathcode`\|="707C  \mathchardef\mid="307C
\edef\rbrace{\delimiter"507D309} \let\}=\rbrace \mathcode`\}="507D
\mathchardef\sim="3081
\mathchardef\cdot="20B4
\mathchardef\bullet="20B7
\mathchardef\ldots="60BC
\chardef\graveglyph="12
\chardef\acuteglyph="13
\chardef\hookglyph="14
\chardef\breveglyph="15
\chardef\macronglyph="16
\chardef\ringglyph="17
\chardef\cedillaglyph="18
\chardef\circumglyph="5E
\chardef\tildeglyph="7E
\chardef\twodotsglyph="7F
\chardef\dotglyph="C7
\chardef\hungarianglyph="CD
\chardef\ogonekglyph="CE
\chardef\AA="C8 \chardef\aa="98
\chardef\L="E8 \chardef\l="F8
\def\.#1{\accent\dotglyph #1}
\def\H#1{\accent\hungarianglyph"CD #1}
\ifx\asyfam\UNDEFINED
    \newfam\asyfam
\fi
\edef\\{\ifcase\asyfam 0\or 1\or 2\or 3\or 4\or 5\or 6\or 7\or
    8\or 9\or A\or B\or C\or D\or E\or F\fi
}
\mathchardef\forall="0\\22
\mathchardef\exists="0\\24
\mathchardef\suchthat="0\\27
\mathcode`*="2\\2A
\mathcode`,="6\\2C
\mathcode`-="2\\2D
\mathcode`.="2\\2E
\mathcode`/="2\\2F
\mathcode`<="3\\3C
\mathcode`>="3\\3E
\mathchardef\cong="3\\40
\mathchardef\Alpha="0\\41
\mathchardef\Beta="0\\42
\mathchardef\Chi="0\\43
\mathchardef\Delta="0\\44
\mathchardef\Epsilon="0\\45
\mathchardef\Phi="0\\46
\mathchardef\Gamma="0\\47
\mathchardef\Eta="0\\48
\mathchardef\Iota="0\\49
\mathchardef\vartheta="0\\4A
\mathchardef\Kappa="0\\4B
\mathchardef\Lambda="0\\4C
\mathchardef\Mu="0\\4D
\mathchardef\Ni="0\\4E
\mathchardef\Omicron="0\\4F
\mathchardef\Pi="0\\50
\mathchardef\Theta="0\\51
\mathchardef\Rho="0\\52
\mathchardef\Sigma="0\\53
\mathchardef\Tau="0\\54
\mathchardef\varUpsilon="0\\55
\mathchardef\varsigma="0\\56
\mathchardef\Omega="0\\57
\mathchardef\Xi="0\\58
\mathchardef\Psi="0\\59
\mathchardef\Zeta="0\\5A
\mathchardef\therefore="3\\5C
\mathchardef\perp="3\\5E
\mathchardef\alpha="0\\61
\mathchardef\beta="0\\62
\mathchardef\chi="0\\63
\mathchardef\delta="0\\64
\mathchardef\epsilon="0\\65
\mathchardef\phi="0\\66
\mathchardef\gamma="0\\67
\mathchardef\eta="0\\68
\mathchardef\iota="0\\69
\mathchardef\varphi="0\\6A
\mathchardef\kappa="0\\6B
\mathchardef\lambda="0\\6C
\mathchardef\mu="0\\6D
\mathchardef\ni="0\\6E
\mathchardef\omicron="0\\6F
\mathchardef\pi="0\\70
\mathchardef\theta="0\\71
\mathchardef\rho="0\\72
\mathchardef\sigma="0\\73
\mathchardef\tau="0\\74
\mathchardef\upsilon="0\\75
\mathchardef\varpi="0\\76
\mathchardef\omega="0\\77
\mathchardef\xi="0\\78
\mathchardef\psi="0\\79
\mathchardef\zeta="0\\7A
\mathchardef\sim="3\\7E
\mathchardef\Upsilon="0\\A1
\mathcode`'="0\\A2 \mathchardef\minutes="0\\A2
\mathchardef\leq="3\\A3 \let\le=\leq
\mathchardef\fractionslash="0\\A4
\mathchardef\infinity="0\\A5
\mathchardef\clubsuit="0\\A7
\mathchardef\diamondsuit="0\\A8
\mathchardef\heartsuit="0\\A9
\mathchardef\spadesuit="0\\AA
\mathchardef\leftrightarrow="3\\AB
\mathchardef\leftarrow="3\\AC \let\gets=\rightarrow
\mathchardef\uparrow="3\\AD
\mathchardef\rightarrow="3\\AE \let\to=\rightarrow
\mathchardef\downarrow="3\\AF
\mathchardef\degrees="0\\B0
\mathchardef\pm="2\\B1
\mathchardef\seconds="0\\B2
\mathchardef\geq="3\\B3 \let\ge=\geq
\mathchardef\times="2\\B4
\mathchardef\propto="3\\B5
\mathchardef\partial="0\\B6
\mathchardef\div="2\\B8
\mathchardef\neq="3\\B9 \let\ne=\neq
\mathchardef\equiv="3\\BA
\mathchardef\approx="3\\BB
\mathchardef\ldots="6\\BC
\edef\arrowvert{\delimiter"0\\BD33C }
\mathchardef\relbar"3\\BE
\edef\crlf{\noexpand\mathexbox\\BF}
\mathchardef\aleph="0\\C0
\mathchardef\Im="0\\C1
\mathchardef\Re="0\\C2
\mathchardef\wp="0\\C3
\mathchardef\otimes="2\\C4
\mathchardef\oplus="2\\C5
\mathchardef\emptyset="0\\C6
\mathchardef\cap="2\\C7
\mathchardef\cup="2\\C8
\mathchardef\supset="3\\C9
\mathchardef\supseteq="3\\CA
\mathchardef\nsubset="3\\CB
\mathchardef\subset="3\\CC
\mathchardef\subseteq="3\\CD
\mathchardef\in="3\\CE
\mathchardef\nin="3\\CF
\mathchardef\angle="0\\D0
\mathchardef\nabla="0\\D1
\edef\registered{\noexpand\mathhexbox\\D2}
\edef\copyright{\noexpand\mathhexbox\\D3}
\edef\trademark{\noexpand\mathhexbox\\D4}
\mathchardef\prod="1\\D5
\edef\sqrt{\radical"\\D6370 }
\mathchardef\cdot="2\\D7
\mathchardef\neg="0\\D8 \let\lnot=\neg
\mathchardef\wedge="3\\D9 \let\land=\wedge
\mathchardef\vee="3\\DA \let\lor=\vee
\mathchardef\Leftrightarrow="3\\DB
\mathchardef\Leftarrow="3\\DC
\mathchardef\Uparrow="3\\DD
\mathchardef\Rightarrow="3\\DE
\mathchardef\Downarrow="3\\DF
\mathchardef\diamond="3\\E0
\edef\langle{\delimiter"4\\E130A }
\mathchardef\sum="1\\E5
\edef\rangle{\delimiter"5\\F130B }
\catcode`^^a0\active \let^^a0=~
\catcode`^^a1\active \def^^a1{!`}
\catcode`^^a4\active \let^^a4=\currency
\catcode`^^a8\active \let^^a8=\twodotsglyph
\catcode`^^a9\active \let^^a9=\copyright
\catcode`^^aa\active \let^^aa=\orda
\catcode`^^ac\active \let^^ac=\lnot
\catcode`^^ad\active \let^^ad=\-
\catcode`^^ae\active \let^^ae=\registered
\catcode`^^af\active \let^^af=\macronglyph
\catcode`^^b0\active \let^^b0=\degrees
\catcode`^^b1\active \let^^b1=\pm
\catcode`^^b2\active \def^^b2{^2}
\catcode`^^b3\active \def^^b3{^3}
\catcode`^^b4\active \let^^b4=\acuteglyph
\catcode`^^b5\active \let^^b5=\mu
\catcode`^^b7\active \let^^b7=\gbdecimal
\catcode`^^b8\active \let^^b8=\cedillaglyph
\catcode`^^b9\active \def^^b9{^1}
\catcode`^^ba\active \let^^ba=\ordo
\catcode`^^bc\active \def^^bc{\frac14}
\catcode`^^bd\active \def^^bd{\frac12}
\catcode`^^be\active \def^^be{\frac34}
\catcode`^^bf\active \def^^bf{?`}
\catcode`^^d7\active \let^^d7=\times
\catcode`^^f7\active \let^^f7=\div
\catcode`^^c0\active \def^^c0{\graveglyph A}
\catcode`^^c1\active \def^^c1{\acuteglyph A}
\catcode`^^c2\active \def^^c2{\circumglyph A}
\catcode`^^c3\active \def^^c3{\tildeglyph A}
\catcode`^^c4\active \def^^c4{\twodotsglyph A}
\catcode`^^c5\active \def^^c5{\ringglyph A}
\catcode`^^c6\active \let^^c6=\AE
\catcode`^^c7\active \def^^c7{\cedillaglyph C}
\catcode`^^c8\active \def^^c8{\graveglyph E}
\catcode`^^c9\active \def^^c9{\acuteglyph E}
\catcode`^^ca\active \def^^ca{\circumglyph E}
\catcode`^^cb\active \def^^cb{\twodotsglyph E}
\catcode`^^cc\active \def^^cc{\graveglyph I}
\catcode`^^cd\active \def^^cd{\acuteglyph I}
\catcode`^^ce\active \def^^ce{\circumglyph I}
\catcode`^^cf\active \def^^cf{\twodotsglyph I}
\catcode`^^d1\active \def^^d1{\tildeglyph N}
\catcode`^^d2\active \def^^d2{\graveglyph O}
\catcode`^^d3\active \def^^d3{\acuteglyph O}
\catcode`^^d4\active \def^^d4{\circumglyph O}
\catcode`^^d5\active \def^^d5{\tildeglyph O}
\catcode`^^d6\active \def^^d6{\twodotsglyph O}
\catcode`^^d8\active \let^^d8=\O
\catcode`^^d9\active \def^^d9{\graveglyph U}
\catcode`^^da\active \def^^da{\acuteglyph U}
\catcode`^^db\active \def^^db{\circumglyph U}
\catcode`^^dc\active \def^^dc{\twodotsglyph U}
\catcode`^^dd\active \def^^dd{\acuteglyph Y}
\catcode`^^df\active \let^^df=\ss
\catcode`^^e0\active \def^^e0{\acuteglyph a}
\catcode`^^e1\active \def^^e1{\graveglyph a}
\catcode`^^e2\active \def^^e2{\circumglyph a}
\catcode`^^e3\active \def^^e3{\tildeglyph a}
\catcode`^^e4\active \def^^e4{\twodotsglyph a}
\catcode`^^e5\active \def^^e5{\ringglyph a}
\catcode`^^e6\active \let^^e6=\ae
\catcode`^^e7\active \def^^e7{\cedillaglyph c}
\catcode`^^e8\active \def^^e8{\graveglyph e}
\catcode`^^e9\active \def^^e9{\acuteglyph e}
\catcode`^^ea\active \def^^ea{\circumglyph e}
\catcode`^^eb\active \def^^eb{\twodotsglyph e}
\catcode`^^ec\active \def^^ec{\graveglyph i}
\catcode`^^ed\active \def^^ed{\acuteglyph i}
\catcode`^^ee\active \def^^ee{\circumglyph i}
\catcode`^^ef\active \def^^ef{\twodotsglyph i}
\catcode`^^f1\active \def^^f1{\tildeglyph n}
\catcode`^^f2\active \def^^f2{\graveglyph o}
\catcode`^^f3\active \def^^f3{\acuteglyph o}
\catcode`^^f4\active \def^^f4{\circumglyph o}
\catcode`^^f5\active \def^^f5{\tildeglyph o}
\catcode`^^f6\active \def^^f6{\twodotsglyph o}
\catcode`^^f8\active \let^^f8=\o
\catcode`^^f9\active \def^^f9{\graveglyph u}
\catcode`^^fa\active \def^^fa{\acuteglyph u}
\catcode`^^fb\active \def^^fb{\circumglyph u}
\catcode`^^fc\active \def^^fc{\twodotsglyph u}
\catcode`^^fd\active \def^^fd{\acuteglyph y}
\catcode`^^ff\active \def^^ff{\twodotsglyph y}
\def\ttminus{--{}}
\let\ttcircum=\asciicircum
\let\tttilde=\asciitilde