summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/engrec/engrec.sty
blob: 1e751c7d1821d78ab853a1f3fff9516abaeee6da (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
%%
%% This is file `engrec.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% engrec.dtx  (with options: `package')
%% This is a generated file.
%% 
%% Copyright (C) 2004 Y. Henel, le TeXnicien de surface
%% <Yvon.Henel@wanadoo.fr>
%% 
%% This file may be distributed and/or modified under the conditions of
%% the LaTeX Project Public License, either version 1.2 of this license
%% or (at your option) any later version.  The latest version of this
%% license is in:
%% 
%%    http://www.latex-project.org/lppl.txt
%% 
%% and version 1.2 or later is part of all distributions of LaTeX version
%% 1999/12/01 or later.
%%%% Copyright (C) 2004 by Yvon Henel <Yvon.Henel@wanadoo.fr>
%%%% --------------------------------------------------------
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
\def\PackageName{engrec}
\def\fileversion{v1}
\def\filedate{2004/05/20}
\def\fileinfo{fichier engrec.sty par Le TeXnicien de surface}
\ProvidesPackage{engrec}
   [\filedate\space\fileversion\space\fileinfo]
\newif\if@varepsilon
\newif\if@vartheta
\newif\if@varpi
\newif\if@varrho
\newif\if@varsigma
\newif\if@varphi
\newif\if@upomicron  % utiliser \upomicron ou bien \omicron ?
\newif\if@upgreek    % toutes les minuscules grecques debout !
\DeclareOption{upright}{\@upomicrontrue}
\DeclareOption{sloped}{\@upomicronfalse}
\DeclareOption{upgreek}{\@upgreektrue}
\DeclareOption{slgreek}{\@upgreekfalse}
\DeclareOption{varepsilon}{\@varepsilontrue}
\DeclareOption{epsilon}{\@varepsilonfalse}
\DeclareOption{vartheta}{\@varthetatrue}
\DeclareOption{theta}{\@varthetafalse}
\DeclareOption{varpi}{\@varpitrue}
\DeclareOption{pi}{\@varpifalse}
\DeclareOption{varrho}{\@varrhotrue}
\DeclareOption{rho}{\@varrhofalse}
\DeclareOption{varsigma}{\@varsigmatrue}
\DeclareOption{sigma}{\@varsigmafalse}
\DeclareOption{varphi}{\@varphitrue}
\DeclareOption{phi}{\@varphifalse}
\ExecuteOptions{varepsilon,theta,pi,rho,sigma,varphi,sloped,slgreek}
\ProcessOptions\relax
\RequirePackage{amsmath}
\if@upgreek \RequirePackage{upgreek}\fi
\providecommand{\Alpha}{\text{A}}
\providecommand{\Beta}{\text{B}}
\providecommand{\Epsilon}{\text{E}}
\providecommand{\Zeta}{\text{Z}}
\providecommand{\Eta}{\text{H}}
\providecommand{\Iota}{\text{I}}
\providecommand{\Kappa}{\text{K}}
\providecommand{\Mu}{\text{M}}
\providecommand{\Nu}{\text{N}}
\providecommand{\Omicron}{\text{O}}
\providecommand{\Rho}{\text{P}}
\providecommand{\Tau}{\text{T}}
\providecommand{\Chi}{\text{X}}
\providecommand{\omicron}{o}
\providecommand{\upomicron}{\textup{o}}
\def\engrec#1{\expandafter\@grec\csname c@#1\endcsname}
\if@upgreek
\def\@grec#1{%
  \ifcase#1\or $\upalpha$\or $\upbeta$\or $\upgamma$\or $\updelta$\or
  \if@varepsilon $\upvarepsilon$\else $\upepsilon$\fi \or $\upzeta$\or
  $\upeta$\or \if@vartheta $\upvartheta$\else $\uptheta$\fi \or
  $\upiota$\or $\upkappa$\or $\uplambda$\or $\upmu$\or $\upnu$\or
  $\upxi$\or $\upomicron$\or \if@varpi $\upvarpi$\else $\uppi$\fi \or
  \if@varrho $\upvarrho$\else $\uprho$\fi \or
  \if@varsigma $\upvarsigma$\else $\upsigma$\fi \or
  $\uptau$\or $\upupsilon$\or \if@varphi $\upvarphi$\else $\upphi$\fi
  \or $\upchi$\or $\uppsi$\or $\upomega$\else\@ctrerr\fi}
\else
\def\@grec#1{%
  \ifcase#1\or $\alpha$\or $\beta$\or $\gamma$\or $\delta$\or
  \if@varepsilon $\varepsilon$\else $\epsilon$\fi \or $\zeta$\or
  $\eta$\or \if@vartheta $\vartheta$\else $\theta$\fi \or
  $\iota$\or $\kappa$\or $\lambda$\or $\mu$\or $\nu$\or $\xi$\or
  \if@upomicron $\upomicron$\else $\omicron$\fi\or
  \if@varpi $\varpi$\else $\pi$\fi \or
  \if@varrho $\varrho$\else $\rho$\fi \or
  \if@varsigma $\varsigma$\else $\sigma$\fi \or
  $\tau$\or $\upsilon$\or \if@varphi $\varphi$\else $\phi$\fi \or
  $\chi$\or $\psi$\or $\omega$\else\@ctrerr\fi}
\fi
\def\EnGrec#1{\expandafter\@Grec\csname c@#1\endcsname}
\def\@Grec#1{%
  \ifcase#1\or $\Alpha$\or $\Beta$\or $\Gamma$\or $\Delta$\or
  $\Epsilon$\or $\Zeta$\or $\Eta$\or $\Theta$\or $\Iota$\or
  $\Kappa$\or $\Lambda$\or $\Mu$\or $\Nu$\or $\Xi$\or
  $\Omicron$\or $\Pi$\or $\Rho$\or $\Sigma$\or $\Tau$\or $\Upsilon$\or
  $\Phi$\or $\Chi$\or $\Psi$\or $\Omega$\else\@ctrerr\fi}
\endinput
%%
%% End of file `engrec.sty'.