new package mafr (19sep06)

git-svn-id: svn://tug.org/texlive/trunk@2165 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 163 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/mafr/cours.cls b/Master/texmf-dist/tex/latex/mafr/cours.cls
new file mode 100644
index 00000000000..7c62f0b634b
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/mafr/cours.cls
@@ -0,0 +1,9 @@
+% Classe `cours'.
+% Copyright (c) Christian Obrecht 2005.
+
+\ProvidesClass{fiche}
+
+\LoadClass[a4paper]{article}
+\RequirePackage{mafr}
+
+\newcommand{\chapitre}[2]{\centerline{\bf\LARGE Chapitre #1 : #2}\bigskip}
diff --git a/Master/texmf-dist/tex/latex/mafr/fiche.cls b/Master/texmf-dist/tex/latex/mafr/fiche.cls
new file mode 100644
index 00000000000..0872b45f4de
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/mafr/fiche.cls
@@ -0,0 +1,45 @@
+% Classe `fiche' -- Devoir et fiches d'exercices
+% Copyright (c) Christian Obrecht 2005.
+
+\ProvidesClass{fiche}
+
+\LoadClass[a4paper]{article}
+\RequirePackage{mafr}
+
+\nofiles
+\pagestyle{empty}
+
+% En-tête
+
+\newcommand{\entete}[3]
+{\noindent{\bf#1\hfill#2}\medskip\\\centerline{\bf\large#3}\medskip}
+
+% Exercices
+
+\parskip=4pt
+\parindent=0pt
+
+\newcount\squnumber
+\def\sque{\global\advance\squnumber by 1\hangindent=3em%
+\hbox to 1.5em{\bf\char\squnumber .\hfil}}
+\def\squ{\par\noindent\kern1.5em\sque}
+
+\newcount\quenumber
+\def\que{\par\squnumber="60\global\advance\quenumber by 1\hangindent=1.5em%
+\noindent\hbox to 1.5em{\bf\the\quenumber .\hfil}}
+\def\qsq{\que\sque}
+
+\newcount\exenumber
+\def\exe{\quenumber=0\advance\exenumber by 1%
+\bigskip\par{\it Exercice \the\exenumber}\par}
+
+% Environnement `juxtapose' pour une illustration en parallèle avec un texte
+
+\makeatletter
+\newlength\dr@ite
+\newenvironment{juxtapose}[1][.5\textwidth]
+{\def\droite{\hfill\egroup\vcenter\bgroup
+\dr@ite=\textwidth\advance\dr@ite by -#1\hsize=\dr@ite}
+\hbox\bgroup$\vcenter\bgroup\hsize=#1}
+{\egroup$\egroup}
+\makeatother
diff --git a/Master/texmf-dist/tex/latex/mafr/mafr.sty b/Master/texmf-dist/tex/latex/mafr/mafr.sty
new file mode 100644
index 00000000000..f89d5a1e4fd
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/mafr/mafr.sty
@@ -0,0 +1,109 @@
+% Package `mafr' (mathématiques françaises).
+% Adaptation aux règles de typographie mathématique française.
+% Copyright (c) Christian Obrecht 2005.
+
+\ProvidesPackage{mafr}[2005/10/31 v1.0 Mathématiques françaises]
+
+% Format élargi, fontes accentuées et module `babel'.
+
+\RequirePackage{a4wide}
+\RequirePackage[T1]{fontenc}
+\RequirePackage[francais]{babel}
+
+% Les majuscules en romain droit.
+
+\DeclareSymbolFont{Roman}{U}{cmr}{m}{n}
+\SetSymbolFont{Roman}{bold}{U}{cmr}{b}{n}
+\DeclareMathSymbol{A}\mathalpha{Roman}{`A}
+\DeclareMathSymbol{B}\mathalpha{Roman}{`B}
+\DeclareMathSymbol{C}\mathalpha{Roman}{`C}
+\DeclareMathSymbol{D}\mathalpha{Roman}{`D}
+\DeclareMathSymbol{E}\mathalpha{Roman}{`E}
+\DeclareMathSymbol{F}\mathalpha{Roman}{`F}
+\DeclareMathSymbol{G}\mathalpha{Roman}{`G}
+\DeclareMathSymbol{H}\mathalpha{Roman}{`H}
+\DeclareMathSymbol{I}\mathalpha{Roman}{`I}
+\DeclareMathSymbol{J}\mathalpha{Roman}{`J}
+\DeclareMathSymbol{K}\mathalpha{Roman}{`K}
+\DeclareMathSymbol{L}\mathalpha{Roman}{`L}
+\DeclareMathSymbol{M}\mathalpha{Roman}{`M}
+\DeclareMathSymbol{N}\mathalpha{Roman}{`N}
+\DeclareMathSymbol{O}\mathalpha{Roman}{`O}
+\DeclareMathSymbol{P}\mathalpha{Roman}{`P}
+\DeclareMathSymbol{Q}\mathalpha{Roman}{`Q}
+\DeclareMathSymbol{R}\mathalpha{Roman}{`R}
+\DeclareMathSymbol{S}\mathalpha{Roman}{`S}
+\DeclareMathSymbol{T}\mathalpha{Roman}{`T}
+\DeclareMathSymbol{U}\mathalpha{Roman}{`U}
+\DeclareMathSymbol{V}\mathalpha{Roman}{`V}
+\DeclareMathSymbol{W}\mathalpha{Roman}{`W}
+\DeclareMathSymbol{X}\mathalpha{Roman}{`X}
+\DeclareMathSymbol{Y}\mathalpha{Roman}{`Y}
+\DeclareMathSymbol{Z}\mathalpha{Roman}{`Z}
+
+% Majuscules d'anglaise.
+
+\DeclareSymbolFont{rsfscript}{U}{rsfs}{m}{n}
+\DeclareSymbolFontAlphabet{\mathrsfs}{rsfscript}
+\newcommand\scr{\mathrsfs}
+
+% Pour des symboles « inférieur ou égal », « supérieur ou égal », « ensemble
+% vide » et « parallèles » conformes aux usages français.
+
+\DeclareSymbolFont{AmsA}{U}{msa}{m}{n}
+\SetSymbolFont{AmsA}{bold}{U}{msa}{b}{n}
+\DeclareMathSymbol\leq\mathrel{AmsA}{"36}
+\DeclareMathSymbol\geq\mathrel{AmsA}{"3E}
+\DeclareSymbolFont{AmsB}{U}{msb}{m}{n}
+\SetSymbolFont{AmsB}{bold}{U}{msb}{b}{n}
+\DeclareMathSymbol\emptyset\mathord{AmsB}{"3F}
+\def\parallel{\mathrel{/\!/}}
+
+% Une macro pour les vecteurs qui donne de meilleurs résultats que
+% \overrightarrow.
+
+\def\vect#1{%
+\vbox{\lineskip=-.04em\baselineskip=0pt
+\halign{##\cr
+\leaders\hbox{$\scriptstyle{-}$\kern-.4em}\hfil$\scriptstyle{\rightarrow}$\cr
+$#1$\cr}}}
+
+% Même chose pour les angles et \widehat.
+
+\def\angl#1{%
+\setbox100\hbox{$#1$}
+\ifdim\wd100>1.8em\mathaccent"075B{#1}\else\mathaccent"0362{#1}\fi}
+
+% Une macro pour obtenir de grandes fractions dans les formules en ligne.
+
+\def\frc#1#2{\displaystyle{#1\over#2}}
+
+% Des macros pour les notations usuelles.
+
+\def\M@#1{\ifmmode #1\else $#1$\fi}
+
+\def\A{\M@{\cal A}}
+\def\B{\M@{\scr B}}
+\def\C{\M@{\scr C}}
+\def\D{\M@{\scr D}}
+\def\E{\M@{\scr E}}
+\def\F{\M@{\scr F}}
+\def\I{\M@{\cal I}}
+\def\J{\M@{\cal J}}
+\def\K{\M@{\bf C}}
+\def\N{\M@{\bf N}}
+\def\P{\M@{\scr P}}
+\def\Q{\M@{\bf Q}}
+\def\R{\M@{\bf R}}
+\def\S{\M@{\cal S}}
+\def\Z{\M@{\bf Z}}
+
+% Caractère € (Euro) et guillemets français.
+
+\font\teneuro=feymr10
+\catcode`\€=\active \def €{{\teneuro {\char "65}}}
+
+\catcode`\«=\active \def «{<<\,}
+\catcode`\»=\active \def »{\,>>}
+
+\endinput