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
|
%%
%% 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-2008 Y. Henel, le TeXnicien de surface
%% <le.texnicien.de.surface@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.
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
\def\fileversion{v2}
\def\filedate{2008/08/13}
\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*{\PackageError{paresse}
{The option \CurrentOption\space is not known!\MessageBreak
The default options are:\MessageBreak
varepsilon, theta, pi, rho, sigma, and varphi.}%
{Choose between `wild' (for an active Paresse in all the document)
\MessageBreak and `tame' (so that § prints the paragraph symbol).
\MessageBreak See the documentation for other options.}}
\ExecuteOptions{wild,varepsilon,theta,pi,rho,sigma,varphi}
\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}{}
\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
\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
\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'.
|
