summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/ofs/amsfn.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/ofs/amsfn.tex')
-rw-r--r--Master/texmf-dist/tex/generic/ofs/amsfn.tex134
1 files changed, 134 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/ofs/amsfn.tex b/Master/texmf-dist/tex/generic/ofs/amsfn.tex
new file mode 100644
index 00000000000..c3690072147
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/ofs/amsfn.tex
@@ -0,0 +1,134 @@
+% OFS: AMS fonts, declaration
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% Apr. 2004 Petr Olsak
+
+%% see more info at the end of this file
+
+\protectreading amsfn.tex % This is part of OFS package
+
+\def\loadAMSnormalmath{%
+ \loadCMnormalmath
+ \chardef\msamfam 8
+ \loadmathfam \msamfam [/msam]% MSAM, symbols from ASMTeX
+ \chardef\msbmfam 9
+ \loadmathfam \msbmfam [/msbm]% MSBM, symbols from AMSTeX
+ \lastfam =9
+}
+\def\loadAMSboldmath{%
+ \loadCMboldmath
+ \chardef\msamfam 8
+ \loadmathfam \msamfam [/msam]% MSAM, symbols from ASMTeX
+ \chardef\msbmfam 9
+ \loadmathfam \msbmfam [/msbm]% MSBM, symbols from AMSTeX
+ \lastfam =9
+}
+\def\setAMSmathchars{\mathencread ofs-ams;}
+
+\def\registerAMSfonts #1 {%
+ \registertfm #1 - #110 %
+ \registertfm #1 0pt-6pt #15 %
+ \registertfm #1 6pt-7pt #16 %
+ \registertfm #1 7pt-8pt #17 %
+ \registertfm #1 8pt-9pt #18 %
+ \registertfm #1 9pt-10pt #19 %
+ \registertfm #1 10pt-* #110 %
+}
+\registerAMSfonts msam %
+\registerAMSfonts msbm %
+\registerAMSfonts eufm %
+\registerAMSfonts eufb %
+\registerAMSfonts eurm %
+\registerAMSfonts eurb %
+\registerAMSfonts eusm %
+\registerAMSfonts eusb %
+
+\registertfm cmbsy - - % reset
+\registerAMSfonts cmbsy %
+\registertfm cmex - - % reset
+\registerAMSfonts cmex %
+\registertfm cmmib - - % reset
+\registerAMSfonts cmmib %
+
+\registertfm euex - euex10 %
+\registertfm euex 0pt-8pt euex7 %
+\registertfm euex 8pt-9pt euex8 %
+\registertfm euex 9pt-10pt euex9 %
+\registertfm euex 10pt-* euex10 %
+
+\endinput
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+You can use all AMS symbol sequences together with CM fonts in
+math formulae after:
+
+\input amsfn
+\def\fomenc{AMS}
+\setmath[//]
+
+You can add the Euler Fraktur to the math fonts by the following
+commands (before \setmath command):
+
+\addcmd\mathfonts {\def\tmpa{bold}%
+ \ifx\mathversion\tmpa \def\tmpa{b}\else\def\tmpa{m}\fi
+ \newmathfam\frakfam \loadmathfam\frakfam [/euf\tmpa]}
+\def\frak#1{{\fam\frakfam#1}}
+
+You can add the Euler Script to the math fonts:
+
+\addcmd\mathfonts {\def\tmpa{bold}%
+ \ifx\mathversion\tmpa \def\tmpa{b}\else\def\tmpa{m}\fi
+ \newmathfam\scriptfam \loadmathfam\scriptfam [/eus\tmpa]}
+\def\script#1{{\fam\scriptfam#1}}
+
+You can add the Euler Upright italic to the math fonts:
+
+\addcmd\mathfonts {\def\tmpa{bold}%
+ \ifx\mathversion\tmpa \def\tmpa{b}\else\def\tmpa{m}\fi
+ \newmathfam\upitfam \loadmathfam\upitfam [/eur\tmpa]}
+\def\upright#1{{\fam\upitfam#1}}
+
+You can replace standard CM operators \sum, \int, etc. by the
+operators from Euler extension font by the following commands:
+
+\addcmd\mathfonts{\newmathfam\euexfam \loadmathfam\euexfam [/euex]}
+\addcmd\mathchars{%
+ \mathchardef \ointop "1\hex\euexfam 48
+ \mathchardef \sum "1\hex\euexfam 50
+ \mathchardef \prod "1\hex\euexfam 51
+ \mathchardef \intop "1\hex\euexfam 52
+ \mathchardef \uprod "1\hex\euexfam 60
+ \edef \lbrace {\delimiter "4266\hex\euexfam 08 }%
+ \edef \rbrace {\delimiter "5267\hex\euexfam 09 }%
+ \let\{=\lbrace
+ \let\}=\rbrace
+ \mathchardef \letfharpoonup "3\hex\euexfam 18
+ \mathchardef \leftharpoondown "3\hex\euexfam 19
+ \mathchardef \rightharpoonup "3\hex\euexfam 1A
+ \mathchardef \rightharpoondown "3\hex\euexfam 1B
+ \mathchardef \leftarrow "3\hex\euexfam 20
+ \mathchardef \rightarrow "3\hex\euexfam 21
+ \mathchardef \leftrightarrow "3\hex\euexfam 24
+ \mathchardef \nearrow "3\hex\euexfam 25
+ \mathchardef \searrow "3\hex\euexfam 26
+ \mathchardef \Leftarrow "3\hex\euexfam 28
+ \mathchardef \Rightarrow "3\hex\euexfam 29
+ \mathchardef \Leftrightarrow "3\hex\euexfam 2C
+ \mathchardef \nwarrow "3\hex\euexfam 2D
+ \mathchardef \swarrow "3\hex\euexfam 2E
+ \mathchardef \infty "0\hex\euexfam 31
+ \edef \uparrow {\delimiter "3\hex\euexfam 22378 }%
+ \edef \downarrow {\delimiter "3\hex\euexfam 23379 }%
+ \edef \Uparrow {\delimiter "3\hex\euexfam 2A37E }%
+ \edef \Downarrow {\delimiter "3\hex\euexfam 2B37F }%
+ \edef \updownarrow {\delimiter "3\hex\euexfam 6C33F }%
+ \edef \Updownarrow {\delimiter "3\hex\euexfam 6D377 }%
+}
+
+
+
+
+
+
+
+