% TeX macros for typesetting my PhD thesis: 10pt fonts
% (c) 2008 Martin Mares <mj@ucw.cz>

\catcode`@=11

\def\<#1>{\ifmmode
    \mathchoice{\hbox{\it #1\/}}{\hbox{\it #1\/}}{\hbox{\seventi #1\/}}{\hbox{\fiveti #1\/}}%
  \else\leavevmode\hbox{\it #1\/}\fi}

\font\tensl=cmsl10
\font\tenb=cmb10
\font\tensc=cmcsc10

\def\fntmathsize{10}
\def\fntmathtok{ten}
\def\fntmathssize{7}
\def\fntmathstok{seven}
\def\fntmathsssize{5}
\def\fntmathsstok{five}

\mathf@nt{\fntmathtok}{r}{\fntmathsize}{cm}\textfont0=\m@@f
\mathf@nt{\fntmathstok}{r}{\fntmathssize}{cm}\scriptfont0=\m@@f
\mathf@nt{\fntmathsstok}{r}{\fntmathsssize}{cm}\scriptscriptfont0=\m@@f
\mathf@nt{\fntmathtok}{mi}{\fntmathsize}{cm}\skewchar\m@@f='177\textfont1=\m@@f
\mathf@nt{\fntmathstok}{mi}{\fntmathssize}{cm}\skewchar\m@@f='177\scriptfont1=\m@@f
\mathf@nt{\fntmathsstok}{mi}{\fntmathsssize}{cm}\skewchar\m@@f='177\scriptscriptfont1=\m@@f
\mathf@nt{\fntmathtok}{sy}{\fntmathsize}{cm}\skewchar\m@@f='60\textfont2=\m@@f
\mathf@nt{\fntmathstok}{sy}{\fntmathssize}{cm}\skewchar\m@@f='60\scriptfont2=\m@@f
\mathf@nt{\fntmathsstok}{sy}{\fntmathsssize}{cm}\skewchar\m@@f='60\scriptscriptfont2=\m@@f
\mathf@nt{\fntmathtok}{ex}{\fntmathsize}{cm}\textfont3=\m@@f\scriptfont3=\m@@f\scriptscriptfont3=\m@@f
\mathf@nt{\fntmathtok}{ti}{\fntmathsize}{cm}\textfont\itfam=\m@@f
\mathf@nt{\fntmathstok}{ti}{\fntmathssize}{cm}\scriptfont\itfam=\m@@f
\mathf@nt{\fntmathsstok}{ti}{\fntmathssize}{cm}\scriptscriptfont\itfam=\m@@f
\mathf@nt{\fntmathtok}{sl}{\fntmathsize}{cm}\textfont\slfam=\m@@f
\mathf@nt{\fntmathtok}{bx}{\fntmathsize}{cm}\textfont\bffam=\m@@f
\mathf@nt{\fntmathtok}{tt}{\fntmathsize}{cm}\hyphenchar\m@@f=-1\textfont\ttfam=\m@@f
\mathf@nt{\fntmathtok}{msam}{\fntmathsize}{}\textfont\msafam=\m@@f
\mathf@nt{\fntmathstok}{msam}{\fntmathssize}{}\scriptfont\msafam=\m@@f
\mathf@nt{\fntmathsstok}{msam}{\fntmathsssize}{}\scriptscriptfont\msafam=\m@@f
\mathf@nt{\fntmathtok}{msbm}{\fntmathsize}{}\textfont\msbfam=\m@@f
\mathf@nt{\fntmathstok}{msbm}{\fntmathssize}{}\scriptfont\msbfam=\m@@f
\mathf@nt{\fntmathsstok}{msbm}{\fntmathsssize}{}\scriptscriptfont\msbfam=\m@@f

% Blackboard bold font
\newfam\bbfam
\mathf@nt{\fntmathtok}{bbm}{\fntmathsize}{}\textfont\bbfam=\m@@f
\mathf@nt{\fntmathstok}{bbm}{\fntmathssize}{}\scriptfont\bbfam=\m@@f
\mathf@nt{\fntmathsstok}{bbm}{\fntmathsssize}{}\scriptscriptfont\bbfam=\m@@f
\def\bb{\tenbbm\fam\bbfam}

% Font switches
\def\rm{\fam\z@\tenrm}
\def\it{\fam\itfam\tenit}
\def\bo{\fam\bffam\tenb}
\def\bf{\fam\bffam\tenbf}
\def\tt{\fam\ttfam\tentt\hyphenchar\tentt=-1\relax}
\def\sc{\tensc}
\def\sl{\fam\slfam\tensl}
\def\mi{\tenmi}

\rm

% Other fonts
\font\chapfont=csb14 at 16pt
\font\secfont=csb14
\font\secitfont=csbxti14

\catcode`@=12
