% The file cpalatin.tex (C) Petr Olsak, 1996, 1999
% Use "\input cpalatin" to set the Palatino fonts family in text mode
% The "\rm", "\it", "\tt" and "\bf" will work with the new fonts.
% Use "\setsimplemath" command to set Palatino fonts family in very
% simple math formulas (without greek letters).

\font\tenrm=pplr8z at 10pt
\font\tenbf=pplb8z at 10pt
\font\tenit=pplri8z at 10pt
\font\tentt=pcrr8u at 10pt
\let\tensl=\tenit
\tenrm
\def\setsimplemath{%
  \font\sevenrm pplr8z  at7pt
  \font\fiverm  pplr8z  at5pt
  \font\sevenit pplri8z at7pt
  \font\fiveit  pplri8z at5pt
  \font\sevenbf pplb8z  at7pt 
  \font\fivebf  pplb8z  at5pt
  \message{\string\setsimplemath\space WARNING:
     Greek symbols may be loss, see Missing char in .log!}
  \textfont0=\tenrm \scriptfont0=\sevenrm \scriptscriptfont0=\fiverm
  \textfont1=\tenit \scriptfont1=\sevenit \scriptscriptfont1=\fiveit
  \textfont\itfam=\tenit \scriptfont\itfam=\sevenit 
                         \scriptscriptfont\itfam=\fiveit
  \textfont\slfam=\tensl
  \textfont\bffam=\tenbf \scriptfont\bffam=\sevenbf 
                         \scriptscriptfont\bffam=\fivebf
  \textfont\ttfam=\tentt }

% The \setsimplemath command sets the new family of fonts for math
% formulas. Cf. the usage of "2" (digit in text mode is in a new font) 
% but $-2$ is in Computer Modern if \setsimplemath is not used.
% WARNING: The \setsimplemath is usable for very siple math
% formulas only! It may crash some more complicated formulas because
% math symbols are still used from Computer Modern and all greek 
% symbols are missing in new fonts.
