summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/paresse/paresse.sty
blob: 76f302def76ec4d11f03c7c8aa6334f30d9c1886 (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
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
%%
%% This is file `paresse.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% paresse.dtx  (with options: `package')
%% 
%% This is a generated file.
%% 
%% Copyright (C) 2003 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\fileversion{v1a}
\def\filedate{2005/03/01}
\def\fileinfo{fichier paresse.dtx par Le \TeX nicien de surface}
\ProvidesPackage{paresse}
   [\filedate\space\fileversion\space\fileinfo]
\newif\if@optiontame \newif\if@optiontau
\newif\if@optionvareps
\newif\if@optionvartheta
\newif\if@optionvarrho
\newif\if@optionvarsigma
\newif\if@optionvarphi
\newif\if@optionvarpi
\DeclareOption{tame}{\@optiontametrue}
\DeclareOption{wild}{\@optiontamefalse}
\DeclareOption{ttau}{\@optiontautrue}
\DeclareOption{ttheta}{\@optiontaufalse}
\DeclareOption{varepsilon}{\@optionvarepstrue}
\DeclareOption{epsilon}{\@optionvarepsfalse}
\DeclareOption{vartheta}{\@optionvarthetatrue}
\DeclareOption{theta}{\@optionvarthetafalse}
\DeclareOption{varrho}{\@optionvarrhotrue}
\DeclareOption{rho}{\@optionvarrhofalse}
\DeclareOption{varpi}{\@optionvarpitrue}
\DeclareOption{pi}{\@optionvarpifalse}
\DeclareOption{varsigma}{\@optionvarsigmatrue}
\DeclareOption{sigma}{\@optionvarsigmafalse}
\DeclareOption{varphi}{\@optionvarphitrue}
\DeclareOption{phi}{\@optionvarphifalse}
\DeclareOption{defaut}{\@optiontamefalse \@optionvarepstrue
  \@optionvarthetafalse \@optionvarrhofalse \@optionvarsigmafalse
  \@optionvarpifalse \@optionvarphitrue \@optiontaufalse}
\DeclareOption*{\PackageError{paresse}{%
    L'option \CurrentOption\space n'est pas connue !\MessageBreak
    Les options par défaut sont << wild >> et << theta >>.}%
  {Choisissez entre << wild >> (pour une Paresse active dans tout
    le document) \MessageBreak et << tame >> (pour que § imprime
    la marque de paragraphe).  \MessageBreak Choisissez entre <<
    theta >> (pour que §t imprime theta) \MessageBreak et << tau
    >> (pour que §t imprime tau).}}  \ExecuteOptions{defaut}
\ProcessOptions\relax
\count@=\catcode`\§
\let\GA@LaVieilleParesse= §
\def\§{\S}
\newcommand{\makeparesseletter}{\catcode `\§=11\relax}
\newcommand{\makeparesseother}{\catcode `\§=12\relax}
\newcommand{\GA@MakeParesseActive}{\catcode `\§=\active}
\def\GA@ActiveLaParessexii{\catcode `\§=\active}
\def\GA@ActiveLaParessexiii{\catcode `\§=\active
  \def§##1{\ensuremath{\csname \string§##1\endcsname}}}
\ifnum\count@=12
\let\GA@ActiveLaParesse \GA@ActiveLaParessexii
\else
\let\GA@ActiveLaParesse \GA@ActiveLaParessexiii
\fi
\newcommand{\ActiveLaParesse}{\GA@ActiveLaParesse}
\newenvironment{ParesseActive}{\GA@ActiveLaParesse}{}
\newcommand{\GA@ActiveL@P@resse}{\catcode `\§=\active%
  \def§##1{\ensuremath{\csname \string§##1\endcsname}}}
\if@optionvareps \def\@epsilon {\varepsilon}
   \else \def\@epsilon {\epsilon} \fi
\if@optionvartheta \def\@theta {\vartheta}
   \else \def\@theta {\theta} \fi
\if@optionvarpi \def\@pi {\varpi}
   \else \def\@pi {\pi} \fi
\if@optionvarrho \def\@rho {\varrho}
   \else \def\@rho {\rho} \fi
\if@optionvarsigma \def\@sigma {\varsigma}
   \else \def\@sigma {\sigma} \fi
\if@optionvarphi \def\@phi {\varphi}
   \else \def\@phi {\phi} \fi
\makeparesseletter
%%% minuscules
\def\§a {\alpha}               \def\§b {\beta}
\def\§g {\gamma}               \def\§d {\delta}
\def\§e {\@epsilon}            \def\§z {\zeta}
\def\§h {\eta}                 \def\§v {\@theta}
\def\§i {\iota}                \def\§k {\kappa}
\def\§l {\lambda}              \def\§m {\mu}
\def\§n {\nu}                  \def\§x {\xi}
\def\§p {\@pi}
\def\§r {\@rho}                \def\§s {\@sigma}
\def\§y {\tau}                 \def\§u {\upsilon}
\def\§f {\@phi}                \def\§c {\chi}
\def\§q {\psi}                 \def\§w {\omega}
\if@optiontau \def\§t {\tau}\else \def\§t {\@theta}\fi
%%% Majuscules
\def\§G {\Gamma}               \def\§D {\Delta}
\def\§V {\Theta}               \def\§T {\Theta}
\def\§L {\Lambda}              \def\§X {\Xi}
\def\§P {\Pi}                  \def\§S {\Sigma}
\def\§U {\Upsilon}             \def\§F {\Phi}
\def\§Q {\Psi}                 \def\§W {\Omega}
\catcode `\§=\active
\def§#1{\ensuremath{\csname \string§#1\endcsname}}
\if@optiontame
\catcode`\§=\count@
\ifnum\count@=13 \let §=\GA@LaVieilleParesse \fi
\fi
\endinput
%%
%% End of file `paresse.sty'.