% This is the french style check file (that check french cs & issue a warning)
%                           Copyright GUTenberg-Bernard Gaulle as in french.doc
%
% to be used only to see if a document is french-style compatible
%
%                                                                 rev. 04/04/96
%%
%%      checksum        = "31649 74 188 4258"
%%
\catcode`\/=0{\catcode`/\=12/gdef/Aboi{/string\}}%}emacs+TeX
/catcode`/\=0\catcode`\/=12
{\catcode`\]=13\def]{}
\gdef\ErrMsgF#1{%
        \errhelp{Cette commande est deja definie dans le style french}%
%       \errhelp{Your command will be ignored, type <return> to proceed}%
        \errmessage{Probleme eventuel avec le style french (macro \Aboi #1)}}
\def\DmyDeF#1{\expandafter\gdef\csname#1\endcsname{\ErrMsgF{#1}}}%
\def\Dmydef#1,#2]{\DmyDeF{#1}%
                  \def\temp{#2}\ifx\temp\empty\let\Dmydef\relax\fi%
                  \Dmydef#2]}%
\def\dummydef[{\Dmydef}%
% Here are all the french defs names
\dummydef[frenchtest,frenchdoc,french,english,NouveauLangage,%        % 5
beginlanguage,inferieura,superieura,lqq,rqq,originalinput,%           %10
nonfrench,endnonfrench,frenchtypography,noTeXdots,TeXdots,%           %15
ancientguillemets,todayguillemets,guillemetsinallfonts,%18
                       guillemetsinroman,endguillemets,%              %20
noenglishquote,englishquote,noenglishdoublequotes,englishdoublequotes,%24
                                                        untypedspaces,%25
typedspaces,idotless,iwithdot,EBCDICbrackets,normalbrackets,%         %30
letpunctutionactivefor,wrongtypedspaces,nofrenchtypography,%33
                                        wrongtypedspaces,frenchlayout,%35
everyparguillemets,noeveryparguillemets,overfullhboxmark,%38
                                    nooverfullhboxmark,labelsinmargin,%40
nolabelsinmargin,Numeros,nopagenumbers,order,nofrenchlayout,%         %45
frenchtranslation,resume,sommaire,annexe,annexes,%                    %50
glossaire,glossaires,printindex,see,seealso,%                         %55
nofrenchtranslation,frenchmacros,ier,iere,ieme,%                      %60
lettrinefont,keywords,endkeywords,motsclef,endmotsclef,%              %65
No,degre,degres,leftguillemets,rightguillemets,%                      %70
fup,primo,secundo,tertio,quatro,%                                     %75
quando,fsc,refmark,moretolerance,Sauter,%                             %80
minMAJ,abbreviations,noabbreviations,nofrenchmacros,frenchstyleid,%   %85
abstract,endabstract,mdseries,letpunctuationactivefor,%89
                                        nowrongtypedspaces,%          %90
<,>,oguill,fguill,endorder,%                                          %95
lsc,allowuchyph,disallowuchyph,vers,versatim,%                       %100
endversatim,tthyphenation,notthyphenation,!,tabbingaccents,%         %105
notabbingaccents,usersfrenchoptions,PS,yourref,ourref,%              %110
object,AllTeX,formfoot,formhead,figurette,%                          %115
endfigurette,pointvirgule,deuxpoints,pointexclamation,%
                                                  pointinterrogation,%120
guillemets,iers,ieres,iemes,numeros,%                                %125
dittomark,frenchname,frenchhyphenation,nofrenchhyphenation,hyphex,%  %130
frhyphex,GOfrench,printglossary,lettrine,flettrine,%                 %135
pmfrench,at,chap,email,endfrench,%                                   %140
lettrinehang,prefacename,vert,tilde,lettrinefontname,%               %145
automaticlettrine,noautomaticlettrine,noresetatpart,%
fguillemets,endfguillemets,%                                         %150
frenchguillemets,nofrenchguillemets,wideletter,%               %153%
%encodingdefault,% usually defined first by NFSS2
]}%
% the following for super-activated-characters
\catcode`\"=\active
\gdef"{{\def\Aboi{}\ErrMsgF{\string"}}}
\catcode`<=\active\catcode`>=\active
\gdef<{{\def\Aboi{}\ErrMsgF{\string<}}}
\gdef>{{\def\Aboi{}\ErrMsgF{\string>}}}
\catcode`<=12\catcode`>=12
\gdef\EBCDICbrackets{\catcode`<=\active\catcode`>=\active}
\gdef\noEBCDICbrackets{\catcode`<=12\catcode`>=12}
\def\frenchTeXmods{\ErrMsgF{frenchTeXmods}}% normally unused by user
\endinput
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%