%                                                          >> ensmath.cls
%
% Formats LaTeX pour L'Enseignement Math�matique
%
% **************************************************************************
% *  Version du 15 septembre 2008    Copyright L'Enseignement Math�matique   *
% **************************************************************************
%
%
\NeedsTeXFormat{LaTeX2e}[1995/12/01]
\ProvidesClass{ensmath}[2002/01/25 v2.1]

\DeclareOption{noamsfonts}{\let\mathfrak\relax}   %% fontes postscript
\DeclareOption{psamsfonts}{%                      %% fontes postscript
  \PassOptionsToPackage{psamsfonts}{amsfonts}%    %% fontes postscript
  \PassOptionsToPackage{cmex10}{amsmath}}%        %% fontes postscript

\newif\ifEM@print
\newif\ifEM@times
\newif\ifEM@plainequ
\newif\ifEM@plainthm
\newif\ifEM@paren
\newif\ifEM@mono
\newcount\EM@language
\EM@language=1
\EM@timestrue
\EM@plainequfalse
\EM@plainthmfalse
\EM@parentrue
\EM@monofalse
%%\DeclareOption{printer}{\EM@printtrue\ExecuteOptions{psamsfonts}}
\DeclareOption{printer}{\EM@printtrue}
\DeclareOption{cmfonts}{\EM@timesfalse}
\DeclareOption{onenumber}{\EM@plainequtrue}
\DeclareOption{plainnumbering}{\EM@plainthmtrue}
\DeclareOption{noparens}{\EM@parenfalse}
\DeclareOption{monograph}{\EM@monotrue}
\DeclareOption{anglais}{\EM@language=1}
\DeclareOption{english}{\EM@language=1}
\DeclareOption{francais}{\EM@language=2}
\DeclareOption{french}{\EM@language=2}
\DeclareOption{allemand}{\EM@language=3}
\DeclareOption{deutsch}{\EM@language=3}
\DeclareOption{italien}{\EM@language=4}
\DeclareOption{italiano}{\EM@language=4}
\def\anglais{\EM@language=1 \EMdeflanguage}
\def\english{\EM@language=1 \EMdeflanguage}
\def\francais{\EM@language=2 \EMdeflanguage}
\def\french{\EM@language=2 \EMdeflanguage}
\def\allemand{\EM@language=3 \EMdeflanguage}
\def\deutsch{\EM@language=3 \EMdeflanguage}
\def\italien{\EM@language=4 \EMdeflanguage}
\def\italiano{\EM@language=4 \EMdeflanguage}

\EM@printfalse
\setlength{\paperheight}{297mm}
\setlength{\paperwidth}{210mm}
\PassOptionsToPackage{leqno}{amsmath}\relax       %% tags � gauche
\ProcessOptions
%
\RequirePackage{amsmath}\relax    
\RequirePackage{amssymb}\relax           
\RequirePackage{theorem}\relax           
\RequirePackage{array}\relax             
\RequirePackage{amscd}\relax             
%
\topskip=9.0mm \advance \topskip by -14pt
	\setlength{\headsep}{14pt}     
	\setlength{\topmargin}{2.1cm}
	\setlength{\textwidth}{11.3cm}
	\setlength{\textheight}{17.6cm}
\footskip=24pt
	\setlength{\headheight}{9mm}     
	\oddsidemargin=2.3cm             %% (\hoffset=0)
	\evensidemargin=2.3cm            %% (\hoffset=0)
\voffset=-14pt                           
\setlength{\lineskip}{1\p@}
\setlength{\normallineskip}{1\p@}
\renewcommand\baselinestretch{}
\@lowpenalty   51  
\@medpenalty  151  
\@highpenalty 301  
\@twosidetrue
\setcounter{topnumber}{2}
\renewcommand\topfraction{.7}
\setcounter{bottomnumber}{1}
\renewcommand\bottomfraction{.3}
\setcounter{totalnumber}{3}
\renewcommand\textfraction{.2}
\renewcommand\floatpagefraction{.5}
\setcounter{dbltopnumber}{2}
\renewcommand\dbltopfraction{.7}
\renewcommand\dblfloatpagefraction{.5}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% En-tetes et pieds de page
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\let\EMauteurvide=Y \let\EMtitrevide=Y  
\def\@andheader{\def\and{{\expandafter\uppercase\expandafter{\andname}\ }}}
\def\ps@myheadings{%
    \def\@oddfoot{\EM@oddf}\def\@evenfoot{\EM@evenf}%
    \def\@evenhead{\@EMmarkpage{\EMeven}\@andheader
		   \rlap{\normalsize\thepage}\hfil
		   {\trespetit\@headauthor}\hfil}%
    \def\@oddhead{\@EMmarkpage{\EModd}\hfil{\trespetit\@headtitle}\hfil
		  \llap{\normalsize\thepage}}%
    \let\@mkboth\@gobbletwo
    \let\sectionmark\@gobble
    \let\subsectionmark\@gobble
    }
    
\ifEM@print
\ifEM@mono
  \def\EM@head{\vtop{\centerline{\small\it 
   Monographie de L'Enseignement Math\'ematique \number\EMtome~(\number\EMannee),
   p.~\EMpagef--\EMpagel}\vskip1.0mm\hrule height.2pt\normalsize}}%
\else
  \def\EM@head{\vtop{\centerline{\small\it 
   L'Enseignement Math\'ematique (2)~\number\EMtome~(\number\EMannee),
   \EMpagef--\EMpagel}\vskip1.0mm\hrule height.2pt\normalsize}}%
\fi
\else
  \def\EM@head{\vtop{\centerline{\hfill}\normalsize}}%
\fi
\def\ps@firstheader{%
    \def\@oddfoot{\EM@oddf}\def\@evenfoot{\EM@evenf}%
    \def\@oddhead{\@EMmarkpage{\EModd}\EM@head}%
    \def\@evenhead{\@EMmarkpage{\EMeven}\EM@head}%  
    \let\@mkboth\@gobbletwo
    \let\sectionmark\@gobble
    \let\subsectionmark\@gobble
    }
\def\EMmois{\ifcase\month\or janvier\or f\'evrier\or mars\or avril\or
    mai\or juin\or juillet\or ao\^ut\or septembre\or 
    octobre\or novembre\or d\'ecembre\fi}
\newcount\EMheure  \newcount\EMmin  \newcount\EMxxx
%
\def\EMjour{\hbox{\scriptsize\it
Achev\'e de composer le\ \number\day~\EMmois~\number\year\ \`a%
\EMheure=\time  \EMmin=\EMheure  \divide\EMheure by 60
\EMxxx=\EMheure  \multiply\EMxxx by 60  \advance\EMmin by -\EMxxx
\ \ifnum\EMheure<10 0\fi\the\EMheure\,\string:\,\ifnum\EMmin<10 0\fi%
\the\EMmin}}
\def\EMsign{\hbox{\scriptsize L'Enseignement Math\'ematique, 
\ifEM@mono monographie N\ooben\else 
t.\fi~\number\EMtome~(\number\EMannee)}}
\ifEM@print
\def\EM@oddf{\smash{\leavevmode\raise-\EMplusbas\EMjour}\hfil}  
\def\EM@evenf{\smash{\leavevmode\raise-\EMplusbas\EMsign}\hfil} 
\else
\def\EM@oddf{}
\def\EM@evenf{}
\fi
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% Fin en-tetes
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newdimen\EMpagewidth   \EMpagewidth=16.0cm
\newdimen\EMpageheight  \EMpageheight=24.0cm
\newdimen\EMeven \EMeven=25mm    
\newdimen\EModd  \EModd =22mm    
\newdimen\EMhau  \EMhau=22mm     
\newdimen\EMBas  \EMBas=\EMpageheight \advance\EMBas by -\EMhau  
\newdimen\EMplusbas \EMplusbas=34.662mm  

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Marques de coins de page:
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newdimen\EMfine  \EMfine=.4pt
\newdimen\EMlarg  \EMlarg=5.0mm
\newdimen\EMespv  \EMespv=2.5mm
\newdimen\EMesph  \EMesph=\EMespv  \advance\EMesph by -\EMfine
\newdimen\EMhigh  \EMhigh=\EMlarg  \advance\EMhigh by \EMespv
%
\def\EMtrvh{\vrule height \EMhigh depth -\EMespv width \EMfine}
\def\EMtrvb{\vrule height -\EMespv depth \EMhigh width \EMfine}
\def\EMtrhh{\vrule height \EMfine depth 0pt width \EMlarg}
\def\EMtrhb{\vrule height 0pt depth \EMfine width \EMlarg}
%
\def\EMcsphau#1{\llap{\smash{\leavevmode
\raise\EMhau\hbox{\EMtrhh\kern\EMesph\EMtrvh}\hskip#1}}}
\def\EMcspbas#1{\llap{\smash{\leavevmode
\raise-\EMBas\hbox{\EMtrhb\kern\EMesph\EMtrvb}\hskip#1}}}
%
\def\EMspchau#1{\rlap{\smash{\hskip#1\leavevmode
\raise\EMhau\hbox{\EMtrvh\kern\EMesph\EMtrhh}}}}
\def\EMspcbas#1{\rlap{\smash{\hskip#1\leavevmode
\raise-\EMBas\hbox{\EMtrvb\kern\EMesph\EMtrhb}}}}
\def\@EMmarkpage#1{\ifEM@print%
	\EMcsphau{#1}\EMcspbas{#1}%
	\@tempdimb-#1\advance\@tempdimb by \EMpagewidth
	\EMspcbas{\@tempdimb}\EMspchau{\@tempdimb}\fi}
%
% D�finitions utiles:
%
\let\maj=\uppercase
\let\ced=\c
\let\emptyset=\varnothing
\def\ms{\mathsurround=0pt}
\def\nm{\nobreak}
%
\def\smallitem#1{\par\vskip 2pt\noindent\hbox to .6cm{\ignorespaces  
#1\hfill}\hangindent=.6cm\hangafter=1 \let\par=\endgraf\ignorespaces }
\def\meditem#1{\par\vskip 2pt\noindent\hbox to .7cm{\hfill
\ignorespaces #1\enspace}%
\hangindent=.7cm\hangafter=1 \let\par=\endgraf\ignorespaces }
\def\bigitem#1{\par\vskip 2pt\noindent\hbox to .8cm{\hfill
\ignorespaces #1\enspace}%
\hangindent=.8cm\hangafter=1 \let\par=\endgraf\ignorespaces }
%
\def\CASE{\relax\ifhmode\ifdim\lastskip>\z@\unskip\fi\fi}
\newif\ifperiod \periodtrue \def\noperiod{\global\periodfalse}  
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Carre en fin de preuve
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newbox\sqwh    %% bo�te red�finie avec les fontes dans la taille correcte
%
\def\makesqwh{\def\EMtraiv{\vrule height 1.5ex depth .03ex width .03em}%
\def\EMtraih{\hrule height .03em depth 0pt}%
\setbox\sqwh=\vbox{\EMtraih\hbox{\EMtraiv\kern 1.53ex\EMtraiv}\EMtraih}%
\dimen1=1.5ex  \advance\dimen1 by .03em  \ht\sqwh=\dimen1   
\dimen2=.03ex  \advance\dimen2 by .03em  \dp\sqwh=\dimen2 \relax}
%
\makesqwh
%
% �cart� de 6mm:
\def\qed{\ifmmode\hskip 6mm plus 1mm minus 3mm\copy\sqwh\else\CASE
\hglue 6mm plus 1mm minus 3mm{\copy\sqwh\finalhyphendemerits=0\par}\fi}
% en bout de ligne:
\def\cqfd{\ifmmode\hskip 6mm plus 1mm minus 3mm\copy\sqwh\else\CASE
\nobreak\hfil\penalty50\hskip1em\null\nobreak\hfil
{\copy\sqwh\parfillskip=0pt\finalhyphendemerits=0\let\par=\endgraf\par}\fi}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Fontes texte et tailles
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def\desserre{\spaceskip=.4em plus .2em minus .15em
%\xspaceskip=.7em plus .1em minus .15em
\mathsurround=.1em \relax}
%
\def\desserremoins{\spaceskip=.34em plus .17em minus .13em
%\xspaceskip=.6em plus .08em minus .13em
\mathsurround=.085em \relax}
%
\def\desserreplus{\spaceskip=.46em plus .23em minus .17em
%\xspaceskip=.8em plus .12em minus .17em
\mathsurround=.115em \relax}
%
\def\normalspacings{%
	\normalbaselineskip=4.5mm plus .02mm minus .01mm
	\baselineskip=4.5mm plus .02mm minus .01mm
	\EMskip=\normalbaselineskip
	\advance\EMskip by 0mm plus .5mm minus .1mm
	\desserre
	\def\big##1{{\hbox{$\left##1\vbox to8.5\p@{}\right.\n@space$}}}%
	\def\Big##1{{\hbox{$\left##1\vbox to11.5\p@{}\right.\n@space$}}}%
	\def\bigg##1{{\hbox{$\left##1\vbox to14.5\p@{}\right.\n@space$}}}%
	\def\Bigg##1{{\hbox{$\left##1\vbox to17.5\p@{}\right.\n@space$}}}%
	\makesqwh}  
\def\smallspacings{%
	\normalbaselineskip=3.5mm plus .015mm
	\baselineskip=3.5mm plus .015mm
	\EMskip=\normalbaselineskip
	\advance\EMskip by 0mm plus .4mm
	\desserre
	\def\big##1{{\hbox{$\left##1\vbox to7.65\p@{}\right.\n@space$}}}%
	\def\Big##1{{\hbox{$\left##1\vbox to10.35\p@{}\right.\n@space$}}}%
	\def\bigg##1{{\hbox{$\left##1\vbox to13.05\p@{}\right.\n@space$}}}%
	\def\Bigg##1{{\hbox{$\left##1\vbox to15.75\p@{}\right.\n@space$}}}%
	\makesqwh}  
\def\footnotespacings{%
	\normalbaselineskip=3.0mm plus .01mm
	\baselineskip=3.0mm plus .01mm
	\EMskip=\normalbaselineskip
	\advance\EMskip by 0mm plus .3mm
	\desserre
	\def\big##1{{\hbox{$\left##1\vbox to6.8\p@{}\right.\n@space$}}}%
	\def\Big##1{{\hbox{$\left##1\vbox to9.2\p@{}\right.\n@space$}}}%
	\def\bigg##1{{\hbox{$\left##1\vbox to11.6\p@{}\right.\n@space$}}}%
	\def\Bigg##1{{\hbox{$\left##1\vbox to14.0\p@{}\right.\n@space$}}}%
	\makesqwh}  
\renewcommand\normalsize{%
   \fontsize{10}{4.5mm plus 0.02mm minus 0.01mm}\selectfont\normalspacings}
\let\normal=\normalsize
\newcommand\small{%
   \@setfontsize\small\@ixpt{3.5mm plus .015mm}\smallspacings}
\let\petit=\small             
\newcommand\footnotesize{%
   \@setfontsize\footnotesize\@viiipt{3.0mm plus .01mm}\footnotespacings}
\let\pluspetit=\footnotesize  
\newcommand\trespetit{\fontsize{7.6}{9}\selectfont\desserre}
\newcommand\scriptsize{\@setfontsize\scriptsize\@viipt\@viiipt\desserre}
\newcommand\tiny{\@setfontsize\tiny\@vipt\@viipt}
\newcommand\large{\@setfontsize\large\@xiipt{14}}
\newcommand\Large{\@setfontsize\Large\@xivpt{18}}
\newcommand\LARGE{\@setfontsize\LARGE\@xviipt{22}}
\newcommand\huge{\@setfontsize\huge\@xxpt{25}}
\newcommand\Huge{\@setfontsize\Huge\@xxvpt{30}}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Page de garde
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcount\EMannee \EMannee=0
\newcount\EMtome  \EMtome=0
\def\EnsMath pages #1-#2 {%
\ifEM@mono
\ifnum\EMtome=0 \ifnum\EMannee=0 \EMannee=\year\fi
\EMtome=\EMannee \advance\EMtome by -1963 
\else 
\ifnum\EMannee=0 \EMannee=\EMtome \advance\EMannee by 1963 \fi\fi
%
\else 
\ifnum\EMannee=0 \EMannee=\year
\ifnum\month<4 \advance\EMannee by -1 \fi\fi
\EMtome=\EMannee \advance\EMtome by -1954 
\fi
\c@page=#1
\def\EMpagef{#1}
\def\EMpagel{#2}
}
\def\EMpagef{??}
\def\EMpagel{??}
%
\renewcommand{\title}[2][]{%
	\def\next{#2}\ifx\next\empty\else\global\let\EMtitrevide=N\fi
	\def\next{#1}\ifx\next\empty\else
	\gdef\@headtitle{#1\CASE}\fi\gdef\@title{#2\CASE}}   
\renewcommand{\author}[2][]{\def\sn##1{\bgroup\sc\ignorespaces ##1\egroup}%
	\def\next{#2}\ifx\next\empty\else\global\let\EMauteurvide=N\fi
	\def\next{#1}\ifx\next\empty\else
	\gdef\@headauthor{\uppercase{#1\CASE}}\fi\gdef\@author{#2\CASE}} 
\newcommand\maketitle{\par
    \begingroup
    \newpage
    \global\@topnum\z@
    \@maketitle
%   \@thanks
  \endgroup
  \thispagestyle{firstheader}
  \@ifundefined{@headtitle}{%
	\@temptokena\expandafter{\@title}%
	\toks4{\def\\{\CASE\space\ignorespaces}\let\par=\\}%
	\edef\@tempa{\the\toks4{\the\@temptokena}}%
	\global\let\@headtitle=\@tempa}{}
  \@ifundefined{@headauthor}{%
	\@temptokena\expandafter{\@author}%
	\toks4{\def\\{\CASE\space\ignorespaces}%
	\let\sn=\relax\def\thanks##1{\relax}}%
	\edef\@tempb{\the\toks4{\uppercase{\the\@temptokena}}}%
	\global\let\@headauthor=\@tempb}{}
  \global\let\maketitle\relax
  \global\let\@maketitle\relax
  \global\let\@author\@empty
  \global\let\@date\@empty
  \global\let\@title\@empty
  \global\let\title\relax
  \global\let\author\relax
  \global\let\date\relax
  \global\let\and\relax
}
\def\runningheader#1{\gdef\@headtitle{#1}}
\let\shorttitle=\runningheader
\let\titrebref=\runningheader
\def\runningauthor#1{\gdef\@headauthor{#1}}
\let\shortauthor=\runningauthor
\let\auteurbref=\runningauthor
\let\@headauthor\relax
\let\@headtitle\relax

\def\@andaut{\def\and{{\rm\andname}\ }}
\def\@maketitle{%
  \newpage
  \null
  \vskip 2.5cm plus 1.2cm minus .5cm  
  \begin{center}%
    \let\next\@title
    \ifx Y\EMtitrevide\else    
    {\let\desserre=\desserreplus   
    \normalsize\setlength{\baselineskip}{5mm}\@title\par}% 
    \vskip 0.4cm\fi
    \ifx Y\EMauteurvide\else    
    \@andaut{\normalsize \byname\ \@author}\par\fi
  \end{center}%
 \par
  \vskip 1.0cm    
  }
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Sections
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
\setcounter{secnumdepth}{3}
\newcounter {part}
\newcounter {section}
\newcounter {subsection}[section]
\newcounter {subsubsection}[subsection]
\renewcommand\thepart         {\@Roman\c@part}
\renewcommand\thesection      {\@arabic\c@section}
\renewcommand\thesubsection   {\thesection.\@arabic\c@subsection}
\renewcommand\thesubsubsection{\thesubsection.\@arabic\c@subsubsection}
\newcommand\EMpntpart{.}
\newcommand\EMpntsection{.}
\newcommand\EMpntsubsection{}
\newcommand\EMpntsubsubsection{}

\def\@seccntformat#1{\csname the#1\endcsname\csname EMpnt#1\endcsname\EMquad}

\def\section{%
	\@startsection{section}{1}{\z@}%
	{10mm plus 6mm minus 3mm}{\baselineskip}%
	{\normalfont\normalsize\scshape\centering}%
	}

\def\refsection{%
	\@startsection{section}{1}{\z@}%
	{10mm plus 6mm minus 3mm}{\baselineskip}%
	{\normalfont\small\scshape\centering}%
	}

\def\subsection{%
	\@startsection{subsection}{2}{\z@}%
	{\EMskip}{0.35\baselineskip}%
	{\normalfont\normalsize\scshape}%
	}
\def\subsubsection{%
	\@startsection{subsubsection}{3}{\parindent}%
	{\EMskip}{-1em plus -.02em minus -.2em}%  
	{\normalfont\normalsize\scshape}%
	}
\long\def\parag#1{\subsubsection*{#1\ifperiod.\else\global\periodtrue\fi}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Standard LaTeX stuff
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
\setlength{\leftmargini}{5mm}
\leftmargin=\leftmargini
\setlength\leftmarginii  {7.5mm}
\setlength\leftmarginiii {10mm}
\setlength\leftmarginiv  {12mm}
\setlength\leftmarginv  {14mm}
\setlength\leftmarginvi {16mm}
\labelsep=5pt
\labelwidth=\leftmargini \advance\labelwidth by -\labelsep
\itemindent=0pt
\setlength{\topsep}{1pt}
\setlength{\itemsep}{1pt}
\@beginparpenalty -\@lowpenalty
\@endparpenalty   -\@lowpenalty
\@itempenalty     -\@lowpenalty
\renewcommand\theenumi{\normalfont\@arabic\c@enumi}
\renewcommand\theenumii{\@alph\c@enumii}
\renewcommand\theenumiii{\normalfont\@roman\c@enumiii}
\renewcommand\theenumiv{\normalfont\@Alph\c@enumiv}
\newcommand\labelenumi{\theenumi.}
\newcommand\labelenumii{\normalfont(\theenumii)}
\newcommand\labelenumiii{\theenumiii.}
\newcommand\labelenumiv{\theenumiv.}
\renewcommand\p@enumii{\theenumi}
\renewcommand\p@enumiii{\theenumi(\theenumii)}
\renewcommand\p@enumiv{\p@enumiii\theenumiii}
\newcommand\labelitemi{$\m@th\bullet$}
\newcommand\labelitemii{\normalfont\bfseries --}
\newcommand\labelitemiii{$\m@th\ast$}
\newcommand\labelitemiv{$\m@th\cdot$}
\newenvironment{description}
		 {\list{}{\leftmargin=7.5mm \labelwidth=\leftmargin
			\advance\labelwidth by -\labelsep 
			\let\makelabel\descriptionlabel}}
		 {\endlist}
\newcommand*\descriptionlabel[1]{\normalfont #1\kern2pt\hfill}
\newenvironment{acknowledge}{\subsubsection*{\acknowledgename.}}
	{\par}
\newdimen\titleindent
\titleindent=1cm

\newenvironment{verse}
		 {\let\\\@centercr
		\list{}{\itemsep      \z@
			\itemindent   -1.5em%
			\listparindent\itemindent
			\rightmargin  \leftmargin
			\advance\leftmargin 1.5em}%
		\item\relax}
		 {\endlist}
\newenvironment{quotation}
		 {\list{}{\small\listparindent=5mm
			\itemindent    \listparindent
			\rightmargin   \leftmargin
			\parsep        \z@ \@plus\p@}%
		 \medskip\item\relax}
		 {\endlist\medskip}
\newenvironment{quote}
		 {\list{}{\small\rightmargin\leftmargin}%
		 \medskip\item\relax}
		 {\endlist\medskip}
\newcommand\appendix{\par
  \setcounter{section}{0}%
  \setcounter{subsection}{0}%
  \renewcommand\thesection{\@Alph\c@section}}
\setlength{\arraycolsep}{5\p@}
\setlength{\tabcolsep}{6\p@}
\setlength{\arrayrulewidth}{.4\p@}
\setlength{\doublerulesep}{2\p@}
\setlength{\tabbingsep}{5\p@}
\skip\@mpfootins = \skip\footins
\setlength{\fboxsep}{3\p@}
\setlength{\fboxrule}{.4\p@}
\newcounter{figure}
\renewcommand\thefigure{\@arabic\c@figure}
\setlength{\floatsep}{6mm minus 2mm}
\setlength{\textfloatsep}{6mm minus 2mm}
\setlength{\intextsep}{6mm minus 2mm}
\def\fps@figure{tbp}
\def\ftype@figure{1}
\def\ext@figure{lof}
\def\fnum@figure{\figurename~\thefigure}
\newenvironment{figure}
	{\let\caption=\EM@caption
	\EMdesactivechars\@float{figure}}
	{\end@float}
\newenvironment{figure*}
	{\let\caption=\EM@caption
	\EMdesactivechars\@dblfloat{figure}}
	{\end@dblfloat}
%
\newcounter{table}   
\renewcommand\thetable{\@arabic\c@table}
\def\fps@table{tbp}
\def\ftype@table{2}
\def\ext@table{lot}
\def\fnum@table{\tablename~\thetable}
\newenvironment{table}
		 {\renewcommand{\arraystretch}{1.2}\@float{table}}
		 {\end@float}
\newenvironment{table*}
		 {\renewcommand{\arraystretch}{1.2}\@dblfloat{table}}
		 {\end@dblfloat} 
\DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
\DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
\DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
\DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
\DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit}
\DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl}
\DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc}
\let\smc=\sc
\def\bfsl{\bfseries\itshape}  
\DeclareRobustCommand*\cal{\@fontswitch\relax\mathcal}
\DeclareRobustCommand*\mit{\@fontswitch\relax\mathnormal}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Table of contents format
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand\@pnumwidth{1.55em}
\newcommand\@tocrmarg{2.55em}
\newcommand\@dotsep{4.5}
\setcounter{tocdepth}{2}
\newcommand\tableofcontents{%
    \section*{\contentsname
	\@mkboth{%
	   \MakeUppercase\contentsname}{\MakeUppercase\contentsname}}%
    \@starttoc{toc}%
    }
\let\Contentsline=\contentsline
\let\Numberline=\numberline
\def\contentsline#1{\def\numberline##1{\Numberline{##1\csname 
EMpnt#1\endcsname}}\Contentsline{#1}}
\newcommand{\l@section}[1]{\@dottedtocline{1}{0em}{1.5em}{\normalfont #1}}
\newcommand{\l@subsection}[1]{\@dottedtocline{2}{1.5em}{2em}{\normalfont #1}}
\newcommand{\l@subsubsection}[1]{\@dottedtocline{3}{3.5em}{2.5em}{\normalfont 
#1}}
\newcommand\listoffigures{%
    \section*{\listfigurename
	\@mkboth{\MakeUppercase\listfigurename}%
		{\MakeUppercase\listfigurename}}%
    \@starttoc{lof}%
    }
\newcommand{\l@figure}[1]{\@dottedtocline{1}{1.5em}{2.3em}{\sc #1}}
\newcommand\listoftables{%
    \section*{\listtablename
	\@mkboth{%
	  \MakeUppercase\listtablename}{\MakeUppercase\listtablename}}%
    \@starttoc{lot}%
    }
\let\l@table\l@figure
\newdimen\bibindent
\setlength\bibindent{1.5em}
%
% Table des mati�res � la mode AMSTeX:
%
\def\Item#1{\par\noindent\hbox to \parindent{\hfill
#1\enspace}\hangindent=\parindent\hangafter=1 \ignorespaces }
\def\Itemitem#1{\par\noindent\hbox to 2\parindent{\hfill
#1\enspace}\hangindent=2\parindent\hangafter=1 \ignorespaces }
\def\begmat{\bgroup\parindent=6mm\rightskip=12.95mm\let\par=\endgraf
\def\s##1{\nobreak\Item{##1}}%
\def\ss##1{\nobreak\Itemitem{##1}}}
%
\def\art{\par\noindent\hangindent=\parindent\hangafter=1 \ignorespaces }
%
\def\pp#1 {\CASE\leaders\hbox to 2mm{\hfil.}\hfill
\rlap{\hbox to 12.95mm{\hfill #1}}\par}
%
% Attention: \parindent doit �tre un multiple entier
% de l'espace entre les points!
%
\newcount\EMaaa  \newcount\EMbbb
\def\ssec#1#2{\removelastskip\goodbreak
\setbox0=\hbox{\smc\ignorespaces #1\CASE~}%
\dimen1=\wd0  \EMaaa=\dimen1  \dimen2=2mm  \EMbbb=\dimen2
\divide\EMaaa by \EMbbb  \advance\EMaaa by 1
\multiply\dimen2 by \EMaaa  \wd0=\dimen2
\medskip\noindent\hangindent=\dimen2\hangafter=1
\box0\ignorespaces #2}
%
\def\endmat{\par\egroup}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Figures
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newlength\abovecaptionskip
\newlength\belowcaptionskip
\setlength{\abovecaptionskip}{2.1mm}
\setlength{\belowcaptionskip}{3.2mm}
\long\def\@makecaption#1#2{%
  \vskip\abovecaptionskip
  \centering\small\scshape #1\CASE\par 
  \def\next{#2}\ifx\next\empty\else\nobreak\vskip.8mm
  \ignorespaces\normalfont #2\CASE\fi
  \vskip\belowcaptionskip}
%
\def\EM@PBS#1{\let\temp\\#1\let\\\temp}
\newlength{\tmplength}
\newbox\EMcaptionbox  
\newdimen\EMboxdim    
\newenvironment{figurelist}[1]{\let\caption=\EM@caption%
  \bgroup\EMdesactivechars%
  \tmplength\linewidth%
  \divide\tmplength by #1%
  \advance\tmplength by -2\tabcolsep
  \advance\tmplength by -1.5\arrayrulewidth
	\begin{center}\begin{tabular}%
	{*{#1}{@{}>{\EM@PBS\centering}%
	b{\the\tmplength}@{\quad}}}%
  }{\end{tabular}\end{center}\par
  \egroup}

\def\EM@caption{\refstepcounter\@captype \par\nobreak
	\bgroup\EMactivechars\@EMcaption}
\def\@EMcaption#1{%
	\setbox\EMcaptionbox\vbox{\@@EMcaption{#1}}%
		\EMboxdim\ht\EMcaptionbox%
		\advance\EMboxdim by -5pt%
		\vbox to 0pt{\box\EMcaptionbox\vss}%
	\rule[-\the\EMboxdim]{0pt}{\the\EMboxdim}
	\vskip-1.2mm
	\egroup}
\long\def\@@EMcaption#1{%
	\centering\pluspetit\scshape\figurename~\thefigure\normalfont\par
	\def\next{#1}\ifx\next\empty\else\nobreak\vskip 1.2mm
	\ignorespaces #1\CASE\fi}
%%\def\EMbox#1#2{\vbox{\hbox to 0pt{\kern #1\hbox to 0pt{\hss#2\hss}}}}
%
% Espace r�serv� pour une figure � la mode AMSTeX:
%
\newcommand\begfig[2][h]{\@float{figure}[#1]\kern #2}   %% donner la hauteur pr�cise du dessin
\def\endfig{\end@float}
%
\newdimen\largeurfig  \largeurfig=\hsize
\newskip\deplacefig   \deplacefig=0mm      %% d�placement horizontal
\newskip\montefig     \montefig=0mm        %% pour remonter le dessin
\newskip\EMpush
%
% Insertion d'une figure Postscript:
%
\def\figinsert#1{%
\EMpush=\hsize  \advance\EMpush by -\largeurfig
\divide\EMpush by 2  \advance\EMpush by \deplacefig
\par\nobreak\vskip-\montefig
\noindent\null\hskip\EMpush
\special{psfile=#1}%             %% PC - Sun
%\special{postscriptfile #1}%    %% TeXtures
\vskip\montefig
}
%
% L�gende:
%
\def\Figure#1#2{\par\nobreak\vskip 5.0mm
\vbox{\centering\pluspetit{\smc Figure}~\ignorespaces #1\CASE\par
\def\next{#2}\ifx\next\empty\else\nobreak\vskip 1.2mm 
\ignorespaces #2\CASE\fi}%
\vskip 1.2mm}
%
% Cas de deux figures c�te � c�te:
%
\newcommand\doublefig[4][h]{\bgroup\begfig[#1]{#2}\let\par=\endgraf
\hbox to \hsize{\vtop{\hsize=.45\hsize #3}\hfill\vtop{\hsize=.45\hsize #4}}
\endfig\egroup}
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Bibliographie
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def\EMdash{\leavevmode\hbox to 7.5mm{\vrule height .63ex depth -.59ex 
	width 5.4mm\hfill}}
%
\newenvironment{thebibliography}[1]
	{\refsection*{\refname}
	\list{\@biblabel{\@arabic\c@enumiv}}%
	   {\settowidth\labelwidth{\@biblabel{#1}}%
	    \leftmargin=\labelwidth
	    \advance\leftmargin by 12.5mm   
	    \labelsep=5mm
	    \setlength{\itemsep}{0pt}%
	    \setlength{\parsep}{1.5pt plus.75pt minus.25pt}%  %% modifi�
	    \setlength{\itemindent}{-7.5mm}%
	   \@openbib@code
	    \usecounter{enumiv}%
	    \let\p@enumiv\@empty
	    \renewcommand\theenumiv{\@arabic\c@enumiv}}%
	\bigpenalty
	\small
	\sfcode`\.\@m}
	{\def\@noitemerr
	 {\@latex@warning{Empty `thebibliography' environment}}%
	 \par\nobreak}
%
\newcommand\newblock{\hskip .11em\@plus.33em\@minus.07em}
\let\@openbib@code\@empty
\newenvironment{theindex}
		 {\columnseprule \z@
		\columnsep 35\p@
		\twocolumn[\section*{\indexname}]%
		\@mkboth{\MakeUppercase\indexname}%
			{\MakeUppercase\indexname}%
		\thispagestyle{plain}\parindent\z@
		\parskip\z@ \@plus .3\p@\relax
		\let\item\@idxitem}
		 {\onecolumn}
\newcommand\@idxitem{\par\hangindent 40\p@}
\newcommand\subitem{\@idxitem \hspace*{20\p@}}
\newcommand\subsubitem{\@idxitem \hspace*{30\p@}}
\newcommand\indexspace{\par \vskip 10\p@ \@plus5\p@ \@minus3\p@\relax}
%
% R�f�rences bibliographiques � la mode AMSTeX:
%
\newdimen\hangbiblio  \newcount\EMrefno  \EMrefno=1
%
\def\EMbegref#1#2{\removelastskip\goodbreak
\par\bgroup\EMrefno=1 \parindent=#2\petit\let\sl=\it
\vskip 10mm plus 6mm minus 3mm\goodbreak
\centerline{\maj{#1}}\nobreak\vskip\baselineskip\nobreak
\hangbiblio=\parindent \advance\hangbiblio by 7.5mm}
%
\def\EMrefa{\par\ifnum\EMrefno<3 \nobreak\else\goodbreak\fi
\vskip 1pt\noindent}
%
\def\EMrefb{\advance\EMrefno by 1 
\hangindent=\hangbiblio\hangafter=1 \ignorespaces }
%
% R�f�rences libres:
%
\def\begref#1{\EMbegref{#1}{0mm}\def\ref{\EMrefa\EMrefb}}
%
% R�f�rences num�rot�es:
%
\def\begrefnum#1{\EMbegref{#1}{10.5mm}\def\ref{\EMrefa
\hbox to\parindent{\hphantom{\,[00]}\llap{[\the\EMrefno]}\hfill}\EMrefb}%
\def\refsp##1.##2 {\EMrefa
\hbox to\parindent{\hphantom{\,[00}\llap{[##1}##2]\hfill}\EMrefb}}
%
% R�f�rences avec �tiquette:
%
\def\begreflab#1#2{\EMbegref{#1}{#2}\def\ref##1 {\EMrefa
\hbox to\parindent{[##1]\hfill}\EMrefb}}
%
\def\endref{\par\egroup}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Noms des environnements
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand\receiptname{Re\c cu le}
\newcommand\preuvename{Preuve}
%\newcommand\resumename{R\'esum\'e}
%
\def\EMdeflanguage{%
\ifnum\EM@language=1
\def\contentsname{Contents}
\def\listfigurename{List of Figures}
\def\listtablename{List of Tables}
\def\refname{REFERENCES}
\def\indexname{Index}
\def\figurename{Figure}
\def\tablename{Table}
\def\appendixname{Appendix}
\def\abstractname{Abstract}
\def\theoname{Theorem}
\def\byname{by}
\def\andname{and}
\def\lemmaname{Lemma}
\def\propositionname{Proposition}
\def\notationname{Notation}
\def\proofname{Proof}
\def\corollaryname{Corollary}
\def\conjecturename{Conjecture}
\def\remarkname{Remark}
\def\remarksname{Remarks}
\def\examplename{Example}
\def\examplesname{Examples}
\def\definitionname{Definition}
\def\definitionsname{Definitions}
\def\acknowledgename{Acknowledgements}
\fi
%
\ifnum\EM@language=2
\def\contentsname{Table des mati\`eres}
\def\listfigurename{Liste des Figures}
\def\listtablename{Liste des Tables}
\def\refname{BIBLIOGRAPHIE}
\def\indexname{Index}
\def\figurename{Figure}
\def\tablename{Table}
\def\appendixname{Appendice}
\def\abstractname{R\'esum\'e}
\def\theoname{Th\'eor\`eme}
\def\byname{par}
\def\andname{et}
\def\lemmaname{Lemme}
\def\propositionname{Proposition}
\def\notationname{Notation}
\def\proofname{D\'emonstration}
\def\corollaryname{Corollaire}
\def\conjecturename{Conjecture}
\def\remarkname{Remarque}
\def\remarksname{Remarques}
\def\examplename{Exemple}
\def\examplesname{Exemples}
\def\definitionname{D\'efinition}
\def\definitionsname{D\'efinitions}
\def\acknowledgename{Remerciements}
\fi
%
\ifnum\EM@language=3
\def\contentsname{Inhaltsverzeichnis}
\def\listfigurename{Figurenverzeichnis}
\def\listtablename{Tabellenverzeichnis}
\def\refname{BIBLIOGRAPHIE}
\def\indexname{Sachverzeichnis}
\def\figurename{Figur}
\def\tablename{Tafel}
\def\appendixname{Appendix}
\def\abstractname{Zusammenfassung}
\def\theoname{Theorem}
\def\byname{von}
\def\andname{und}
\def\lemmaname{Hilfssatz}
\def\propositionname{Satz}
\def\notationname{Notation}
\def\proofname{Beweis}
\def\corollaryname{Korollar}
\def\conjecturename{Vermutung}
\def\remarkname{Bemerkung}
\def\remarksname{Bemerkungen}
\def\examplename{Beispiel}
\def\examplesname{Beispiele}
\def\definitionname{Definition}
\def\definitionsname{Definitionen}
\def\acknowledgename{Acknowledgements}
\fi
%
\ifnum\EM@language=4
\def\contentsname{Sommario}
\def\listfigurename{Elenco delle figure}
\def\listtablename{Elenco delle tavole}
\def\refname{BIBLIOGRAFIA}
\def\indexname{Indice analitico}
\def\figurename{Figura}
\def\tablename{Tavola}
\def\appendixname{Appendice}
\def\abstractname{Riassunto}
\def\theoname{Teorema}
\def\byname{da}
\def\andname{e}
\def\lemmaname{Lemma}
\def\propositionname{Proposizione}
\def\notationname{Notazione}
\def\proofname{Dimostrazione}
\def\corollaryname{Corollario}
\def\conjecturename{Congettura}
\def\remarkname{Osservazione}
\def\remarksname{Osservazioni}
\def\examplename{Esempio}
\def\examplesname{Esempi}
\def\definitionname{Definizione}
\def\definitionsname{Definizioni}
\def\acknowledgename{Ringraziamenti}
\fi
}
\EMdeflanguage
%
\newcommand\today{}
\edef\today{\ifcase\month\or
  January\or February\or March\or April\or May\or June\or
  July\or August\or September\or October\or November\or December\fi
  \space\number\day, \number\year}
\setlength\columnsep{10\p@}
\setlength\columnseprule{0\p@}
\pagenumbering{arabic}
\if@twocolumn
  \twocolumn
  \sloppy
  \flushbottom
\else
  \onecolumn
\fi
\pagestyle{myheadings}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Footnotes
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\let\Footnote=\footnote
\renewcommand{\footnote}[2][]{\def\next{#1}\ifhmode\ifdim\lastskip>\z@\unskip
		\fi\/\kern.15em\ifx\next\empty
		\Footnote{#2}\else
		\bgroup\ifnum\next<0 \let\@makefnmark=\relax\fi
		\Footnote[#1]{#2}\egroup\fi\fi}
\@definecounter{thanksnote}
\newcounter{tempanote}
\renewcommand{\thanks}[2][]{\def\Next{#1}\bgroup\ifx\Next\empty
	\stepcounter{thanksnote}\setcounter{tempanote}{\c@footnote}%
	\else\c@thanksnote=\Next\fi
	\renewcommand{\thefootnote}{\fnsymbol{thanksnote}}%
	\footnote[#1]{#2}\ifx\Next\empty
	\setcounter{footnote}{\c@tempanote}\fi\egroup}
\def\EMraise#1{\leavevmode\raise.78ex\hbox{#1}}
\setlength{\footnotesep}{2.9mm}  
\ifEM@paren
  \def\@makefnmark{\smash{\small\upshape\EMraise{\tiny   
  \m@th\@thefnmark}\kern.12em)}}
\else
  \def\@makefnmark{\smash{\small\upshape\EMraise{\tiny
  \m@th\@thefnmark}\kern.12em}}
\fi
\long\def\@makefntext#1{\bgroup\parindent=.8cm
    \indent\llap{\@makefnmark\kern5pt}\footnotesize\ignorespaces #1\par
    \egroup}%
\def\footnoterule{\kern-3pt\hrule \@width 1.4cm \kern4pt} 

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Reglages Enseignement Mathematique
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\ifEM@plainequ
\else
   \@addtoreset{equation}{section}
   \renewcommand\theequation{\thesection.\@arabic\c@equation}
\fi
\parindent=0.5cm     %% indentation
\parskip=.5pt plus.75pt minus.25pt   %% espacement suppl�mentaire
					%% entre les alin�as
\hfuzz=2pt          %% autorise un d�bordement horizontal limit�
		    %% � l'ext�rieur du cadre normal
\mathsurround=.1em  %% espace suppl�mentaire autour des
		    %% expressions math�matiques (red�fini avec les fontes)
\pretolerance=400   %% qualit� de la ligne sans coupures de mots
\tolerance=800      %% qualit� de la ligne apr�s avoir coup� des mots
\binoppenalty=2400  %% d�courage les coupures apr�s une op�ration binaire
\relpenalty=1200    %% d�courage les coupures apr�s une relation math�matique
\clubpenalty=1000   %% d�courage les lignes orphelines
\widowpenalty=1000  %% d�courage les lignes veuves
%
\let\eqno=\leqno 
\def\tag#1 {\leqno(#1)}  
\abovedisplayskip=7pt plus 3pt minus 4pt
\belowdisplayskip=7pt plus 3pt minus 4pt
\abovedisplayshortskip=0pt plus 3pt
\belowdisplayshortskip=5pt plus 3pt minus 2pt
\predisplaypenalty=0
\def\EMpar{\belowdisplayskip=0pt\belowdisplayshortskip=0pt\par}
\overfullrule=5pt
\newskip\EMskip     %% interligne extensible (red�fini avec les fontes)
\EMskip=\normalbaselineskip
\def\EMquad{\hskip 1em plus .02em minus .2em}  %% cadratin compressible

\def\chasse{\ifhmode\unskip\hfilneg\ \fi}
\def\repousse{\ifhmode\unskip\indent\fi}
\def\qedchasse{\def\par{\parfillskip=0pt\endgraf}\qed\let\par=\endgraf}

\def\smallpenalty{\interlinepenalty=100}
\def\medpenalty{\interlinepenalty=500}
\def\bigpenalty{\interlinepenalty=\@M}
%% p�nalit� suppl�mentaire pour les th�or�mes, etc.:
\def\proclaimpenalty{\clubpenalty=5000 \widowpenalty=\@M 
			\predisplaypenalty=\@M}
\normalsize

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  R�gles typographiques sp�ciales
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\frenchspacing

\renewcommand{\:}{\colon}    %% chang� pour compatibilit� avec AMSTeX
\def\*{\nobreakdash-}        %% = '@-' de AMSTeX

\long\def\EM@afterfi#1\fi{\fi#1}
\def\EMactive@prefix#1{%
  \ifx\protect\@typeset@protect
  \else
    \EM@afterfi\protect#1\@gobble
  \fi}
\def\EM@activate#1{%
  \expandafter\def
  \expandafter#1\expandafter{%
    \expandafter\EMactive@prefix
    \expandafter#1\csname active@char\string#1\endcsname}%
}

\expandafter\def\csname active@char\string:\endcsname{\if@safe@actives%
  \deuxpoints\else
    \ifhmode\ifdim\lastskip>\z@\unskip\fi\kern.15em \fi
    \deuxpoints\ifhmode\ \ignorespaces\fi\fi}
\edef\deuxpoints{:}

\expandafter\def\csname active@char\string;\endcsname{\if@safe@actives%
  \pointvirgule\else
    \ifhmode\ifdim\lastskip>\z@\unskip\fi\kern.1em \fi
    \pointvirgule\ifhmode\ \ignorespaces\fi\fi}
\edef\pointvirgule{;}

\expandafter\def\csname active@char\string!\endcsname{\if@safe@actives%
  \exclam\else
    \ifhmode\ifdim\lastskip>\z@\unskip\fi\kern.18em \fi
    \exclam\fi}
\edef\exclam{!}

\expandafter\def\csname active@char\string?\endcsname{\if@safe@actives%
  \interr\else
    \ifhmode\ifdim\lastskip>\z@\unskip\fi\kern.18em \fi
    \interr\fi}
\edef\interr{?}

\catcode`\:=\active
\catcode`\;=\active
\catcode`\!=\active
\catcode`\?=\active
\def\EMactivechars{
  \catcode`\:=\active
  \EM@activate{:}
%
  \catcode`\;=\active
  \EM@activate{;}%
%
  \catcode`\!=\active
  \EM@activate{!}%
%
  \catcode`\?=\active
  \EM@activate{?}%
}
\def\EMdesactivechars{
  \catcode`\:=12
  \catcode`\;=12
  \catcode`\!=12
  \catcode`\?=12
}
\catcode`\:=12
\catcode`\;=12
\catcode`\!=12
\catcode`\?=12
\def\pnt{\,\ldotp}  %% point en math�matiques
%
\AtBeginDocument{\EMactivechars
\EM@redefine\epsfig#1{%
\bgroup\EMdesactivechars\org@epsfig{#1}\egroup
}
}
\def\EM@redefcaption{\let\@oldcapt\caption
  \def\caption{\bgroup\EMdesactivechars\@@caption}%
  \def\@@caption##1{\@oldcapt{##1}\egroup}}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Hack to allow : ; ? ! in labels.
%%    Taken with slight modifications from babel.
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newif\if@safe@actives
\@safe@activesfalse
\def\EM@redefinerobust#1{%
  \edef\EM@tempa{\expandafter\@gobble\string#1}%
  \expandafter\ifx\csname \EM@tempa\space\endcsname\relax
    \expandafter\let\csname org@\EM@tempa\endcsname#1
    \expandafter\edef\csname\EM@tempa\endcsname{\noexpand\protect
	\expandafter\noexpand\csname\EM@tempa\space\endcsname}%
  \else
    \expandafter\let\csname org@\EM@tempa\expandafter\endcsname
		    \csname\EM@tempa\space\endcsname
  \fi
  \expandafter\def\csname\EM@tempa\space\endcsname}
\def\EM@redefine#1{%
  \edef\EM@tempa{\expandafter\@gobble\string#1}%
  \expandafter\let\csname org@\EM@tempa\endcsname#1
  \expandafter\def\csname\EM@tempa\endcsname}
\EM@redefinerobust\ref#1{%
  \@safe@activestrue\org@ref{#1}\@safe@activesfalse}
\EM@redefinerobust\pageref#1{%
  \@safe@activestrue\org@pageref{#1}\@safe@activesfalse}
\EM@redefine\@citex[#1]#2{%
  \@safe@activestrue\org@@citex[#1]{#2}\@safe@activesfalse}
\EM@redefine\nocite#1{%
  \@safe@activestrue\org@nocite{#1}\@safe@activesfalse}
\EM@redefine\bibcite#1#2{%
  \@safe@activestrue\org@bibcite{#1}{#2}\@safe@activesfalse}
\EM@redefine\@bibitem#1{%
  \@safe@activestrue\org@@bibitem{#1}\@safe@activesfalse}
\EM@redefine\@biblabel#1{%
  \@safe@activestrue\org@@biblabel{#1}\@safe@activesfalse}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Adresses
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\EMactivechars  %%% 

\long\def\address#1{\removelastskip\nobreak\vskip\baselineskip\noindent
\vbox\bgroup\def\\{\vskip 1.0mm\parindent=.75cm\relax}\small
\parindent=0pt\obeylines {#1}}
\def\endaddress{\egroup}

\def\rev{\CASE ; version r\'evis\'ee re\ced{c}ue le~}
\def\EMdate#1{\removelastskip\nobreak\vskip 2.5mm
\hbox to \textwidth{\it\small\hfill (\receiptname~#1\CASE )}\nobreak
\kern 2.0mm}

\def\email#1{{\it e-mail:\/} #1}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%  Theoremes & Co
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\EM@makemargins{%
  \labelsep=0pt
  \itemindent=0pt
  \labelwidth=0pt
}
\def\EM@restoremargins{%
  \labelsep=5pt
  \itemindent=0pt
  \leftmargin=5mm  
  \labelwidth=\leftmargin \advance\labelwidth by -\labelsep
}
%
\gdef\@endtheorem{\EMpar\endtrivlist\@endpefalse}
\gdef\th@ensmaththeo{%
  \EM@makemargins%
  \def\@begintheorem##1##2{%
  \item[]\hspace\parindent{\scshape ##1~\rm ##2.}\EMquad  
	\proclaimpenalty             
	\EM@restoremargins}%
  \def\@opargbegintheorem##1##2##3{\def\next{##3}%
  \item[]\hspace\parindent{\scshape ##1~\rm ##2\ifx\next\empty
  \else\ {\normalfont(##3)}\fi.}\EMquad
	\proclaimpenalty               
	\EM@restoremargins}%
    }
%
\gdef\th@ensmaththeostar{%
  \EM@makemargins%
  \def\@begintheorem##1##2{%
    \item[]\hspace\parindent{\scshape ##1.}\EMquad
	\proclaimpenalty                  
	\EM@restoremargins}%
  \def\@opargbegintheorem##1##2##3{\def\next{##3}%
  \item[]\hspace\parindent{\scshape ##1\ifx\next\empty
  \else\ ##3\fi.}\EMquad
	\proclaimpenalty                    
	\EM@restoremargins}%
    }
%
\gdef\th@ensmathliketheo{
  \EM@makemargins%
  \def\@begintheorem##1##2{%
    \@latex@error{liketheo: You must provide an argument in square brackets,
    though it may be empty [] !}%
    }%
  \def\@opargbegintheorem##1##2##3{%
	\def\next{##3}\ifx\next\empty\item[\hspace\parindent]\else
	\item[]\hspace\parindent{\scshape \next.}\EMquad\fi
	\proclaimpenalty                     
	\EM@restoremargins}%
    }
%
\theorempreskipamount\EMskip
\theorempostskipamount\EMskip
%
\long\def\proclaim#1#2{\ifvmode\removelastskip\goodbreak\vskip\EMskip
\indent\fi\def\next{#1}\ifx\next\empty\else{\smc {\ignorespaces
#1\CASE}\ifperiod.\else\global\periodtrue\fi\EMquad
}\fi{\interlinepenalty=\@M \proclaimpenalty
\it\ignorespaces #2\EMpar}\vskip\EMskip}
%
\newenvironment{likeabstract}[1][]            
	{\par\small\indent\def\next{#1}\ifx\next\empty\else
	{\scshape{\ignorespaces #1\CASE}.\EMquad}\fi 
	\rm \ignorespaces}
	{\EMpar\vskip.25cm}
\newenvironment{abstract}[1][]
	{\par\small\indent\def\next{#1}{\scshape\abstractname
	\ifx\next\empty\else~\next\fi\ifperiod.\else\global\periodtrue\fi
	\EMquad}\rm \ignorespaces}
	{\EMpar\vskip.25cm}
%
\newenvironment{likeproof}[1][]                 %% = \EMdemo de enseign.tex
	{\par\removelastskip\vskip.6\baselineskip   %% .6 au lieu de .5
	\indent\def\next{#1}\ifx\next\empty\else
	{\itshape{\ignorespaces #1\CASE}\ifperiod.\else\global\periodtrue\fi
	\EMquad}\fi\clubpenalty=5000 \rm \ignorespaces}
	{\EMpar\penalty-150\vskip\EMskip}
\newenvironment{preuve}[1][]
	{\par\removelastskip\vskip.6\baselineskip
	\indent\def\next{#1}{\itshape\preuvename\ifx\next\empty\else
	~\next\fi\ifperiod.\else\global\periodtrue\fi\EMquad}\clubpenalty=5000 
	\rm \ignorespaces}
	{\EMpar\penalty-150\vskip\EMskip}
\newenvironment{proof}[1][]
	{\par\removelastskip\vskip.6\baselineskip   
	\indent\def\next{#1}{\itshape\proofname\ifx\next\empty\else
	~\next\fi\ifperiod.\else\global\periodtrue\fi\EMquad}\clubpenalty=5000 
	\rm \ignorespaces}
	{\EMpar\penalty-150\vskip\EMskip}
%
\theoremstyle{ensmathliketheo}
\theorembodyfont{\bigpenalty\itshape}   
\newtheorem{liketheo}{}
%
\theoremstyle{ensmathliketheo}
\theorembodyfont{\smallpenalty\rmfamily}  
\newtheorem{likeexample}{}
%
\theoremstyle{ensmaththeostar}
\theorembodyfont{\bigpenalty\itshape}
\newtheorem{theorem*}{\theoname}
\newtheorem{lemma*}{\lemmaname}
\newtheorem{proposition*}{\propositionname}
\newtheorem{corollary*}{\corollaryname}
\newtheorem{conjecture*}{\conjecturename}
%
\theorembodyfont{\bigpenalty\rmfamily}
\newtheorem{definition*}{\definitionname}
\newtheorem{notation*}{\notationname}
%
\theorembodyfont{\smallpenalty\rmfamily}
\newtheorem{example*}{\examplename}
\newtheorem{remark*}{\remarkname}
%
\theorembodyfont{\medpenalty\rmfamily}
\newtheorem{definitions*}{\definitionsname}
\newtheorem{examples*}{\examplesname}
\newtheorem{remarks*}{\remarksname}
%
\theoremstyle{ensmaththeo}
\theorembodyfont{\bigpenalty\itshape}
\ifEM@plainthm
  \newtheorem{theorem}{\theoname}
\else
  \newtheorem{theorem}{\theoname}[section]
\fi
\newtheorem{lemma}[theorem]{\lemmaname}
\newtheorem{proposition}[theorem]{\propositionname}
\newtheorem{corollary}[theorem]{\corollaryname}
\newtheorem{conjecture}[theorem]{\conjecturename}
%
\theorembodyfont{\bigpenalty\rmfamily}
\newtheorem{definition}[theorem]{\definitionname}
\newtheorem{notation}[theorem]{\notationname}
%
\theorembodyfont{\smallpenalty\rmfamily}
\newtheorem{example}[theorem]{\examplename}
\newtheorem{remark}[theorem]{\remarkname}
%
\theorembodyfont{\medpenalty\rmfamily}
\newtheorem{definitions}[theorem]{\definitionsname}
\newtheorem{examples}[theorem]{\examplesname}
\newtheorem{remarks}[theorem]{\remarksname}
%
\let\theoreme=\theorem\let\endtheoreme=\endtheorem
\let\exemple=\example\let\endexemple=\endexample
\let\lemme=\lemma\let\endlemme=\endlemma
\let\demo=\proof\let\enddemo=\endproof
\let\beweis=\proof\let\endbeweis=\endproof
\let\satz=\proposition\let\endsatz=\endproposition
\let\remarque=\remark\let\endremarque=\endremark
\let\remarques=\remarks\let\endremarques=\endremarks
\let\resume=\abstract\let\endresume=\endabstract

%% d�faut:
\theoremstyle{ensmaththeo}               
\theorembodyfont{\bigpenalty\itshape}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%   Op�rateurs
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%\let\operator@font=\rm  %% fontes Times dans les op�rateurs gr�ce �
			  %% \SetSymbolFont{operators} � la fin du fichier!
%%\def\operatorname#1{\mathop{\operator@font #1}\nolimits}  
%%\def\operatornamewithlimits#1{\mathop{\operator@font #1}} 
%
\def\mop#1{\mathop{{\rm#1}}\nolimits}
\def\moplim#1{\mathop{{\rm#1}}}
\def\newop#1{\expandafter\def\csname#1\endcsname{\mop{#1}}}
\def\newoplim#1{\expandafter\def\csname#1\endcsname{\moplim{#1}}}
\AtBeginDocument{
\newop{div}
\newop{supp}
\newop{rank}
\newop{tr}
\newop{arsinh}
\newop{arcosh}
\newop{artanh}
\newop{sgn}
\def\slim{\operatornamewithlimits{s\text{-}lim}}  
\def\wlim{\operatornamewithlimits{w\text{-}lim}}  
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%   Fontes Times dans le texte
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\ifEM@times
\renewcommand{\sfdefault}{cmr}
\DeclareFontFamily{OT1}{ptm}{}
\DeclareFontShape{OT1}{ptm}{m}{n} { <-> ptmr}{}
\DeclareFontShape{OT1}{ptm}{m}{it}{ <-> ptmri}{}
\DeclareFontShape{OT1}{ptm}{m}{sl}{<->ssub * ptm/m/it}{}
\DeclareFontShape{OT1}{ptm}{m}{sc}{ <-> ptmrc}{}
\DeclareFontShape{OT1}{ptm}{b}{n} { <-> ptmb}{}
\DeclareFontShape{OT1}{ptm}{b}{it}{ <-> ptmbi}{}     
\DeclareFontShape{OT1}{ptm}{bx}{n} {<->ssub * ptm/b/n}{}
\DeclareFontShape{OT1}{ptm}{bx}{it}{<->ssub * ptm/b/it}{}
\def\rmdefault{ptm}

\let\bBB=\mathbb 
\DeclareSymbolFont{bold}{OT1}{ptm}{b}{n}
\@ifundefined{mathbf}{}{\DeclareMathAlphabet{\mathbf}{OT1}{ptm}{b}{n}}  
\let\mathbb=\mathbf
\let\Bbb=\mathbf  
\@ifundefined{mathrm}{}{\DeclareMathAlphabet{\mathrm}{OT1}{ptm}{m}{n}}
%
\DeclareFontFamily{OT1}{psy}{}      
\DeclareFontShape{OT1}{psy}{m}{n}{ <-> s * [0.9] psyr}{}
%
%% fontes CM utilis�es dans certains cas sp�ciaux:
%%\DeclareFontFamily{OT1}{cmr}{}     
%%\DeclareFontShape{OT1}{cmr}{m}{n}{ <5> <6> <7> <8> <9> <10> gen * cmr }{}
\DeclareFontFamily{OMS}{ptm}{}     
\DeclareFontShape{OMS}{ptm}{m}{n}{ <8> <9> <10> gen * cmsy }{}
\DeclareFontFamily{OMS}{cmtt}{}     
\DeclareFontShape{OMS}{cmtt}{m}{n}{ <8> <9> <10> gen * cmsy }{}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%%   Fontes Times dans les equations
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%\ifEM@times
\SetSymbolFont{operators}{normal}{OT1}{ptm}{m}{n}   
\SetSymbolFont{operators}{bold}{OT1}{ptm}{b}{n}     
%
\DeclareSymbolFont{emsy}{OT1}{ptm}{m}{it}
\DeclareSymbolFont{emsr}{OT1}{ptm}{m}{n}
\DeclareSymbolFont{emcmr}{OT1}{cmr}{m}{n}   
\DeclareSymbolFont{emsymb}{OT1}{psy}{m}{n}  
%
\DeclareMathSymbol a{\mathalpha}{emsy}{"61}
\DeclareMathSymbol b{\mathalpha}{emsy}{"62}
\DeclareMathSymbol c{\mathalpha}{emsy}{"63}
\DeclareMathSymbol d{\mathalpha}{emsy}{"64}
\DeclareMathSymbol e{\mathalpha}{emsy}{"65}
\DeclareMathSymbol f{\mathalpha}{emsy}{"66}
%\DeclareMathSymbol g{\mathalpha}{emsy}{"67}
\DeclareMathSymbol h{\mathalpha}{emsy}{"68}
\DeclareMathSymbol i{\mathalpha}{emsy}{"69}
\DeclareMathSymbol j{\mathalpha}{emsy}{"6A}
\DeclareMathSymbol k{\mathalpha}{emsy}{"6B}
\DeclareMathSymbol l{\mathalpha}{emsy}{"6C}
\DeclareMathSymbol m{\mathalpha}{emsy}{"6D}
\DeclareMathSymbol n{\mathalpha}{emsy}{"6E}
\DeclareMathSymbol o{\mathalpha}{emsy}{"6F}
\DeclareMathSymbol p{\mathalpha}{emsy}{"70}
\DeclareMathSymbol q{\mathalpha}{emsy}{"71}
\DeclareMathSymbol r{\mathalpha}{emsy}{"72}
\DeclareMathSymbol s{\mathalpha}{emsy}{"73}
\DeclareMathSymbol t{\mathalpha}{emsy}{"74}
\DeclareMathSymbol u{\mathalpha}{emsy}{"75}
%\DeclareMathSymbol v{\mathalpha}{emsy}{"76}
%\DeclareMathSymbol w{\mathalpha}{emsy}{"77}
\DeclareMathSymbol x{\mathalpha}{emsy}{"78}
\DeclareMathSymbol y{\mathalpha}{emsy}{"79}
\DeclareMathSymbol z{\mathalpha}{emsy}{"7A}
%
\DeclareMathSymbol A{\mathalpha}{emsy}{"41}
\DeclareMathSymbol B{\mathalpha}{emsy}{"42}
\DeclareMathSymbol C{\mathalpha}{emsy}{"43}
\DeclareMathSymbol D{\mathalpha}{emsy}{"44}
\DeclareMathSymbol E{\mathalpha}{emsy}{"45}
\DeclareMathSymbol F{\mathalpha}{emsy}{"46}
\DeclareMathSymbol G{\mathalpha}{emsy}{"47}
\DeclareMathSymbol H{\mathalpha}{emsy}{"48}
\DeclareMathSymbol I{\mathalpha}{emsy}{"49}
\DeclareMathSymbol J{\mathalpha}{emsy}{"4A}
\DeclareMathSymbol K{\mathalpha}{emsy}{"4B}
\DeclareMathSymbol L{\mathalpha}{emsy}{"4C}
\DeclareMathSymbol M{\mathalpha}{emsy}{"4D}
\DeclareMathSymbol N{\mathalpha}{emsy}{"4E}
\DeclareMathSymbol O{\mathalpha}{emsy}{"4F}
\DeclareMathSymbol P{\mathalpha}{emsy}{"50}
\DeclareMathSymbol Q{\mathalpha}{emsy}{"51}
\DeclareMathSymbol R{\mathalpha}{emsy}{"52}
\DeclareMathSymbol S{\mathalpha}{emsy}{"53}
\DeclareMathSymbol T{\mathalpha}{emsy}{"54}
\DeclareMathSymbol U{\mathalpha}{emsy}{"55}
\DeclareMathSymbol V{\mathalpha}{emsy}{"56}
\DeclareMathSymbol W{\mathalpha}{emsy}{"57}
\DeclareMathSymbol X{\mathalpha}{emsy}{"58}
\DeclareMathSymbol Y{\mathalpha}{emsy}{"59}
\DeclareMathSymbol Z{\mathalpha}{emsy}{"5A}

\DeclareMathSymbol{\bullet}{\mathalpha}{emsymb}{"B7}
\DeclareMathSymbol{\regis}{\mathalpha}{emsymb}{"D2}
% utilisation:
\def\Bullet{\leavevmode\unkern{$\m@th\bullet$}\kern.32em\ignorespaces}
\def\Regis{\leavevmode\raise.5ex\hbox{$\m@th\regis$}}

\DeclareMathSymbol +{\mathbin}{emcmr}{`+}
\DeclareMathSymbol ={\mathrel}{emcmr}{`=}  

%% correction de \SetSymbolFont pour les utilisateurs 
%% ne disposant pas des fontes virtuelles: 
\ifEM@print\else
\DeclareMathSymbol{\Gamma}{\mathalpha}{emcmr}{"00}
\DeclareMathSymbol{\Delta}{\mathalpha}{emcmr}{"01}
\DeclareMathSymbol{\Theta}{\mathalpha}{emcmr}{"02}
\DeclareMathSymbol{\Lambda}{\mathalpha}{emcmr}{"03}
\DeclareMathSymbol{\Xi}{\mathalpha}{emcmr}{"04}
\DeclareMathSymbol{\Pi}{\mathalpha}{emcmr}{"05}
\DeclareMathSymbol{\Sigma}{\mathalpha}{emcmr}{"06}
\DeclareMathSymbol{\Upsilon}{\mathalpha}{emcmr}{"07}
\DeclareMathSymbol{\Phi}{\mathalpha}{emcmr}{"08}
\DeclareMathSymbol{\Psi}{\mathalpha}{emcmr}{"09}
\DeclareMathSymbol{\Omega}{\mathalpha}{emcmr}{"0A}
\fi
\DeclareMathSizes{7.6}{8}{6}{5}
%
% D�finitions compl�mentaires:
%
\def\`#1{{\accent"12 #1}}            % red�finition de l'accent grave!
\def\H#1{{\accent"CD #1}}            % red�finition de l'accent hongrois!
\chardef\J="11                       % permet de coder {\sf\'\J}, etc.
\def\j{{\sf\J}}                      % j sans point  
\chardef\AA="C8                      % Angstr�m
\chardef\gbp="A3                     % livre sterling
\chardef\TIL="81                     % tilde sur la ligne
\chardef\endash="B1                  % endash
\chardef\emdash="D0                  % emdash
\chardef\pourmille="BD               % %o
\chardef\aoben="E3                   % ^a
\chardef\ooben="EB                   % ^o
%
\def\S{\leavevmode\unkern{\char"A7}\kern.1em\ignorespaces} 
\def\D#1{{\accent"C7 #1}}            % red�finition du point sup�rieur!
\DeclareMathAccent{\dot}{\mathalpha}{operators}{"C7}
					% idem, en mode math�matique
%
% Guillemets fran�ais ouvrants et fermants 
% [� coder:   \og TEXTE \fg   ou   {\og}TEXTE{\fg},   etc.]:
%
\def\og{{\char"AB}\kern.15em}
\def\fg{\relax\ifhmode\unskip\kern.15em\fi{\char"BB}}
%
% C�dille polonaise:
%
\def\cedpol#1{\setbox0=\hbox{#1}\ifdim\ht0=1ex \accent"CE #1%
  \else{\ooalign{\hidewidth\char"CE\hidewidth\crcr\unhbox0}}\fi}
%
\fi
%
% D�finition directe de fontes particuli�res:
%
\font \tenpol                  = ptmr at 10pt     % romain
\font \ninepol                 = ptmr at 9pt
\font \eightpol                = ptmr at 8pt
\font \runningheadpol          = ptmr at 7.6pt
\font \sevenpol                = ptmr at 7pt
\font \sixpol                  = ptmr at 6pt
\font \fivepol                 = ptmr at 5pt
%
\font \tenpolit                = ptmri at 10pt    % italique
\font \ninepolit               = ptmri at 9pt
\font \eightpolit              = ptmri at 8pt
\font \runningheadpolit        = ptmri at 7.6pt
\font \sevenpolit              = ptmri at 7pt
\font \sixpolit                = ptmri at 6pt
\font \fivepolit               = ptmri at 5pt
%
% Tailles particuli�res: 
%
\font \bigb                    = ptmb at 12pt
\font \bigbi                   = ptmbi at 12pt
\font \bigbb                   = ptmb at 14pt
\font \bigbbi                  = ptmbi at 14pt
\font \bigbbb                  = ptmb at 17pt
\font \bigbbbi                 = ptmbi at 17pt
\usepackage{EMutil}
\EMdesactivechars
\endinput
%% 
%% End of file `ensmath.cls'.
