diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/cje/cjeupmath.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/cje/cjeupmath.sty | 125 |
1 files changed, 125 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/cje/cjeupmath.sty b/Master/texmf-dist/tex/latex/cje/cjeupmath.sty new file mode 100644 index 00000000000..3a66c622529 --- /dev/null +++ b/Master/texmf-dist/tex/latex/cje/cjeupmath.sty @@ -0,0 +1,125 @@ +%% +%% This is file `cjeupmath.sty', written for the CEA by Ali Woollatt +%% 2017/047/17 v1.01 +%% +%% This package provides 'upright' math (lower-case Greek, A-Z, a-z, +%% punctuation, < >, \ell, \partial) from the AMS Euler fonts EURM/B. +%% +%% Requires the amsbsy.sty and amsgen.sty packages. +%% +%% +%% COPYRIGHT (c) 2017 Canadian Economics Association +%% +%% LICENSE +%% ======= +%% +%% This work can be distributed and/or modified under the conditions of the LaTeX Project Public License, +%% either version 1.3 of this license or any later version. The latest version of this license is available at +%% latex-project.org/lppl.txt. Version 1.3, or later, is part of all distributions of LaTeX version 2005/12/01 or later. + + +\ProvidesPackage{cjeupmath}[2017/07/17 v1.01 CJE LaTeX2e package] + +\RequirePackage{amsbsy}[1995/01/20] % also includes amsgen.sty + +% Macro for changing \mathversion's +\providecommand{\mathch}[2]{% Derived from AMSBSY.STY + \begingroup + \let\@nomath\@gobble \mathversion{#1}% + \math@atom{#2}{% + \mathchoice% + {\hbox{$\m@th\displaystyle#2$}}% + {\hbox{$\m@th\textstyle#2$}}% + {\hbox{$\m@th\scriptstyle#2$}}% + {\hbox{$\m@th\scriptscriptstyle#2$}}}% + \endgroup} + +% +% The following is from Ueur.fd: changed encoding from U to OML. +% This allows to use eurm/b as (more or less) a math italic font. +% +\DeclareFontFamily{OML}{eur}{\skewchar\font'177} +\DeclareFontShape{OML}{eur}{m}{n}{<-7>eurm5<-10>eurm7<10->eurm10}{} +\DeclareFontShape{OML}{eur}{b}{n}{<-7>eurb5<-10>eurb7<10->eurb10}{} + +\DeclareMathVersion{upright} +\DeclareMathVersion{boldupright} + +\SetSymbolFont{letters}{upright} {OML}{eur}{m}{n} +\SetSymbolFont{letters}{boldupright}{OML}{eur}{b}{n} + +\DeclareRobustCommand{\mathup}[1]{\mathch{upright}{#1}} +\DeclareRobustCommand{\mathbup}[1]{\mathch{boldupright}{#1}} + +% lower-case Greek +\newcommand\ualpha{\mathup{\alpha}} +\newcommand\ubeta{\mathup{\beta}} +\newcommand\ugamma{\mathup{\gamma}} +\newcommand\udelta{\mathup{\delta}} +\newcommand\uepsilon{\mathup{\epsilon}} +\newcommand\uzeta{\mathup{\zeta}} +\newcommand\ueta{\mathup{\eta}} +\newcommand\utheta{\mathup{\theta}} +\newcommand\uiota{\mathup{\iota}} +\newcommand\ukappa{\mathup{\kappa}} +\newcommand\ulambda{\mathup{\lambda}} +\newcommand\umu{\mathup{\mu}} +\newcommand\unu{\mathup{\nu}} +\newcommand\uxi{\mathup{\xi}} +\newcommand\upi{\mathup{\pi}} +\newcommand\urho{\mathup{\rho}} +\newcommand\usigma{\mathup{\sigma}} +\newcommand\utau{\mathup{\tau}} +\newcommand\uupsilon{\mathup{\upsilon}} +\newcommand\uphi{\mathup{\phi}} +\newcommand\uchi{\mathup{\chi}} +\newcommand\upsi{\mathup{\psi}} +\newcommand\uomega{\mathup{\omega}} +\newcommand\uvarepsilon{\mathup{\varepsilon}} +\newcommand\uvartheta{\mathup{\vartheta}} +\newcommand\uvarpi{\mathup{\varpi}} + +\let\uvarrho\varrho % don't exist in eurm. +\let\uvarsigma\varsigma + +\newcommand\uvarphi{\mathup{\varphi}} + +\newcommand\ubalpha{\mathbup{\alpha}} +\newcommand\ubbeta{\mathbup{\beta}} +\newcommand\ubgamma{\mathbup{\gamma}} +\newcommand\ubdelta{\mathbup{\delta}} +\newcommand\ubepsilon{\mathbup{\epsilon}} +\newcommand\ubzeta{\mathbup{\zeta}} +\newcommand\uboldeta{\mathbup{\eta}} +\newcommand\ubtheta{\mathbup{\theta}} +\newcommand\ubiota{\mathbup{\iota}} +\newcommand\ubkappa{\mathbup{\kappa}} +\newcommand\ublambda{\mathbup{\lambda}} +\newcommand\ubmu{\mathbup{\mu}} +\newcommand\ubnu{\mathbup{\nu}} +\newcommand\ubxi{\mathbup{\xi}} +\newcommand\ubpi{\mathbup{\pi}} +\newcommand\ubrho{\mathbup{\rho}} +\newcommand\ubsigma{\mathbup{\sigma}} +\newcommand\ubtau{\mathbup{\tau}} +\newcommand\ubupsilon{\mathbup{\upsilon}} +\newcommand\ubphi{\mathbup{\phi}} +\newcommand\ubchi{\mathbup{\chi}} +\newcommand\ubpsi{\mathbup{\psi}} +\newcommand\ubomega{\mathbup{\omega}} +\newcommand\ubvarepsilon{\mathbup{\varepsilon}} +\newcommand\ubvartheta{\mathbup{\vartheta}} +\newcommand\ubvarpi{\mathbup{\varpi}} + +\newcommand\ubvarrho{\boldsymbol{\varrho}} % don't exist in eurb. +\newcommand\ubvarsigma{\boldsymbol{\varsigma}} + +\newcommand\ubvarphi{\mathbup{\varphi}} + +% A few other upright symbols +\newcommand\upartial {\mathup{\partial}} +\newcommand\ubpartial{\mathbup{\partial}} + +\endinput + +% end of file `cjeupmath.sty' |