% The author of this work is Amit Raj Dhawan.
% This work is licensed under the
% Creative Commons Attribution-ShareAlike 4.0 International License
% on April 07, 2016. For details visit:
% http://creativecommons.org/licenses/by-sa/4.0/.
%
\def\myfont#1#2#3{% The font can take even non-integer values in #2
\XeTeXuseglyphmetrics=1%
\font\rm="#1:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\it="#1/I:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\bf="#1/B:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\sl="#1:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\caps="#1:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at#2pt% +c2sc could also be used but this is better
\font\itbf="#1/IB:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\slbf="#1/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\capsbf="#1/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\capsit="#1/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\capsitbf="#1/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\capssl="#1:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\font\capsslbf="#1/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at#2pt%
\rm\fontss}%
%
%
% Introducing dimensions for font scaling
\newdimen\twentypointfont \twentypointfont=2pt
\newdimen\eighteenpointfont \eighteenpointfont=1.8pt
\newdimen\sixteenpointfont \sixteenpointfont=1.6pt
\newdimen\fourteenpointfont \fourteenpointfont=1.4pt
\newdimen\twelvepointfont \twelvepointfont=1.2pt
\newdimen\elevenpointfont \elevenpointfont=1.1pt
\newdimen\tenpointfont \tenpointfont=1pt
\newdimen\ninepointfont \ninepointfont=0.9pt
\newdimen\eightpointfont \eightpointfont=0.8pt
\newdimen\sevenpointfont \sevenpointfont=0.7pt
\newdimen\sixpointfont \sixpointfont=0.6pt
\newdimen\fivepointfont \fivepointfont=0.5pt
%
%
\def\myzfont#1#2#3{% #2 takes only integer values
\multiply\twentypointfont by #2%
\multiply\eighteenpointfont by #2%
\multiply\sixteenpointfont by #2%
\multiply\fourteenpointfont by #2%
\multiply\twelvepointfont by #2%
\multiply\elevenpointfont by #2%
\multiply\tenpointfont by #2%
\multiply\ninepointfont by #2%
\multiply\eightpointfont by #2%
\multiply\sevenpointfont by #2%
\multiply\sixpointfont by #2%
\multiply\fivepointfont by #2%
%
\XeTeXuseglyphmetrics=1%
%
%
\font\twentyrm="#1/S=20:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentyit="#1/I/S=20:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentybf="#1/S=20/B:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentysl="#1/S=20:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentycaps="#1/S=20:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont% +c2sc could also be used but this is better
\font\twentyitbf="#1/S=20/IB:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentyslbf="#1/S=20/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentycapsbf="#1/S=20/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentycapsit="#1/S=20/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentycapsitbf="#1/S=20/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentycapssl="#1/S=20:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\twentycapsslbf="#1/S=20/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
%
%
\font\eighteenrm="#1/S=18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteenit="#1/S=18/I:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteenbf="#1/S=18/B:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteensl="#1/S=18:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteencaps="#1/S=18:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont% +c2sc could also be used but this is better
\font\eighteenitbf="#1/S=18/IB:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteenslbf="#1/S=18/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteencapsbf="#1/S=18/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteencapsit="#1/S=18/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteencapsitbf="#1/S=18/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteencapssl="#1/S=18:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\eighteencapsslbf="#1/S=18/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
%
%
\font\sixteenrm="#1/S=16:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteenit="#1/S=16/I:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteenbf="#1/S=16/B:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteensl="#1/S=16:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteencaps="#1/S=16:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont% +c2sc could also be used but this is better
\font\sixteenitbf="#1/S=16/IB:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteenslbf="#1/S=16/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteencapsbf="#1/S=16/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteencapsit="#1/S=16/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteencapsitbf="#1/S=16/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteencapssl="#1/S=16:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sixteencapsslbf="#1/S=16/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
%
%
\font\fourteenrm="#1/S=14:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteenit="#1/S=14/I:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteenbf="#1/S=14/B:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteensl="#1/S=14:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteencaps="#1/S=14:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont% +c2sc could also be used but this is better
\font\fourteenitbf="#1/S=14/IB:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteenslbf="#1/S=14/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteencapsbf="#1/S=14/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteencapsit="#1/S=14/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteencapsitbf="#1/S=14/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteencapssl="#1/S=14:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\fourteencapsslbf="#1/S=14/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
%
%
\font\twelverm="#1/S=12:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelveit="#1/S=12/I:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelvebf="#1/S=12/B:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelvesl="#1/S=12:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelvecaps="#1/S=12:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont% +c2sc could also be used but this is better
\font\twelveitbf="#1/S=12/IB:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelveslbf="#1/S=12/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelvecapsbf="#1/S=12/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelvecapsit="#1/S=12/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelvecapsitbf="#1/S=12/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelvecapssl="#1/S=12:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\twelvecapsslbf="#1/S=12/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
%
%
\font\elevenrm="#1/S=11:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevenit="#1/S=11/I:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevenbf="#1/S=11/B:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevensl="#1/S=11:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevencaps="#1/S=11:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont% +c2sc could also be used but this is better
\font\elevenitbf="#1/S=11/IB:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevenslbf="#1/S=11/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevencapsbf="#1/S=11/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevencapsit="#1/S=11/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevencapsitbf="#1/S=11/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevencapssl="#1/S=11:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\elevencapsslbf="#1/S=11/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
%
%
\font\rm="#1/S=10:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\it="#1/S=10/I:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\bf="#1/S=10/B:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sl="#1/S=10:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\caps="#1/S=10:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont% +c2sc could also be used but this is better
\font\itbf="#1/S=10/IB:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\slbf="#1/S=10/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\capsbf="#1/S=10/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\capsit="#1/S=10/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\capsitbf="#1/S=10/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\capssl="#1/S=10:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\capsslbf="#1/S=10/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
%
%
\font\ninerm="#1/S=9:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\nineit="#1/S=9/I:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\ninebf="#1/S=9/B:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\ninesl="#1/S=9:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\ninecaps="#1/S=9:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont% +c2sc could also be used but this is better
\font\nineitbf="#1/S=9/IB:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\nineslbf="#1/S=9/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\ninecapsbf="#1/S=9/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\ninecapsit="#1/S=9/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\ninecapsitbf="#1/S=9/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\ninecapssl="#1/S=9:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\ninecapsslbf="#1/S=9/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
%
%
\font\eightrm="#1/S=8:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightit="#1/S=8/I:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightbf="#1/S=8/B:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightsl="#1/S=8:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightcaps="#1/S=8:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont% +c2sc could also be used but this is better
\font\eightitbf="#1/S=8/IB:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightslbf="#1/S=8/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightcapsbf="#1/S=8/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightcapsit="#1/S=8/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightcapsitbf="#1/S=8/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightcapssl="#1/S=8:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\eightcapsslbf="#1/S=8/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
%
%
\font\sevenrm="#1/S=7:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevenit="#1/S=7/I:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevenbf="#1/S=7/B:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevensl="#1/S=7:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevencaps="#1/S=7:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont% +c2sc could also be used but this is better
\font\sevenitbf="#1/S=7/IB:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevenslbf="#1/S=7/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevencapsbf="#1/S=7/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevencapsit="#1/S=7/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevencapsitbf="#1/S=7/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevencapssl="#1/S=7:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sevencapsslbf="#1/S=7/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
%
%
\font\sixrm="#1/S=6:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixit="#1/S=6/I:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixbf="#1/S=6/B:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixsl="#1/S=6:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixcaps="#1/S=6:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont% +c2sc could also be used but this is better
\font\sixitbf="#1/S=6/IB:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixslbf="#1/S=6/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixcapsbf="#1/S=6/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixcapsit="#1/S=6/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixcapsitbf="#1/S=6/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixcapssl="#1/S=6:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sixcapsslbf="#1/S=6/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
%
%
\font\fiverm="#1/S=5:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fiveit="#1/S=5/I:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fivebf="#1/S=5/B:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fivesl="#1/S=5:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fivecaps="#1/S=5:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont% +c2sc could also be used but this is better
\font\fiveitbf="#1/S=5/IB:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fiveslbf="#1/S=5/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fivecapsbf="#1/S=5/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fivecapsit="#1/S=5/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fivecapsitbf="#1/S=5/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fivecapssl="#1/S=5:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\fivecapsslbf="#1/S=5/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
%
%
\divide\twentypointfont by #2%
\divide\eighteenpointfont by #2%
\divide\sixteenpointfont by #2%
\divide\fourteenpointfont by #2%
\divide\twelvepointfont by #2%
\divide\elevenpointfont by #2%
\divide\tenpointfont by #2%
\divide\ninepointfont by #2%
\divide\eightpointfont by #2%
\divide\sevenpointfont by #2%
\divide\sixpointfont by #2%
\divide\fivepointfont by #2%
%
\rm\fontss}%
%
%
%
%
\def\mysanzfont#1#2#3{% #2 takes only integer values
\multiply\twentypointfont by #2%
\multiply\eighteenpointfont by #2%
\multiply\sixteenpointfont by #2%
\multiply\fourteenpointfont by #2%
\multiply\twelvepointfont by #2%
\multiply\elevenpointfont by #2%
\multiply\tenpointfont by #2%
\multiply\ninepointfont by #2%
\multiply\eightpointfont by #2%
\multiply\sevenpointfont by #2%
\multiply\sixpointfont by #2%
\multiply\fivepointfont by #2%
%
\XeTeXuseglyphmetrics=1%
%
%
\font\sanstwentyrm="#1/S=20:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentyit="#1/S=20/I:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentybf="#1/S=20/B:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentysl="#1/S=20:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentycaps="#1/S=20:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont% +c2sc could also be used but this is better
\font\sanstwentyitbf="#1/S=20/IB:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentyslbf="#1/S=20/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentycapsbf="#1/S=20/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentycapsit="#1/S=20/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentycapsitbf="#1/S=20/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentycapssl="#1/S=20:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
\font\sanstwentycapsslbf="#1/S=20/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twentypointfont%
%
%
\font\sanseighteenrm="#1/S=18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteenit="#1/S=18/I:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteenbf="#1/S=18/B:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteensl="#1/S=18:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteencaps="#1/S=18:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont% +c2sc could also be used but this is better
\font\sanseighteenitbf="#1/S=18/IB:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteenslbf="#1/S=18/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteencapsbf="#1/S=18/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteencapsit="#1/S=18/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteencapsitbf="#1/S=18/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteencapssl="#1/S=18:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
\font\sanseighteencapsslbf="#1/S=18/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eighteenpointfont%
%
%
\font\sanssixteenrm="#1/S=16:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteenit="#1/S=16/I:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteenbf="#1/S=16/B:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteensl="#1/S=16:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteencaps="#1/S=16:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont% +c2sc could also be used but this is better
\font\sanssixteenitbf="#1/S=16/IB:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteenslbf="#1/S=16/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteencapsbf="#1/S=16/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteencapsit="#1/S=16/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteencapsitbf="#1/S=16/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteencapssl="#1/S=16:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
\font\sanssixteencapsslbf="#1/S=16/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixteenpointfont%
%
%
\font\sansfourteenrm="#1/S=14:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteenit="#1/S=14/I:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteenbf="#1/S=14/B:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteensl="#1/S=14:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteencaps="#1/S=14:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont% +c2sc could also be used but this is better
\font\sansfourteenitbf="#1/S=14/IB:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteenslbf="#1/S=14/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteencapsbf="#1/S=14/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteencapsit="#1/S=14/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteencapsitbf="#1/S=14/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteencapssl="#1/S=14:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
\font\sansfourteencapsslbf="#1/S=14/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fourteenpointfont%
%
%
\font\sanstwelverm="#1/S=12:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelveit="#1/S=12/I:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelvebf="#1/S=12/B:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelvesl="#1/S=12:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelvecaps="#1/S=12:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont% +c2sc could also be used but this is better
\font\sanstwelveitbf="#1/S=12/IB:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelveslbf="#1/S=12/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelvecapsbf="#1/S=12/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelvecapsit="#1/S=12/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelvecapsitbf="#1/S=12/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelvecapssl="#1/S=12:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
\font\sanstwelvecapsslbf="#1/S=12/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\twelvepointfont%
%
%
\font\sanselevenrm="#1/S=11:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevenit="#1/S=11/I:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevenbf="#1/S=11/B:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevensl="#1/S=11:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevencaps="#1/S=11:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont% +c2sc could also be used but this is better
\font\sanselevenitbf="#1/S=11/IB:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevenslbf="#1/S=11/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevencapsbf="#1/S=11/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevencapsit="#1/S=11/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevencapsitbf="#1/S=11/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevencapssl="#1/S=11:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
\font\sanselevencapsslbf="#1/S=11/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\elevenpointfont%
%
%
\font\sansrm="#1/S=10:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sansit="#1/S=10/I:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sansbf="#1/S=10/B:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sanssl="#1/S=10:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sanscaps="#1/S=10:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont% +c2sc could also be used but this is better
\font\sansitbf="#1/S=10/IB:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sansslbf="#1/S=10/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sanscapsbf="#1/S=10/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sanscapsit="#1/S=10/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sanscapsitbf="#1/S=10/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sanscapssl="#1/S=10:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
\font\sanscapsslbf="#1/S=10/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\tenpointfont%
%
%
\font\sansninerm="#1/S=9:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansnineit="#1/S=9/I:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansninebf="#1/S=9/B:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansninesl="#1/S=9:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansninecaps="#1/S=9:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont% +c2sc could also be used but this is better
\font\sansnineitbf="#1/S=9/IB:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansnineslbf="#1/S=9/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansninecapsbf="#1/S=9/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansninecapsit="#1/S=9/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansninecapsitbf="#1/S=9/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansninecapssl="#1/S=9:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
\font\sansninecapsslbf="#1/S=9/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\ninepointfont%
%
%
\font\sanseightrm="#1/S=8:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightit="#1/S=8/I:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightbf="#1/S=8/B:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightsl="#1/S=8:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightcaps="#1/S=8:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont% +c2sc could also be used but this is better
\font\sanseightitbf="#1/S=8/IB:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightslbf="#1/S=8/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightcapsbf="#1/S=8/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightcapsit="#1/S=8/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightcapsitbf="#1/S=8/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightcapssl="#1/S=8:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
\font\sanseightcapsslbf="#1/S=8/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\eightpointfont%
%
%
\font\sanssevenrm="#1/S=7:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevenit="#1/S=7/I:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevenbf="#1/S=7/B:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevensl="#1/S=7:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevencaps="#1/S=7:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont% +c2sc could also be used but this is better
\font\sanssevenitbf="#1/S=7/IB:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevenslbf="#1/S=7/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevencapsbf="#1/S=7/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevencapsit="#1/S=7/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevencapsitbf="#1/S=7/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevencapssl="#1/S=7:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
\font\sanssevencapsslbf="#1/S=7/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sevenpointfont%
%
%
\font\sanssixrm="#1/S=6:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixit="#1/S=6/I:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixbf="#1/S=6/B:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixsl="#1/S=6:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixcaps="#1/S=6:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont% +c2sc could also be used but this is better
\font\sanssixitbf="#1/S=6/IB:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixslbf="#1/S=6/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixcapsbf="#1/S=6/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixcapsit="#1/S=6/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixcapsitbf="#1/S=6/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixcapssl="#1/S=6:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
\font\sanssixcapsslbf="#1/S=6/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\sixpointfont%
%
%
\font\sansfiverm="#1/S=5:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfiveit="#1/S=5/I:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfivebf="#1/S=5/B:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfivesl="#1/S=5:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfivecaps="#1/S=5:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont% +c2sc could also be used but this is better
\font\sansfiveitbf="#1/S=5/IB:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfiveslbf="#1/S=5/B:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfivecapsbf="#1/S=5/B:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfivecapsit="#1/S=5/I:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfivecapsitbf="#1/S=5/IB:+smcp:letterspace=2:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfivecapssl="#1/S=5:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
\font\sansfivecapsslbf="#1/S=5/B:+smcp:letterspace=2:slant=0.18:mapping=tex-text:+pnum:+onum:#3" at\fivepointfont%
%
\divide\twentypointfont by #2%
\divide\eighteenpointfont by #2%
\divide\sixteenpointfont by #2%
\divide\fourteenpointfont by #2%
\divide\twelvepointfont by #2%
\divide\elevenpointfont by #2%
\divide\tenpointfont by #2%
\divide\ninepointfont by #2%
\divide\eightpointfont by #2%
\divide\sevenpointfont by #2%
\divide\sixpointfont by #2%
\divide\fivepointfont by #2%
%
%
%\sansrm
}%
%
%
\def\mymathfont#1#2{% Towards Unicode math. *Should be declared after \hangpun
\multiply\twentypointfont by #2%
\multiply\eighteenpointfont by #2%
\multiply\sixteenpointfont by #2%
\multiply\fourteenpointfont by #2%
\multiply\twelvepointfont by #2%
\multiply\elevenpointfont by #2%
\multiply\tenpointfont by #2%
\multiply\ninepointfont by #2%
\multiply\eightpointfont by #2%
\multiply\sevenpointfont by #2%
\multiply\sixpointfont by #2%
\multiply\fivepointfont by #2%
% To see math romans in the declared font. E.g. 12 and $12$ will be in the same font
\font\tenrm="#1/S=10:mapping=tex-text:+pnum:+lnum" at\tenpointfont%
\font\sevenrm="#1/S=7:mapping=tex-text:+pnum:+lnum" at\sevenpointfont%
\font\fiverm="#1/S=5:mapping=tex-text:+pnum:+lnum" at\fivepointfont%
\textfont0=\tenrm%
\scriptfont0=\sevenrm%
\scriptscriptfont0=\fiverm%
\def\rm{\fam=0 \tenrm}%
%
% To cope with misnumbered glyphs such as theta of TeX's math italics family
\def\Gamma{{\rm\mathord Γ}}%
\def\Delta{{\rm\mathord Δ}}%
\def\Theta{{\rm\mathord Θ}}%
\def\Lambda{{\rm\mathord Λ}}%
\def\Xi{{\rm\mathord Ξ}}%
\def\Pi{{\rm\mathord Π}}%
\def\Sigma{{\rm\mathord Σ}}%
\def\Upsilon{{\rm\mathord ϒ}}%
\def\Phi{{\rm\mathord Φ}}%
\def\Psi{{\rm\mathord Ψ}}%
\def\Omega{{\rm\mathord Ω}}%
\def\hat{\mathaccent"745E }% Default is \def\hat{\mathaccent"705E }
% changed it because \mymathfont changes the roman regular font, i.e., family 0
%
%\def\alpha{{\mathord α}}%
%\def\eta{{\mathord η}}%
%\def\nu{{\mathord ν}}%
%\def\sigma{{\mathord σ}}%
%\def\beta{{\mathord β}}%
%\def\theta{{\mathord θ}}%
%\def\xi{{\mathord ξ}}%
%\def\varsigma{{\mathord ς}}%
%\def\omega{{\mathord ω}}%
%\def\gamma{{{\mathord γ}}}%
%\def\vartheta{{\mathord ϑ}}%
%\def\tau{{\mathord τ}}%
%\def\delta{{\mathord δ}}%
%\def\iota{{\mathord ι}}%
%\def\pi{{\mathord π}}%
%\def\upsilon{{\mathord υ}}%
%\def\varGamma{{\mathord Γ}}%
%\def\epsilon{{\mathord ε}}%
%\def\kappa{{\mathord κ}}%
%%\def\varphi % did not figure out
%\def\phi{{\mathord φ}}%
%%\def\varepsilon{{\mathord  % did not figure out
%\def\lambda{{\mathord λ}}%
%\def\rho{{\mathord ρ}}%
%\def\zeta{{\mathord ζ}}%
%\def\mu{{\mathord μ}}%
%\def\chi{{\mathord χ}}%
%
%\def\j{^^^^0237}%
%\def\function{ƒ}%
%
\def\mytilde{\mathchoice{\tenrm{\raise1ex\hbox{\char"7E}\kern-1.4ex}}%
{\tenrm{\raise1ex\hbox{\char"7E}\kern-1.37ex}}%
{\sevenrm{\raise1ex\hbox{\char"7E}\kern-1.37ex}}%
{\fiverm{\raise1ex\hbox{\char"7E}\kern-1.37ex}}}% Note that for \mytilde to work properly \input font_kp or \input font_xx should be included before \mymathfont.
}%
%
%
%
%
%
% For resetting the font size
\def\resetfontsize{\twentypointfont=2pt%
\eighteenpointfont=1.8pt%
\sixteenpointfont=1.6pt%
\fourteenpointfont=1.4pt%
\twelvepointfont=1.2pt%
\elevenpointfont=1.1pt%
\tenpointfont=1pt%
\ninepointfont=0.9pt%
\eightpointfont=0.8pt%
\sevenpointfont=0.7pt%
\sixpointfont=0.6pt%
\fivepointfont=0.5pt}%
%
%
%
%
%
%
\def\setprotcode#1{%
    \XeTeXprotrudechars=1%
    \rpcode#1 U"0021    226%    exclamation mark
    \rpcode#1 U"002C    226%    comma
    \rpcode#1 U"002D    350%    hyphen
    \rpcode#1 U"002E    226%    full stop/period
    \rpcode#1 U"003B    226%    semicolon
    \rpcode#1 U"003A    226%    colon
    \rpcode#1 U"003F    226%    question mark
    \lpcode#1 U"2018    216%    left single quote
    \rpcode#1 U"2019    216%    right single quote
    \lpcode#1 U"201C    366%    left double quote
    \rpcode#1 U"201D    366%    right double quote
    \rpcode#1 U"2013    350%    en dash
    \rpcode#1 U"2014    350%    em dash
}%
\def\hangpun{%
\setprotcode{\the\font}{}%
\setprotcode{\rm}{}%
\setprotcode{\it}{}%
\setprotcode{\sl}{}%
\setprotcode{\bf}{}%
\setprotcode{\itbf}{}%
\setprotcode{\slbf}{}%
\setprotcode{\caps}{}%
\setprotcode{\capsit}{}%
\setprotcode{\capssl}{}%
\setprotcode{\capsbf}{}%
\setprotcode{\capsitbf}{}%
\setprotcode{\capsslbf}{}%
\setprotcode{\fiverm}{}%
\setprotcode{\fiveit}{}%
\setprotcode{\fivesl}{}%
\setprotcode{\fivebf}{}%
\setprotcode{\fiveitbf}{}%
\setprotcode{\fiveslbf}{}%
\setprotcode{\fivecaps}{}%
\setprotcode{\fivecapsit}{}%
\setprotcode{\fivecapssl}{}%
\setprotcode{\fivecapsbf}{}%
\setprotcode{\fivecapsitbf}{}%
\setprotcode{\fivecapsslbf}{}%
\setprotcode{\sixrm}{}%
\setprotcode{\sixit}{}%
\setprotcode{\sixsl}{}%
\setprotcode{\sixbf}{}%
\setprotcode{\sixitbf}{}%
\setprotcode{\sixslbf}{}%
\setprotcode{\sixcaps}{}%
\setprotcode{\sixcapsit}{}%
\setprotcode{\sixcapssl}{}%
\setprotcode{\sixcapsbf}{}%
\setprotcode{\sixcapsitbf}{}%
\setprotcode{\sixcapsslbf}{}%
\setprotcode{\sevenrm}{}%
\setprotcode{\sevenit}{}%
\setprotcode{\sevensl}{}%
\setprotcode{\sevenbf}{}%
\setprotcode{\sevenitbf}{}%
\setprotcode{\sevenslbf}{}%
\setprotcode{\sevencaps}{}%
\setprotcode{\sevencapsit}{}%
\setprotcode{\sevencapssl}{}%
\setprotcode{\sevencapsbf}{}%
\setprotcode{\sevencapsitbf}{}%
\setprotcode{\sevencapsslbf}{}%
\setprotcode{\eightrm}{}%
\setprotcode{\eightit}{}%
\setprotcode{\eightsl}{}%
\setprotcode{\eightbf}{}%
\setprotcode{\eightitbf}{}%
\setprotcode{\eightslbf}{}%
\setprotcode{\eightcaps}{}%
\setprotcode{\eightcapsit}{}%
\setprotcode{\eightcapssl}{}%
\setprotcode{\eightcapsbf}{}%
\setprotcode{\eightcapsitbf}{}%
\setprotcode{\eightcapsslbf}{}%
\setprotcode{\ninerm}{}%
\setprotcode{\nineit}{}%
\setprotcode{\ninesl}{}%
\setprotcode{\ninebf}{}%
\setprotcode{\nineitbf}{}%
\setprotcode{\nineslbf}{}%
\setprotcode{\ninecaps}{}%
\setprotcode{\ninecapsit}{}%
\setprotcode{\ninecapssl}{}%
\setprotcode{\ninecapsbf}{}%
\setprotcode{\ninecapsitbf}{}%
\setprotcode{\ninecapsslbf}{}%
\setprotcode{\elevenrm}{}%
\setprotcode{\elevenit}{}%
\setprotcode{\elevensl}{}%
\setprotcode{\elevenbf}{}%
\setprotcode{\elevenitbf}{}%
\setprotcode{\elevenslbf}{}%
\setprotcode{\elevencaps}{}%
\setprotcode{\elevencapsit}{}%
\setprotcode{\elevencapssl}{}%
\setprotcode{\elevencapsbf}{}%
\setprotcode{\elevencapsitbf}{}%
\setprotcode{\elevencapsslbf}{}%
\setprotcode{\twelverm}{}%
\setprotcode{\twelveit}{}%
\setprotcode{\twelvesl}{}%
\setprotcode{\twelvebf}{}%
\setprotcode{\twelveitbf}{}%
\setprotcode{\twelveslbf}{}%
\setprotcode{\twelvecaps}{}%
\setprotcode{\twelvecapsit}{}%
\setprotcode{\twelvecapssl}{}%
\setprotcode{\twelvecapsbf}{}%
\setprotcode{\twelvecapsitbf}{}%
\setprotcode{\twelvecapsslbf}{}%
\setprotcode{\fourteenrm}{}%
\setprotcode{\fourteenit}{}%
\setprotcode{\fourteensl}{}%
\setprotcode{\fourteenbf}{}%
\setprotcode{\fourteenitbf}{}%
\setprotcode{\fourteenslbf}{}%
\setprotcode{\fourteencaps}{}%
\setprotcode{\fourteencapsit}{}%
\setprotcode{\fourteencapssl}{}%
\setprotcode{\fourteencapsbf}{}%
\setprotcode{\fourteencapsitbf}{}%
\setprotcode{\fourteencapsslbf}{}%
\setprotcode{\sixteenrm}{}%
\setprotcode{\sixteenit}{}%
\setprotcode{\sixteensl}{}%
\setprotcode{\sixteenbf}{}%
\setprotcode{\sixteenitbf}{}%
\setprotcode{\sixteenslbf}{}%
\setprotcode{\sixteencaps}{}%
\setprotcode{\sixteencapsit}{}%
\setprotcode{\sixteencapssl}{}%
\setprotcode{\sixteencapsbf}{}%
\setprotcode{\sixteencapsitbf}{}%
\setprotcode{\sixteencapsslbf}{}%
\setprotcode{\eighteenrm}{}%
\setprotcode{\eighteenit}{}%
\setprotcode{\eighteensl}{}%
\setprotcode{\eighteenbf}{}%
\setprotcode{\eighteenitbf}{}%
\setprotcode{\eighteenslbf}{}%
\setprotcode{\eighteencaps}{}%
\setprotcode{\eighteencapsit}{}%
\setprotcode{\eighteencapssl}{}%
\setprotcode{\eighteencapsbf}{}%
\setprotcode{\eighteencapsitbf}{}%
\setprotcode{\eighteencapsslbf}{}%
\setprotcode{\twentyrm}{}%
\setprotcode{\twentyit}{}%
\setprotcode{\twentysl}{}%
\setprotcode{\twentybf}{}%
\setprotcode{\twentyitbf}{}%
\setprotcode{\twentyslbf}{}%
\setprotcode{\twentycaps}{}%
\setprotcode{\twentycapsit}{}%
\setprotcode{\twentycapssl}{}%
\setprotcode{\twentycapsbf}{}%
\setprotcode{\twentycapsitbf}{}%
\setprotcode{\twentycapsslbf}{}%
}%
%{} needed after \setprotcode. If not when \fontss followed by number, will not print the %number.
%
\def\unsetprotcode#1{%
    \XeTeXprotrudechars=1%
    \rpcode#1 U"0021    0%     exclamation mark
    \rpcode#1 U"002C    0%    comma
    \rpcode#1 U"002D    0%    hyphen
    \rpcode#1 U"002E    0%    full stop/period
    \rpcode#1 U"003B    0%    semicolon
    \rpcode#1 U"003A    0%    colon
    \rpcode#1 U"003F    0%    question mark
    \lpcode#1 U"2018    0%    left single quote
    \rpcode#1 U"2019    0%    right single quote
    \lpcode#1 U"201C    0%    left double quote
    \rpcode#1 U"201D    0%    right double quote
    \rpcode#1 U"2013    0%    en dash
    \rpcode#1 U"2014    0%    em dash
}%
\def\nohangpun{%
\unsetprotcode{\the\font}{}%
\unsetprotcode{\rm}{}%
\unsetprotcode{\it}{}%
\unsetprotcode{\sl}{}%
\unsetprotcode{\bf}{}%
\unsetprotcode{\itbf}{}%
\unsetprotcode{\slbf}{}%
\unsetprotcode{\caps}{}%
\unsetprotcode{\capsit}{}%
\unsetprotcode{\capssl}{}%
\unsetprotcode{\capsbf}{}%
\unsetprotcode{\capsitbf}{}%
\unsetprotcode{\capsslbf}{}%
\unsetprotcode{\fiverm}{}%
\unsetprotcode{\fiveit}{}%
\unsetprotcode{\fivesl}{}%
\unsetprotcode{\fivebf}{}%
\unsetprotcode{\fiveitbf}{}%
\unsetprotcode{\fiveslbf}{}%
\unsetprotcode{\fivecaps}{}%
\unsetprotcode{\fivecapsit}{}%
\unsetprotcode{\fivecapssl}{}%
\unsetprotcode{\fivecapsbf}{}%
\unsetprotcode{\fivecapsitbf}{}%
\unsetprotcode{\fivecapsslbf}{}%
\unsetprotcode{\sixrm}{}%
\unsetprotcode{\sixit}{}%
\unsetprotcode{\sixsl}{}%
\unsetprotcode{\sixbf}{}%
\unsetprotcode{\sixitbf}{}%
\unsetprotcode{\sixslbf}{}%
\unsetprotcode{\sixcaps}{}%
\unsetprotcode{\sixcapsit}{}%
\unsetprotcode{\sixcapssl}{}%
\unsetprotcode{\sixcapsbf}{}%
\unsetprotcode{\sixcapsitbf}{}%
\unsetprotcode{\sixcapsslbf}{}%
\unsetprotcode{\sevenrm}{}%
\unsetprotcode{\sevenit}{}%
\unsetprotcode{\sevensl}{}%
\unsetprotcode{\sevenbf}{}%
\unsetprotcode{\sevenitbf}{}%
\unsetprotcode{\sevenslbf}{}%
\unsetprotcode{\sevencaps}{}%
\unsetprotcode{\sevencapsit}{}%
\unsetprotcode{\sevencapssl}{}%
\unsetprotcode{\sevencapsbf}{}%
\unsetprotcode{\sevencapsitbf}{}%
\unsetprotcode{\sevencapsslbf}{}%
\unsetprotcode{\eightrm}{}%
\unsetprotcode{\eightit}{}%
\unsetprotcode{\eightsl}{}%
\unsetprotcode{\eightbf}{}%
\unsetprotcode{\eightitbf}{}%
\unsetprotcode{\eightslbf}{}%
\unsetprotcode{\eightcaps}{}%
\unsetprotcode{\eightcapsit}{}%
\unsetprotcode{\eightcapssl}{}%
\unsetprotcode{\eightcapsbf}{}%
\unsetprotcode{\eightcapsitbf}{}%
\unsetprotcode{\eightcapsslbf}{}%
\unsetprotcode{\ninerm}{}%
\unsetprotcode{\nineit}{}%
\unsetprotcode{\ninesl}{}%
\unsetprotcode{\ninebf}{}%
\unsetprotcode{\nineitbf}{}%
\unsetprotcode{\nineslbf}{}%
\unsetprotcode{\ninecaps}{}%
\unsetprotcode{\ninecapsit}{}%
\unsetprotcode{\ninecapssl}{}%
\unsetprotcode{\ninecapsbf}{}%
\unsetprotcode{\ninecapsitbf}{}%
\unsetprotcode{\ninecapsslbf}{}%
\unsetprotcode{\elevenrm}{}%
\unsetprotcode{\elevenit}{}%
\unsetprotcode{\elevensl}{}%
\unsetprotcode{\elevenbf}{}%
\unsetprotcode{\elevenitbf}{}%
\unsetprotcode{\elevenslbf}{}%
\unsetprotcode{\elevencaps}{}%
\unsetprotcode{\elevencapsit}{}%
\unsetprotcode{\elevencapssl}{}%
\unsetprotcode{\elevencapsbf}{}%
\unsetprotcode{\elevencapsitbf}{}%
\unsetprotcode{\elevencapsslbf}{}%
\unsetprotcode{\twelverm}{}%
\unsetprotcode{\twelveit}{}%
\unsetprotcode{\twelvesl}{}%
\unsetprotcode{\twelvebf}{}%
\unsetprotcode{\twelveitbf}{}%
\unsetprotcode{\twelveslbf}{}%
\unsetprotcode{\twelvecaps}{}%
\unsetprotcode{\twelvecapsit}{}%
\unsetprotcode{\twelvecapssl}{}%
\unsetprotcode{\twelvecapsbf}{}%
\unsetprotcode{\twelvecapsitbf}{}%
\unsetprotcode{\twelvecapsslbf}{}%
\unsetprotcode{\fourteenrm}{}%
\unsetprotcode{\fourteenit}{}%
\unsetprotcode{\fourteensl}{}%
\unsetprotcode{\fourteenbf}{}%
\unsetprotcode{\fourteenitbf}{}%
\unsetprotcode{\fourteenslbf}{}%
\unsetprotcode{\fourteencaps}{}%
\unsetprotcode{\fourteencapsit}{}%
\unsetprotcode{\fourteencapssl}{}%
\unsetprotcode{\fourteencapsbf}{}%
\unsetprotcode{\fourteencapsitbf}{}%
\unsetprotcode{\fourteencapsslbf}{}%
\unsetprotcode{\sixteenrm}{}%
\unsetprotcode{\sixteenit}{}%
\unsetprotcode{\sixteensl}{}%
\unsetprotcode{\sixteenbf}{}%
\unsetprotcode{\sixteenitbf}{}%
\unsetprotcode{\sixteenslbf}{}%
\unsetprotcode{\sixteencaps}{}%
\unsetprotcode{\sixteencapsit}{}%
\unsetprotcode{\sixteencapssl}{}%
\unsetprotcode{\sixteencapsbf}{}%
\unsetprotcode{\sixteencapsitbf}{}%
\unsetprotcode{\sixteencapsslbf}{}%
\unsetprotcode{\eighteenrm}{}%
\unsetprotcode{\eighteenit}{}%
\unsetprotcode{\eighteensl}{}%
\unsetprotcode{\eighteenbf}{}%
\unsetprotcode{\eighteenitbf}{}%
\unsetprotcode{\eighteenslbf}{}%
\unsetprotcode{\eighteencaps}{}%
\unsetprotcode{\eighteencapsit}{}%
\unsetprotcode{\eighteencapssl}{}%
\unsetprotcode{\eighteencapsbf}{}%
\unsetprotcode{\eighteencapsitbf}{}%
\unsetprotcode{\eighteencapsslbf}{}%
\unsetprotcode{\twentyrm}{}%
\unsetprotcode{\twentyit}{}%
\unsetprotcode{\twentysl}{}%
\unsetprotcode{\twentybf}{}%
\unsetprotcode{\twentyitbf}{}%
\unsetprotcode{\twentyslbf}{}%
\unsetprotcode{\twentycaps}{}%
\unsetprotcode{\twentycapsit}{}%
\unsetprotcode{\twentycapssl}{}%
\unsetprotcode{\twentycapsbf}{}%
\unsetprotcode{\twentycapsitbf}{}%
\unsetprotcode{\twentycapsslbf}{}%
}%
%{} needed after \setprotcode. If not when \fontss followed by number, will not print the number.
%
\def\fontss{\parindent=2em%
\baselineskip=2.8ex%
\spaceskip=0.30001em plus0.11em minus0.11em}%
%
%
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%   Special UNICODE Characters %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\uAlpha{Α}%
\def\uBeta{Β}%
\def\uGamma{Γ}%
\def\uDelta{Δ}%
\def\uEpsilon{Ε}%
\def\uZeta{Ζ}%
\def\uEta{Η}%
\def\uTheta{Θ}%
\def\uIota{Ι}%
\def\uKappa{Κ}%
\def\uLambda{Λ}%
\def\uMu{Μ}%
\def\uNu{Ν}%
\def\uXi{Ξ}%
\def\uOmicron{Ο}%
\def\uPi{Π}%
\def\uRho{Ρ}%
\def\uSigma{Σ}%
\def\uTau{Τ}%
\def\uUpsilon{Υ}%
\def\uPhi{Φ}%
\def\uChi{Χ}%
\def\uPsi{Ψ}%
\def\uOmega{Ω}%
\def\ualpha{α}%
\def\ubeta{β}%
\def\ugamma{γ}%
\def\udelta{δ}%
\def\uepsilon{ε}%
\def\uzeta{ζ}%
\def\ueta{η}%
\def\utheta{θ}%
\def\uiota{ι}%
\def\ukappa{κ}%
\def\ulambda{λ}%
\def\umu{μ}%
\def\unu{ν}%
\def\uxi{ξ}%
\def\uomicron{ο}%
\def\upi{π}%
\def\urho{ρ}%
\def\usigmaf{ς}%
\def\usigma{σ}%
\def\utau{τ}%
\def\uupsilon{υ}%
\def\uphi{φ}%
\def\uchi{χ}%
\def\upsi{ψ}%
\def\uomega{ω}%
\def\uthetasym{ϑ}%
\def\uupsih{ϒ}%
\def\upiv{ϖ}%
\def\ubull{•}%
\def\uhellip{…}%
\def\uprime{′}%
\def\uPrime{″}%
\def\uoline{‾}%
\def\ufrasl{⁄}%
\def\uweierp{℘}%
\def\uimage{ℑ}%
\def\ureal{ℜ}%
\def\utrade{™}%
\def\ualefsym{ℵ}%
\def\ularr{←}%
\def\uuarr{↑}%
\def\urarr{→}%
\def\udarr{↓}%
\def\uharr{↔}%
\def\ucrarr{↵}%
\def\ulArr{⇐}%
\def\uuArr{⇑}%
\def\urArr{⇒}%
\def\udArr{⇓}%
\def\uhArr{⇔}%
\def\uforall{∀}%
\def\upart{∂}%
\def\uexist{∃}%
\def\uempty{∅}%
\def\unabla{∇}%
\def\uisin{∈}%
\def\unotin{∉}%
\def\uni{∋}%
\def\uprod{∏}%
\def\usum{∑}%
\def\uminus{−}%
\def\ulowast{∗}%
\def\uradic{√}%
\def\uprop{∝}%
\def\uinfin{∞}%
\def\uang{∠}%
\def\uand{∧}%
\def\uor{∨}%
\def\ucap{∩}%
\def\ucup{∪}%
\def\uint{∫}%
\def\uthere4{∴}%
\def\usim{∼}%
\def\ucong{≅}%
\def\uasymp{≈}%
\def\une{≠}%
\def\uequiv{≡}%
\def\ule{≤}%
\def\uge{≥}%
\def\usub{⊂}%
\def\usup{⊃}%
\def\unsub{⊄}%
\def\usube{⊆}%
\def\usupe{⊇}%
\def\uoplus{⊕}%
\def\uotimes{⊗}%
\def\uperp{⊥}%
\def\usdot{⋅}%
\def\ulceil{⌈}%
\def\urceil{⌉}%
\def\ulfloor{⌊}%
\def\urfloor{⌋}%
\def\ulang{⟨}%
\def\urang{⟩}%
\def\uloz{◊}%
\def\uspades{♠}%
\def\uclubs{♣}%
\def\uhearts{♥}%
\def\udiams{♦}%
\def\ufnof{ƒ}%
\def\uensp{ }%
\def\uemsp{ }%
\def\uthinsp{ }%
\def\uzwnj{‌}%
\def\uzwj{‍}%
\def\ulrm{‎}%
\def\urlm{‏}%
\def\undash{–}%
\def\umdash{—}%
\def\ulsquo{‘}%
\def\ursquo{’}%
\def\usbquo{‚}%
\def\uldquo{“}%
\def\urdquo{”}%
\def\ubdquo{„}%
\def\udagger{†}%
\def\uDagger{‡}%
\def\upermil{‰}%
\def\ulsaquo{‹}%
\def\ursaquo{›}%
\def\ueuro{€}%
\def\ucirc{ˆ}%
\def\utilde{˜}%
\def\uOElig{Œ}%
\def\uoelig{œ}%
\def\uScaron{Š}%
\def\uscaron{š}%
\def\uYuml{Ÿ}%
\def\uquot{"}%
\def\uamp{&}%
\def\uapos{'}%
\def\ult{<}%
\def\ugt{>}%
\def\unbsp{}%
\def\uiexcl{¡}%
\def\ucent{¢}%
\def\upound{£}%
\def\ucurren{¤}%
\def\uyen{¥}%
\def\ubrvbar{¦}%
\def\usect{§}%
\def\uuml{¨}%
\def\ucopy{©}%
\def\uordf{ª}%
\def\ulaquo{«}%
\def\unot{¬}%
\def\ushy{­}%
\def\ureg{®}%
\def\umacr{¯}%
\def\udeg{°}%
\def\uplusmn{±}%
\def\usup2{²}%
\def\usup3{³}%
\def\uacute{´}%
\def\umicro{µ}%
\def\upara{¶}%
\def\umiddot{·}%
\def\ucedil{¸}%
\def\usup1{¹}%
\def\uordm{º}%
\def\uraquo{»}%
\def\ufrac14{¼}%
\def\ufrac12{½}%
\def\ufrac34{¾}%
\def\uiquest{¿}%
\def\uAgrave{À}%
\def\uAacute{Á}%
\def\uAcirc{Â}%
\def\uAtilde{Ã}%
\def\uAuml{Ä}%
\def\uAring{Å}%
\def\uAElig{Æ}%
\def\uCcedil{Ç}%
\def\uEgrave{È}%
\def\uEacute{É}%
\def\uEcirc{Ê}%
\def\uEuml{Ë}%
\def\uIgrave{Ì}%
\def\uIacute{Í}%
\def\uIcirc{Î}%
\def\uIuml{Ï}%
\def\uETH{Ð}%
\def\uNtilde{Ñ}%
\def\uOgrave{Ò}%
\def\uOacute{Ó}%
\def\uOcirc{Ô}%
\def\uOtilde{Õ}%
\def\uOuml{Ö}%
\def\utimes{×}%
\def\uOslash{Ø}%
\def\uUgrave{Ù}%
\def\uUacute{Ú}%
\def\uUcirc{Û}%
\def\uUuml{Ü}%
\def\uYacute{Ý}%
\def\uTHORN{Þ}%
\def\uszlig{ß}%
\def\uagrave{à}%
\def\uaacute{á}%
\def\uacirc{â}%
\def\uatilde{ã}%
\def\uauml{ä}%
\def\uaring{å}%
\def\uaelig{æ}%
\def\uccedil{ç}%
\def\uegrave{è}%
\def\ueacute{é}%
\def\uecirc{ê}%
\def\ueuml{ë}%
\def\uigrave{ì}%
\def\uiacute{í}%
\def\uicirc{î}%
\def\uiuml{ï}%
\def\ueth{ð}%
\def\untilde{ñ}%
\def\uograve{ò}%
\def\uoacute{ó}%
\def\uocirc{ô}%
\def\uotilde{õ}%
\def\uouml{ö}%
\def\udivide{÷}%
\def\uoslash{ø}%
\def\uugrave{ù}%
\def\uuacute{ú}%
\def\uucirc{û}%
\def\uuuml{ü}%
\def\uyacute{ý}%
\def\uthorn{þ}%
\def\uyuml{ÿ}%
\def\uhbar{ħ}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 