%% %% This is file `dclfont.sty', generated %% on <1992/9/24> with the docstrip utility (2.0r). %% corrected for \oe, \ae by D. Taupin on March 22nd1993 %% %% The original source files were: %% %% basefont.doc (with options: `dclf') %% %% Copyright (C) 1989-1992 by Frank Mittelbach, Rainer Schoepf. %% All rights reserved. %% %% This file is part of the NFSS (New Font Selection Scheme) package. %% %% IMPORTANT NOTICE: %% %% You are not allowed to change this file. You may however copy %% this file to a file with a different name and then change the copy %% if you obey the restrictions on file changes described in %% readme.mz. %% %% You are allowed to distribute this file under the condition that %% it is distributed together with all files mentioned in readme.mz3. %% If you receive only some of these files from someone, complain! %% %% You are NOT ALLOWED to distribute this file alone. You are NOT %% ALLOWED to take money for the distribution or use of either this %% file or a changed version, except for a nominal charge for copying %% etc. %% %% For error reports in case of UNCHANGED versions see readme files. %% %% Please do not request updates from us directly. Distribution is %% done through Mail-Servers and TeX organizations. %% \def\fileversion{v1.4d} \def\filedate{92/09/22} \def\docdate {92/09/22} %% \CheckSum{626} %% \CharacterTable %% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z %% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z %% Digits \0\1\2\3\4\5\6\7\8\9 %% Exclamation \! Double quote \" Hash (number) \# %% Dollar \$ Percent \% Ampersand \& %% Acute accent \' Left paren \( Right paren \) %% Asterisk \* Plus \+ Comma \, %% Minus \- Point \. Solidus \/ %% Colon \: Semicolon \; Less than \< %% Equals \= Greater than \> Question mark \? %% Commercial at \@ Left bracket \[ Backslash \\ %% Right bracket \] Circumflex \^ Underscore \_ %% Grave accent \` Left brace \{ Vertical bar \| %% Right brace \} Tilde \~} %% \immediate \write\sixt@@n{Style-Option: `dclfont' \fileversion\space <\filedate> (FMi and RmS)} \immediate \write\sixt@@n{English Documentation \@spaces\@spaces <\docdate> (FMi and RmS)} \ifx\@latexerr\undefined\else \@ifundefined{selectfont} {\@latexerr{% `dclfont' style option can only be used with the new font selection scheme}\@eha \endinput}{} \fi \def\newfont#1#2{\@ifdefinable#1{\global \font#1=#2\relax}} \def\symbol#1{\char #1\relax} \def\@gobbletwo#1#2{} \let\load\@gobbletwo \def\@setsize#1#2#3#4{\@nomath#1% \ifx\protect\relax \let\@currsize#1% \fi \fontsize{#4}{#2}\selectfont} \def\prm{\not@math@alphabet\rm\mathrm \fontfamily\rmdefault\selectfont} \def\psf{\not@math@alphabet\sf\mathsf \fontfamily\sfdefault\selectfont} \def\ptt{\not@math@alphabet\tt\relax \fontfamily\ttdefault\selectfont} \def\psl{\not@math@alphabet\sf\relax \fontshape\sldefault\selectfont} \def\psc{\not@math@alphabet\sc\relax \fontshape\scdefault\selectfont} \def\pit{\not@math@alphabet\it\relax \fontshape\itdefault\selectfont} \def\pbf{\not@math@alphabet\bf\mathbf \fontseries\bfdefault\selectfont} \def\em{\protect\pem} \def\pem{\@nomath\em \ifdim \fontdimen\@ne\font >\z@ \normalshape \else \it \fi} \def\not@math@alphabet#1#2{% \ifmmode \ifx#2\relax \errhelp{% In NFSS fonts you need to define a new math alphabet^^J% if you want to use a special font in math mode.% }% \else \errhelp{% Please use the math alphabet #2instead of the #1command.% }% \fi \errmessage{Command \noexpand#1not supported in math mode}% \fi} \ifx\bffam\@undefined \new@mathgroup\bffam \new@mathgroup\sffam \fi \new@internalmathalphabet\mathbf\bffam{cmr}{bx}{n} \new@internalmathalphabet\mathsf\sffam{cmss}{m}{n} \let\math@bgroup\begingroup \def\math@egroup#1{#1\endgroup} \ifx\lyfam\undefined \new@mathgroup\lyfam \define@mathgroup\mv@normal\lyfam {lasy}{m}{n} \define@mathgroup\mv@bold\lyfam {lasy}{b}{n} \edef\@tempa{\hexnumber@\lyfam} \mathchardef\mho"0\@tempa 30 \mathchardef\Join"3\@tempa 31 \mathchardef\Box"0\@tempa 32 \mathchardef\Diamond"0\@tempa 33 \mathchardef\leadsto"3\@tempa 3B \mathchardef\sqsubset"3\@tempa 3C \mathchardef\sqsupset"3\@tempa 3D \mathchardef\lhd"3\@tempa 01 \mathchardef\unlhd"3\@tempa 02 \mathchardef\rhd"3\@tempa 03 \mathchardef\unrhd"3\@tempa 04 \fi \def\@accent@def#1#2#3{\expandafter\def \csname @#1@\string#2@#1@\endcsname{#3}} \def\@accent@use#1#2#3{% \expandafter\ifx \csname @#1@\string#3@#1@\endcsname \relax {\accent#2 #3}% \else \csname @#1@\string#3@#1@\endcsname\fi} \def\`{\@accent@use{grave}{0}} \let\@accii=\` \@accent@def{grave}{a}{^^e0} \@accent@def{grave}{e}{^^e8} \@accent@def{grave}{\i}{^^ec} \@accent@def{grave}{i}{^^ec} \@accent@def{grave}{o}{^^f2} \@accent@def{grave}{u}{^^f9} \@accent@def{grave}{A}{^^c0} \@accent@def{grave}{E}{^^c8} \@accent@def{grave}{I}{^^cc} \@accent@def{grave}{O}{^^d2} \@accent@def{grave}{U}{^^d9} \def\'{\@accent@use{acute}{1}} \let\@acci=\' \@accent@def{acute}{n}{^^ab} \@accent@def{acute}{l}{^^a8} \@accent@def{acute}{r}{^^af} \@accent@def{acute}{s}{^^b1} \@accent@def{acute}{z}{^^b9} \@accent@def{acute}{a}{^^e1} \@accent@def{acute}{e}{^^e9} \@accent@def{acute}{\i}{^^ed} \@accent@def{acute}{i}{^^ed} \@accent@def{acute}{o}{^^f3} \@accent@def{acute}{u}{^^fa} \@accent@def{acute}{y}{^^fd} \@accent@def{acute}{N}{^^8b} \@accent@def{acute}{L}{^^88} \@accent@def{acute}{R}{^^8f} \@accent@def{acute}{S}{^^91} \@accent@def{acute}{Z}{^^99} \@accent@def{acute}{A}{^^c1} \@accent@def{acute}{E}{^^c9} \@accent@def{acute}{I}{^^cd} \@accent@def{acute}{O}{^^d3} \@accent@def{acute}{U}{^^da} \@accent@def{acute}{Y}{^^dd} \@accent@def{acute}{c}{^^a2} \@accent@def{acute}{C}{^^82} \def\v{\@accent@use{check}{7}} \@accent@def{check}{c}{^^a3} \@accent@def{check}{e}{^^a5} \@accent@def{check}{n}{^^ac} \@accent@def{check}{r}{^^b0} \@accent@def{check}{s}{^^b2} \@accent@def{check}{z}{^^ba} \@accent@def{check}{C}{^^83} \@accent@def{check}{D}{^^84} \@accent@def{check}{E}{^^85} \@accent@def{check}{N}{^^8c} \@accent@def{check}{R}{^^90} \@accent@def{check}{S}{^^92} \@accent@def{check}{T}{^^94} \@accent@def{check}{Z}{^^9a} \def\u{\@accent@use{breve}{8}} \@accent@def{breve}{a}{^^a0} \@accent@def{breve}{g}{^^a7} \@accent@def{breve}{A}{^^80} \@accent@def{breve}{G}{^^87} \def\=#1{{\accent9 #1}} \let\@acciii=\= \def\^{\@accent@use{circflx}{2}} \@accent@def{circflx}{a}{^^e2} \@accent@def{circflx}{e}{^^ea} \@accent@def{circflx}{\i}{^^ee} \@accent@def{circflx}{i}{^^ee} \@accent@def{circflx}{o}{^^f4} \@accent@def{circflx}{u}{^^fb} \@accent@def{circflx}{A}{^^c2} \@accent@def{circflx}{E}{^^ca} \@accent@def{circflx}{I}{^^ce} \@accent@def{circflx}{O}{^^d4} \@accent@def{circflx}{U}{^^db} \def\.{\@accent@use{dot}{10}} \@accent@def{dot}{z}{^^bb} \@accent@def{dot}{Z}{^^9b} \@accent@def{dot}{I}{^^9d} \@accent@def{dot}{i}{i} \def\H{\@accent@use{Hung}{5}} \@accent@def{Hung}{o}{^^ae} \@accent@def{Hung}{u}{^^b6} \@accent@def{Hung}{O}{^^8e} \@accent@def{Hung}{U}{^^96} \def\~{\@accent@use{tilde}{3}} \@accent@def{tilde}{a}{^^e3} \@accent@def{tilde}{n}{^^f1} \@accent@def{tilde}{o}{^^f5} \@accent@def{tilde}{A}{^^c3} \@accent@def{tilde}{N}{^^d1} \@accent@def{tilde}{O}{^^d5} \def\"{\@accent@use{Umlaut}{4}} \@accent@def{Umlaut}{a}{^^e4} \@accent@def{Umlaut}{e}{^^eb} \@accent@def{Umlaut}{\i}{^^ef} \@accent@def{Umlaut}{i}{^^ef} \@accent@def{Umlaut}{o}{^^f6} \@accent@def{Umlaut}{u}{^^fc} \@accent@def{Umlaut}{A}{^^c4} \@accent@def{Umlaut}{E}{^^cb} \@accent@def{Umlaut}{I}{^^cf} \@accent@def{Umlaut}{O}{^^d6} \@accent@def{Umlaut}{U}{^^dc} \def\pb#1{\oalign{#1\crcr\hidewidth \vbox to.2ex{\hbox{\char9}\vss}\hidewidth}} \def\pc#1{\expandafter\ifx \csname @cedilla@\string#1@cedilla@\endcsname \relax \c@dilla#1\else \csname @cedilla@\string#1@cedilla@\endcsname\fi} \@accent@def{cedilla}{s}{^^b3} \@accent@def{cedilla}{t}{^^b5} \@accent@def{cedilla}{c}{^^e7} \@accent@def{cedilla}{S}{^^93} \@accent@def{cedilla}{T}{^^95} \@accent@def{cedilla}{C}{^^c7} \def\c@dilla#1{\setbox\z@\hbox{#1}\ifdim\ht\z@=1ex\accent11 #1% \else{\ooalign{\hidewidth\char11\hidewidth\crcr\unhbox\z@}}\fi} % corrections by D. Taupin % \chardef\xx="0YY --> \def\xx{^^YY} to enable uppercasing \def\ss{^^ff} \def\ae{^^e6} \def\oe{^^f7} \def\o{^^f8} \def\AE{^^c6} \def\OE{^^d7} \def\O{^^d8} \def\i{^^19} % dotless letters \def\j{^^1a} % dotless letters \def\aa{^^e5} \def\AA{^^c5} \def\l{^^aa} %backslash-lowercase L for Polish waw} \def\L{^^8a} \def\th{^^fe} \def\TH{^^de} \def\dh{^^f0} \def\DH{^^d0} \def\dj{^^9e} \def\DJ{^^d0} \def\ng{^^ad} \def\NG{^^8d} \def\SS{^^df} \chardef\pounds="0BF \def\hbar{{\mathchar'11\mkern-9muh}} \begingroup \count@=128 \loop \count1=\count@ \advance\count1 by 32 \global\lccode\count@=\count1 \global\uccode\count@=\count@ \global\uccode\count1=\count@ \global\lccode\count1=\count1 \global\sfcode\count1=999 \ifnum \count@ <156 \advance \count@ 1 \repeat \global\lccode157=105 \global\uccode157=157 \global\uccode158=208 \global\lccode158=158 \global\sfcode158=999 \count@=192 \loop \count1=\count@ \advance\count1 by 32 \global\lccode\count@=\count1 \global\uccode\count@=\count@ \global\uccode\count1=\count@ \global\lccode\count1=\count1 \global\sfcode\count1=999 \ifnum \count@ <223 \advance \count@ 1 \repeat \endgroup \define@mathgroup\mv@normal{0}{dcr}{m}{n} \define@mathgroup\mv@bold{0}{dcr}{bx}{n} \begingroup \catcode`\= 11 \gdef\p@mathrm{\use@mathgroup \=dcr \z@} \endgroup \def\rmdefault{dcr} \def\sfdefault{dcss} \def\ttdefault{dctt} \ifx\greek@group\undefined \new@mathgroup\greek@group \define@mathgroup\mv@normal\greek@group{cmr}{m}{n} \define@mathgroup\mv@bold\greek@group{cmr}{bx}{n} \edef\@tempa{\hexnumber@\greek@group} \mathchardef\Gamma="0\@tempa00 \mathchardef\Delta="0\@tempa01 \mathchardef\Theta="0\@tempa02 \mathchardef\Lambda="0\@tempa03 \mathchardef\Xi="0\@tempa04 \mathchardef\Pi="0\@tempa05 \mathchardef\Sigma="0\@tempa06 \mathchardef\Upsilon="0\@tempa07 \mathchardef\Phi="0\@tempa08 \mathchardef\Psi="0\@tempa09 \mathchardef\Omega="0\@tempa0A \fi \expandafter\ifx\csname dcr/m/n\endcsname\relax \@input{fontdef.dc}% \fi \def\acute{\mathaccent"7001 } \def\grave{\mathaccent"7000 } \def\ddot{\mathaccent"7004 } \def\tilde{\mathaccent"7003 } \def\bar{\mathaccent"7009 } \def\breve{\mathaccent"7008 } \def\check{\mathaccent"7007 } \def\hat{\mathaccent"7002 } \def\vec{\mathaccent"017E } \def\dot{\mathaccent"700A } \endinput %% %% End of file `dclfont.sty'.