From 95ca32d40c7d3f78258cac6b977f909169659be4 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 10 Oct 2013 22:37:14 +0000 Subject: lettre (10oct13) git-svn-id: svn://tug.org/texlive/trunk@31879 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/lettre/lettre.cls | 27 +- .../texmf-dist/tex/latex/lettre/lettre.cls_2.346 | 1525 -------------------- Master/texmf-dist/tex/latex/lettre/obs.ins | 79 - 3 files changed, 15 insertions(+), 1616 deletions(-) delete mode 100644 Master/texmf-dist/tex/latex/lettre/lettre.cls_2.346 delete mode 100644 Master/texmf-dist/tex/latex/lettre/obs.ins (limited to 'Master/texmf-dist/tex/latex/lettre') diff --git a/Master/texmf-dist/tex/latex/lettre/lettre.cls b/Master/texmf-dist/tex/latex/lettre/lettre.cls index 391beed9614..a785eb70edf 100644 --- a/Master/texmf-dist/tex/latex/lettre/lettre.cls +++ b/Master/texmf-dist/tex/latex/lettre/lettre.cls @@ -1,7 +1,8 @@ % %NAME% : Lettre +% maintenance: Vincent Belaïche (vincentb1@users.sourceforge.net) % %AUTHOR% : Denis Mégevand - Observatoire de Genève % %EMAIL% : Denis.Megevand@obs.unige.ch -% %VERSION% : v2.346 +% %VERSION% : v2.348 %% %% This is file `lettre.cls'. %% @@ -30,7 +31,7 @@ % \NeedsTeXFormat{LaTeX2e} \RequirePackage{graphicx} -\ProvidesClass{lettre}[2002/07/22 v2.346] +\ProvidesClass{lettre}[2013/10/07 v2.349] \typeout{Copyleft Denis Megevand - Observatoire de Geneve}% %% \newcommand\@ptsize{} @@ -101,11 +102,11 @@ % **************************************** % * MISE-EN-PAGE : parametres * % **************************************** -% -% suppression de l'offset vertical -\voffset -1in% + % marge sup. 25mm \topmargin 25mm% +% suppression de l'offset vertical +\advance\topmargin by -1in % sep. d'entete 4mm \headheight 0pt% \headsep 4mm% @@ -119,11 +120,12 @@ \footnotesep 5mm% \marginparpush 1mm% % -% suppression de l'offset horizontal -\hoffset -1in% % marge gauche 25mm \oddsidemargin 25mm% \evensidemargin 25mm% +% suppression de l'offset horizontal +\advance\oddsidemargin by -1in +\advance\evensidemargin by -1in % largeur texte 160mm \textwidth 160mm% % sep. note lat. 4mm @@ -184,7 +186,8 @@ % * MACROS INTERNES * % ************************************************ % -\def\t#1#2{\begin{list}{#1}{\setlength{\labelsep}{10pt}% +\@ifundefined{lettre@t}{}{\PackageError{lettre}{Definition en double}{Redefinition de la macro `lettre@t'}} +\def\lettre@t#1#2{\begin{list}{#1}{\setlength{\labelsep}{10pt}% \setlength{\labelwidth}{\listmargin}% \setlength{\leftmargin}{\listmargin}% \setlength{\listparindent}{0pt}}% @@ -957,27 +960,27 @@ \vskip\csname letter\the\c@lettre\endcsname mm \fi \l@@info{Post-scriptum defini}% - \noindent\t{#1}{#2\\}\vfill\penalty-100\relax}% + \noindent\lettre@t{#1}{#2\\}\vfill\penalty-100\relax}% % \def\cc#1{\penalty100\relax \if@letter \vskip\csname letter\the\c@lettre\endcsname mm \fi \l@@info{Copies declarees}% - \noindent\t{\ccname}{#1\\}\vfill\penalty-100\relax}% + \noindent\lettre@t{\ccname}{#1\\}\vfill\penalty-100\relax}% % \def\encl#1{\penalty100\relax \if@letter \vskip\csname letter\the\c@lettre\endcsname mm \fi \l@@info{Annexes declarees}% - \noindent\t{\enclname}{#1\\}\vfill\penalty-100\relax}% + \noindent\lettre@t{\enclname}{#1\\}\vfill\penalty-100\relax}% \def\mencl{\penalty100\relax \if@letter \vskip\csname letter\the\c@lettre\endcsname mm \fi \l@@info{Annexes mentionnees}% - \noindent\t{\mentionname\\}{~}\vfill\penalty-100\relax}% + \noindent\lettre@t{\mentionname\\}{~}\vfill\penalty-100\relax}% % % **************************************** % * DEFINITIONS DEPENDANT DU LANGAGE * diff --git a/Master/texmf-dist/tex/latex/lettre/lettre.cls_2.346 b/Master/texmf-dist/tex/latex/lettre/lettre.cls_2.346 deleted file mode 100644 index 391beed9614..00000000000 --- a/Master/texmf-dist/tex/latex/lettre/lettre.cls_2.346 +++ /dev/null @@ -1,1525 +0,0 @@ -% %NAME% : Lettre -% %AUTHOR% : Denis Mégevand - Observatoire de Genève -% %EMAIL% : Denis.Megevand@obs.unige.ch -% %VERSION% : v2.346 -%% -%% This is file `lettre.cls'. -%% -%% The original source files were: -%% -%% letter.cls - LaTeX 2e team -%% lettre.sty - D. Megevand -%% -%% -%% IMPORTANT NOTICE: -%% -%% This file is part of the "lettre" package. -%% This package is distributed under the terms of the LaTeX Project -%% Public License (LPPL) described in the file lppl.txt. -%% -%% Denis Mégevand - Observatoire de Genève. -%% -%% Ce fichier fait partie de la distribution du paquetage "lettre". -%% Ce paquetage est distribué sous les termes de la License Publique -%% du Projet LaTeX (LPPL) décrite dans le fichier lppl.txt. -%% -% -% **************************************** -% * PREAMBULE * -% **************************************** -% -\NeedsTeXFormat{LaTeX2e} -\RequirePackage{graphicx} -\ProvidesClass{lettre}[2002/07/22 v2.346] -\typeout{Copyleft Denis Megevand - Observatoire de Geneve}% -%% -\newcommand\@ptsize{} -\DeclareOption{10pt}{\renewcommand\@ptsize{0}} -\DeclareOption{11pt}{\renewcommand\@ptsize{1}} -\DeclareOption{12pt}{\renewcommand\@ptsize{2}} -\if@compatibility - \DeclareOption{twoside}{\@latexerr{No `twoside' layout for letters}% - \@eha} -\else - \DeclareOption{twoside}{\@twosidetrue} -\fi -\DeclareOption{oneside}{\@twosidefalse} -\DeclareOption{origdate}{\@origdatetrue\PackageWarningNoLine{lettre}{Mode `origdate'}} -\DeclareOption{draft}{\setlength\overfullrule{5pt}} -\DeclareOption{final}{\setlength\overfullrule{0pt}} -\DeclareOption{leqno}{\input{leqno.clo}} -\DeclareOption{fleqn}{\input{fleqn.clo}} -\DeclareOption{francais}{\def\defaultlanguage{francais}} -\DeclareOption{romand}{\def\defaultlanguage{romand}} -\DeclareOption{allemand}{\def\defaultlanguage{allemand}} -\DeclareOption{americain}{\def\defaultlanguage{americain}} -\DeclareOption{anglais}{\def\defaultlanguage{anglais}} -\if@compatibility -\else -\DeclareOption*{\PackageWarningNoLine{lettre}{Option inconnue : `\CurrentOption'}} -\fi -\newif\if@origdate\@origdatefalse -\newif\if@etiq\@etiqfalse -\ExecuteOptions{10pt,oneside,final,francais} -\ProcessOptions -\input{size1\@ptsize.clo} -% -% **************************************** -% * POLICES * -% **************************************** -% -\DeclareOldFontCommand{\rm}{\rmfamily}{\mathrm} -\DeclareOldFontCommand{\sl}{\slshape}{\@nomath\sl} -\DeclareOldFontCommand{\it}{\itshape}{\mathit} -\DeclareOldFontCommand{\sc}{\scshape}{\@nomath\sc} -\DeclareOldFontCommand{\bf}{\bfseries}{\mathbf} -\DeclareOldFontCommand{\sf}{\sffamily}{\mathsf} -\DeclareOldFontCommand{\tt}{\ttfamily}{\mathtt} -\DeclareRobustCommand*{\cal}{\@fontswitch{\relax}{\mathcal}} -\DeclareRobustCommand*{\mit}{\@fontswitch{\relax}{\mathnormal}} -% -% **************************************** -% * PARAGRAPHES : parametres * -% **************************************** -% -\lineskip 1pt% -\normallineskip 1pt% -\parskip .7em% -\parindent 0pt% -\topsep .2em% -\partopsep 0pt% -\itemsep .2em% -\renewcommand\baselinestretch{1} -% -\@lowpenalty 51\relax -\@medpenalty 151\relax -\@highpenalty 301\relax -\@beginparpenalty -\@lowpenalty -\@endparpenalty -\@lowpenalty -\@itempenalty -\@lowpenalty -% -% **************************************** -% * MISE-EN-PAGE : parametres * -% **************************************** -% -% suppression de l'offset vertical -\voffset -1in% -% marge sup. 25mm -\topmargin 25mm% -% sep. d'entete 4mm -\headheight 0pt% -\headsep 4mm% -% hauteur texte 250mm -\textheight 250mm% -% sep d'embase 9mm -\footskip 9mm% -% -% total vertical 25+4+250+9=288 mm, reste 9 mm sur A4 = 297 mm. -% -\footnotesep 5mm% -\marginparpush 1mm% -% -% suppression de l'offset horizontal -\hoffset -1in% -% marge gauche 25mm -\oddsidemargin 25mm% -\evensidemargin 25mm% -% largeur texte 160mm -\textwidth 160mm% -% sep. note lat. 4mm -\marginparsep 4mm% -% larg. note lat 15mm -\marginparwidth 15mm% -% -% total horizontal 25+160+4+15=204 mm, reste 6 mm sur A4 = 210 mm. -% -\skip\footins 4mm plus 2pt minus 4pt% -% -% ************************************************ -% * LE FORMAT LETTRE ET FAX DE * -% * L'OBSERVATOIRE DE GENEVE * -% ************************************************ -% -% ************************************************ -% * NEWCOUNTS, NEWDIMENS, NEWIFS, NEWWRITE * -% ************************************************ -% -\newcount\auxcount -\newcount\c@infos\c@infos=1\relax -\newcount\c@labelstart -\newcount\c@lettre -\newcount\c@telefax -\newcount\emailcount -\newcount\faxpage -\newcount\sigflag -\newcount\signum -% -\newdimen\letterwidth -\newdimen\openingspace -\newdimen\openingindent -\newdimen\lettermargin -\newdimen\listmargin -\newdimen\sigspace -\newdimen\ssigindent -\newdimen\ssigwidth -\newdimen\msigwidth -\newdimen\fromaddress@let@width -\newdimen\fromlieu@let@width -\newdimen\toaddress@let@width -\newdimen\fromaddress@fax@width -\newdimen\faxstring@width -\newdimen\faxbox@width -\newdimen\toaddress@fax@width -\newdimen\fromname@fax@width -% -\newif\if@letter\@lettertrue -\newif\if@detail\@detailfalse -% -\newwrite\@tensionaux -\newwrite\@dateaux -\newwrite\@etiqaux -\newwrite\@faxaux -% -% ************************************************ -% * MACROS INTERNES * -% ************************************************ -% -\def\t#1#2{\begin{list}{#1}{\setlength{\labelsep}{10pt}% - \setlength{\labelwidth}{\listmargin}% - \setlength{\leftmargin}{\listmargin}% - \setlength{\listparindent}{0pt}}% - \item #2% - \end{list}} -\def\detailledaddress{\@detailtrue}% -% -\def\stopletter{\vskip0ptplus1filll}% -\def\stopfax{\vskip0ptplus1filll}% -% -\def\resetopenenv{% - \faxpage=0\relax - \csname\defaultlanguage\endcsname - \def\concdecl{}% - \def\fromlocation{}% - }% -\def\resetcloseenv{ - \def\fromsig{}\def\fromssig{}\def\fromtsig{} - \ps@plain - \pagenumbering{arabic} - \onecolumn - \signum=0\relax - } -\def\resetauxenv{ - \def\auxflag{} - \auxcount=0\relax - \def\toref{}\def\fromref{} - \def\telexnum{}\def\ccpnum{} - } -\def\resetemailenv{ - \def\emailflag{} - \emailcount=0\relax - \def\@username{} - \def\ccittnum{}\def\internetnum{}\def\bitnetnum{}\def\telepacnum{}\def\decnetnum{} - } -% -% \@processto extrait \toname et \toaddress de l'environnement letter -% -\long\def\@processto#1{\@xproc #1\\@@@\ifx\toaddress\@empty - \else \@yproc #1@@@\fi}% -\long\def\@xproc #1\\#2@@@{\def\toname{#1}\def\toaddress{#2}}% -\long\def\@yproc #1\\#2@@@{\def\toaddress{#2}}% -% -\def\stopbreaks{\interlinepenalty \@M - \def\par{\@@par\nobreak}\let\\=\@nobreakcr - \let\vspace\@nobreakvspace}% -\def\@nobreakvspace{\@ifstar{\@nobreakvspacex}{\@nobreakvspacex}}% -\def\@nobreakvspacex#1{\ifvmode\nobreak\vskip #1\relax\else - \@bsphack\vadjust{\nobreak\vskip #1}\@esphack\fi}% -\def\@nobreakcr{\vadjust{\penalty\@M}\@ifstar{\@xnewline}{\@xnewline}}% -\def\startbreaks{\let\\=\@normalcr - \interlinepenalty 200\relax\def\par{\@@par\penalty -100\relax}}% -% -%************************************************************* -% MESSAGES ET AVERTISSSEMENTS * -%************************************************************* -% -% Envoyes a la console et dans le fichier de log -% -% On peut supprimer allumer ou eteindre en tout temps les -% messages d'informations par les commandes \infos et \noinfos. -% Les avertissements ne peuvent etre supprimes. -%************************************************************* -\def\infos{\c@infos=1\relax} -\def\noinfos{\c@infos=0\relax} -% -\def\ltypeout#1{{\let\protect\string\immediate\write16{#1}}}% -\def\l@@warning#1{\typeout{LETTRE WARNING: #1.}}% -\def\l@warning#1{\l@@warning{#1\on@line}}% -\def\l@@info#1{\ifnum\c@infos=1\typeout{LETTRE INFO: #1.}\fi}% -% -% ************************************************ -% * ETIQUETTES * -% ************************************************ -% -% La commande \startlabels suivante definit des pages -% A4 de 2 colonnes d'etiquettes avec 15 mm de marges -% gauche et droite sur chaque etiquette. -% Si l'on change le nombre d'etiquettes sur une page, -% il faut aussi modifier la routine \@startlabels -% -\def\startlabels{% -\baselineskip=0pt\lineskip=0pt% -\pagestyle{empty}% -\let\@texttop=\relax -\topmargin=0pt\headsep=0pt% -\oddsidemargin=15mm\evensidemargin=15mm% -% -% modifications des dimensions de la page a faire ici -% -\textheight=297mm\textwidth=180mm\columnsep=30mm% -\@colht=\textheight\@colroom=\textheight\vsize=\textheight -\small -\baselineskip=0pt\lineskip=0pt% -\boxmaxdepth=0pt% -\twocolumn\relax}% -% -% La commande \@startlabels suivante definit la position de la -% premiere etiquette sur la page, a partir de la valeur du -% compteur \c@labelstart. -% -\def\@startlabels{% -\l@@info{Position de la premiere etiquette: \the\c@labelstart}% -\ifnum\c@labelstart>\z@ - \ifnum\c@labelstart>16\relax - \l@@warning{Position de la premiere etiquette ignoree}% - \else - \@whilenum\c@labelstart>\@ne\do - {\immediate\write\@etiqaux{\string\mlabel{~\string\\~}}% - \advance\c@labelstart\m@ne}% - \fi% -\else - \l@@warning{Position de la premiere etiquette ignoree}% -\fi -}% -% -% La commande \mlabel fabrique une etiquette de 37 mm de hauteur, -% la largeur etant definie dans \startlabels (105mm-30mm de marges) -% chacune contenant 70 mm de texte au centre de l'etiquette. -\def\mlabel#1{\setbox0\vbox{\parbox[b]{70mm}{\rm\strut\ignorespaces #1}}% - \vbox to 37mm{\vskip5mmplus1fil \box0 \vskip5mmplus1fil}}% -% -% \makelabels demande a \begin{document} d'imprimer sur le fichier -% auxiliaire .etq l'ordre de preparer les etiquettes. -% Son argument optionnel definit quelle est la prochaine etiquette -% libre sur la page, de maniere a utiliser des feuilles deja -% partiellement utilisees. Dans ce cas, \begin{document} imprime -% autant d'etiquettes vides que necessaire. -% -\def\makelabels{% - \@etiqtrue - \l@@info{On demande des etiquettes}% - \@ifnextchar [{\i@makelabels}{\i@makelabels[1]}}% -\def\i@makelabels[#1]{\c@labelstart=#1}% -% -% **************************************** -% * ADAPTATIONS DES DEFAUTS * -% **************************************** -% -\def\institut#1{% - \l@@info{Fichier de defaut: #1.ins}% - \def\@institut{\makeatletter - \input{#1.ins}% - \makeatother}}% -% -% ************************************************ -% * ENVIRONNEMENTS LETTER ET FAX * -% ************************************************ -% -\long\def\letter#1{% - \rm - \global\advance\c@lettre\@ne - \l@@info{Lettre \the\c@lettre}% - \expandafter\ifx\csname newletter\the\c@lettre\endcsname\relax - \expandafter\def\csname letter\the\c@lettre\endcsname{2} - \else - \expandafter\def\csname letter\the\c@lettre\endcsname{% - \csname newletter\the\c@lettre\endcsname} - \fi - \ifodd\c@page% - \else - \if@twoside - \l@@info{Saut de page force pour commencer la lettre sur une page impaire.}% - \thispagestyle{empty} - \hbox{}\penalty-10000\relax - \fi - \fi - \c@page\@ne - \resetopenenv\resetcloseenv\resetauxenv\resetemailenv - \@lettertrue - \@institut - \let\opening=\letteropening - \interlinepenalty=200\relax - \@processto{#1} -}% -% -\def\endletter{\par - \ifdim\pagetotal < 50pt - \immediate\write\@tensionaux{% - \string\expandafter\string\def% - \string\csname\space newletter\the\c@lettre\string\endcsname{-2}}% - \l@@warning{Longueur de la derniere page : \the\pagetotal < 50pt}% - \l@@warning{ tension de page modifiee a -2, veuillez recompiler}% - \else - \ifdim\pagetotal < 90pt - \immediate\write\@tensionaux{% - \string\expandafter\string\def% - \string\csname\space newletter\the\c@lettre\string\endcsname{-4}}% - \l@@warning{Longueur de la derniere page : \the\pagetotal < 90pt}% - \l@@warning{ tension de page modifiee a -4, veuillez recompiler}% - \else - \ifdim\pagetotal < 130pt - \immediate\write\@tensionaux{% - \string\expandafter\string\def% - \string\csname\space newletter\the\c@lettre\string\endcsname{-5}}% - \l@@warning{Longueur de la derniere page : \the\pagetotal < 130pt}% - \l@@warning{ tension de page modifiee a -5, veuillez recompiler}% - \else - \ifdim\pagetotal < 170pt - \immediate\write\@tensionaux{% - \string\expandafter\string\def% - \string\csname\space newletter\the\c@lettre\string\endcsname{-6}}% - \l@@warning{Longueur de la derniere page : \the\pagetotal < 170pt}% - \l@@warning{ tension de page modifiee a -6, veuillez recompiler}% - \else - \ifdim\pagetotal < 210pt - \immediate\write\@tensionaux{% - \string\expandafter\string\def% - \string\csname\space newletter\the\c@lettre\string\endcsname{4}}% - \l@@warning{Longueur de la derniere page : \the\pagetotal < 210pt}% - \l@@warning{ tension de page modifiee a 4, veuillez recompiler}% - \else - \ifdim\pagetotal < 250pt - \immediate\write\@tensionaux{% - \string\expandafter\string\def% - \string\csname\space newletter\the\c@lettre\string\endcsname{6}}% - \l@@warning{Longueur de la derniere page : \the\pagetotal < 250pt}% - \l@@warning{ tension de page modifiee a 6, veuillez recompiler}% - \else - \immediate\write\@tensionaux{% - \string\expandafter\string\def% - \string\csname\space newletter\the\c@lettre\string\endcsname{% - \csname letter\the\c@lettre\endcsname}}% - \l@@info{Longueur de la derniere page : \the\pagetotal >= 250pt}% - \fi - \fi - \fi - \fi - \fi - \fi - \stopletter - \@@par\pagebreak\@@par - \if@etiq - \ifodd\c@page% - \else - \if@twoside - \l@@info{Saut de page force pour commencer les etiquettes sur une page impaire.}% - \thispagestyle{empty} - \hbox{}\penalty-10000\relax - \fi - \fi - \begingroup - \def\protect{\string}% - \let\\=\relax - \def\protect##1{\string##1\space}% - \immediate\write\@etiqaux{\string\mlabel{\toname - \\\toaddress}}% - \endgroup - \fi}% -% -\long\def\telefax#1#2{% - \rm - \global\advance\c@telefax\@ne - \l@@info{Telefax \the\c@telefax}% - \ifnum\c@telefax=\@ne - \else - \l@@warning{Un seul telefax par fichier, s.v.p.,} - \l@@warning{ sinon le nombre de pages du fax est incorrect !} - \fi - \ifodd\c@page% - \else - \if@twoside - \l@@info{Saut de page force pour commencer le telefax sur une page impaire.}% - \thispagestyle{empty} - \hbox{}\penalty-10000\relax - \fi - \fi - \c@page\@ne - \resetopenenv\resetcloseenv\resetauxenv\resetemailenv - \@letterfalse - \@institut - \def\tofaxnum{#1}% - \let\opening=\faxopening - \interlinepenalty=200\relax - \makeatletter - \@input{\jobname.fax}% - \l@@info{Lecture du fichier auxiliaire de fax: Nombre total de pages=\totalpages}% - \makeatother - \@processto{#2} -}% -% -\def\endtelefax{% - \stopfax - \begingroup - \advance\faxpage by\c@page - \def\protect{\string}% - \let\\=\relax - \def\protect##1{\string##1\space}% - \immediate\openout\@faxaux=\jobname.fax% - \immediate\write\@faxaux{\string\def\string\totalpages{\the\faxpage}}% - \if\totalpages\the\faxpage\else - \l@@warning{Le nombre de pages du fax a change, }% - \l@@warning{(ancien=\totalpages, nouveau=\the\faxpage) }% - \l@@warning{ veuillez recompiler pour le corriger dans l'entete.}% - \fi - \endgroup - \@@par\pagebreak\@@par -}% -% -% ************************************************ -% * OPENING ET CLOSING * -% ************************************************ -% -\def\letteropening#1{% - \if@origdate - \expandafter\ifx\csname origdate\the\c@lettre - \endcsname\relax - \else - \l@@info{Date originale lue dans \jobname.odt}% - \def\pdate{\csname origdate\the\c@lettre\endcsname}% - \fi - \l@@info{`\pdate' ecrit dans \jobname.odt}% - \immediate\write\@dateaux{% - \string\expandafter\string\def% - \string\csname\space origdate\the\c@lettre - \string\endcsname{\pdate}}% - \fi - \hbadness=10000\relax - \thispagestyle{empty}% - \setlength{\unitlength}{1mm}% - \advance\rightskip -75pt% - \begin{picture}(\pict@let@width,\pict@let@height)% - (\pict@let@hoffset,\pict@let@voffset)% - \put(\rule@hpos,\rule@vpos){\line(1,0){\rule@length}}% - \put(\fromaddress@let@hpos,\fromaddress@let@vpos){\makebox(0,0)[tl]{% - \parbox[t]{\fromaddress@let@width}{% - \fromaddress\\[3mm]% - \ifx\@empty\fromlocation - \else \fromlocation \\% - \fi - \ifx\@empty\telephonenum - \else \tellabelname \telephonenum \\ - \fi - \ifx\@empty\faxnum - \else \faxlabelname \faxnum \\ - \fi - \ifx\@empty\emailnum - \else \mbox{\emaillabelname\ttfamily\emailnum} \\ - \fi}}} - \put(\fromlieu@let@hpos,\fromlieu@let@vpos){\makebox(0,0)[bl]{% - \parbox[t]{\fromlieu@let@width}{% - \ifx\@empty\fromlieu - \else\fromlieu, % - \fi - \ifx\@empty\pdate ~% - \else \pdate - \fi}}}% - \put(\toaddress@let@hpos,\toaddress@let@vpos){\makebox(0,0)[tl]{% - \parbox{\toaddress@let@width}{% - \toname\\\toaddress}}}% - \end{picture}% - \par\vskip\csname letter\the\c@lettre\endcsname mm - \advance\leftskip\lettermargin - \advance\rightskip75pt% - \ifx\@empty\auxflag - \vspace{2\openingspace}% - \else - \vspace{\openingspace}\auxline\vspace{\openingspace}% - \fi - \vskip\csname letter\the\c@lettre\endcsname mm - \ifx\@empty\concdecl - \vspace{\openingspace}% - \else - \concline\vspace{\openingspace}% - \fi - \vskip\csname letter\the\c@lettre\endcsname mm - \hbadness=1000\relax - {\parindent=\openingindent - #1}\par\startbreaks\nobreak - \let\flushleft=\letterflushleft - \let\raggedright=\letterraggedright - \let\center=\lettercenter - \let\centering=\lettercentering}% -% -\def\faxopening#1{% - \hbadness=10000\relax - \thispagestyle{empty}% - \setlength{\unitlength}{1mm}% - \advance\rightskip -75pt% - \begin{picture}(\pict@fax@width,\pict@fax@height) - (\pict@fax@hoffset,\pict@fax@voffset)% - \put(\fromaddress@fax@hpos,\fromaddress@fax@vpos){\makebox(0,0)[tl]{ - \parbox[t]{\fromaddress@fax@width}{\fromaddress}}}% - \put(\faxstring@hpos,\faxstring@vpos){\makebox(0,0)[bl]{% - \parbox[t]{\faxstring@width}{\telefaxstring}}} - \end{picture}\par% - \par\vspace{5mm}% - \makebox[\faxbox@width]{\scriptsize\telephonelabelname\telephonenum - \hfill\telefaxlabelname\faxnum - \ifx\@empty\emailnum\else\hfill\emaillabelname{\ttfamily\emailnum}\fi - \ifx\@empty\telexnum\else\hfill\telexlabelname\telexnum\fi}% - \par - \begin{tabular*}{\faxbox@width}[t]{l@{\hspace{5mm}}p{70mm}@{\hfill}r}% - \hline - \multicolumn{3}{@{}c@{}}{\vrule height 0pt depth 0pt width \faxbox@width}\\ - \headtoname - &\parbox[t]{\toaddress@fax@width}{\toname\\\toaddress}% - &\telefaxname\tofaxnum\\% - \\% - \headfromname - &\parbox[t]{\fromname@fax@width}{\ifx\@empty\fromlocation - \fromname - \else - \fromlocation - \fi}% - &\pagetotalname\totalpages\\% - \end{tabular*}\par% - \begin{tabular*}{\faxbox@width}[t]{@{\hfill}c@{\hfill}}% - \hline - \vrule height 3ex depth 7pt width 0pt\faxwarning\\% - \hline - \end{tabular*}\par% - \begin{tabular*}{\faxbox@width}[t]{@{}r@{}}% - \vrule height 0pt depth 0pt width \faxbox@width\\ - \multicolumn{1}{r}{\ifx\@empty\fromlieu - \else\fromlieu, % - \fi - \if@origdate - \expandafter\ifx\csname origdate\the\c@lettre - \endcsname\relax - \else - \l@@info{Date originale lue dans \jobname.odt}% - \def\pdate{\csname origdate\the\c@lettre\endcsname}% - \fi - \l@@info{`\pdate' ecrit dans \jobname.odt}% - \immediate\write\@dateaux{% - \string\expandafter\string\def% - \string\csname\space origdate\the\c@lettre - \string\endcsname{\pdate}}% - \fi - \ifx\@empty\pdate ~% - \else \pdate - \fi}\\% - \end{tabular*}% - \par - \vspace{\openingspace}% - \advance\leftskip \lettermargin - \advance\rightskip 75pt% - \ifx\@empty\concdecl - \vspace{\openingspace}% - \else - \concline\vspace{\openingspace}% - \fi - \hbadness=1000\relax - {\parindent=\openingindent - #1}\par\startbreaks\nobreak - \let\flushleft=\letterflushleft - \let\raggedright=\letterraggedright - \let\center=\lettercenter - \let\centering=\lettercentering}% -% -\long\def\closing#1{% - \let\center=\normalcenter - \let\centering=\normalcentering - \let\flushleft=\normalflushleft - \let\raggedright=\normalraggedright - \par\stopbreaks - \if@letter - \vskip\csname letter\the\c@lettre\endcsname mm - \fi - \par\vspace{2\parskip}% - \nobreak - \noindent - \l@@info{Signature \ifcase\signum manquante \or simple\or double\or triple\fi}% - \ifcase\sigflag - \ifcase\signum - \parbox[t]{\letterwidth}{#1}% - \par\vspace*{4\parskip}% - \vspace*{\sigspace}% - \hspace*{\ssigindent}% - \noindent - \parbox[t]{\ssigwidth}{\centering \ignorespaces\fromname}% - \or - \parbox[t]{\letterwidth}{#1}% - \par\vspace*{4\parskip}% - \vspace*{\sigspace}% - \hspace*{\ssigindent}% - \noindent - \parbox[t]{\ssigwidth}{\centering \ignorespaces\fromsig}% - \or - \parbox[t]{\letterwidth}{#1}% - \par\vspace*{4\parskip}% - \vspace*{\sigspace}% - \msigwidth=\letterwidth - \divide\msigwidth by 2\relax - \advance\msigwidth -3pt% - \noindent - \mbox{\parbox[t]{\msigwidth}{\centering\ignorespaces\fromsig}% - \parbox[t]{\msigwidth}{\centering\ignorespaces\fromssig}}% - \or - \parbox[t]{\letterwidth}{#1}% - \par\vspace*{4\parskip}% - \vspace*{\sigspace}% - \msigwidth=\letterwidth - \divide\msigwidth by 3\relax - \advance\msigwidth -3pt% - \noindent - \mbox{\parbox[t]{\msigwidth}{\centering\ignorespaces\fromsig}% - \parbox[t]{\msigwidth}{\centering\ignorespaces\fromssig}% - \parbox[t]{\msigwidth}{\centering\ignorespaces\fromtsig}}% - \fi - \or - \ifcase\signum - \hspace*{\ssigindent}% - \parbox[t]{\ssigwidth}% - {\centering \ignorespaces - #1% - \par\vspace*{4\parskip}% - \vspace*{\sigspace}% - \fromname}% - \or - \hspace*{\ssigindent}% - \parbox[t]{\ssigwidth}% - {\centering \ignorespaces - #1% - \par\vspace*{4\parskip}% - \vspace*{\sigspace}% - \fromsig}% - \or - \parbox[t]{\letterwidth}{#1}% - \par\vspace*{4\parskip}% - \vspace*{\sigspace}% - \msigwidth=\letterwidth - \divide\msigwidth by 2\relax - \advance\msigwidth -3pt% - \noindent - \mbox{\parbox[t]{\msigwidth}{\centering\ignorespaces\fromsig}% - \parbox[t]{\msigwidth}{\centering\ignorespaces\fromssig}}% - \or - \parbox[t]{\letterwidth}{#1}% - \par\vspace*{4\parskip}% - \vspace*{\sigspace}% - \msigwidth=\letterwidth - \divide\msigwidth by 3\relax - \advance\msigwidth -3pt% - \noindent - \mbox{\parbox[t]{\msigwidth}{\centering\ignorespaces\fromsig}% - \parbox[t]{\msigwidth}{\centering\ignorespaces\fromssig}% - \parbox[t]{\msigwidth}{\centering\ignorespaces\fromtsig}}% - \fi - \fi - \par\vfill\startbreaks -}% -% -% ************************************************ -% * COMMANDES UTILISATEURS * -% ************************************************ -% -\def\marge#1{% - \lettermargin=#1% - \listmargin=#1% - \leftmargini=\listmargin% - \advance\leftmargini 2.5em% - \letterwidth=\textwidth - \advance\letterwidth by -\lettermargin - \advance\letterwidth by 0pt}% -% -\def\basdepage#1{% - \def\bdp{#1}}% -% -\def\tension#1{% - \if@letter - \expandafter\def\csname letter\the\c@lettre\endcsname{#1}% - \fi -}% -% -\def\addpages#1{% - \l@@info{Pages additionnelles: #1}% - \advance\faxpage by #1}% -% -\def\name#1{\def\fromname{#1}}% -% -\def\signature#1{% - \ifnum\signum=0\relax - \def\fromsig{#1}\signum=1\relax - \else - \l@@warning{Signature deja definie}% - \fi -}% -\def\secondsignature#1{% - \ifnum\signum=1\relax - \def\fromssig{#1}\signum=2\relax - \else - \l@@warning{Seconde signature illegale ou deja definie}% - \fi -}% -\def\thirdsignature#1{% - \ifnum\signum=2\relax - \def\fromtsig{#1}\signum=3\relax - \else - \l@@warning{Troisieme signature illegale ou deja definie}% - \fi -}% -% -\def\vref#1{\l@@warning{La commande \string\Vref\ devrait etre utilisee.} - \def\auxflag{.}% - \def\toref{\parbox[t]{17mm}{#1}}}% -\def\Vref#1{\def\auxflag{.}% - \def\toref{\parbox[t]{17mm}{#1}}}% -\def\nref#1{\l@@warning{La commande \string\Nref~ devrait etre utilisee.} - \def\auxflag{.}% - \def\fromref{\parbox[t]{17mm}{#1}}}% -\def\Nref#1{\def\auxflag{.}% - \def\fromref{\parbox[t]{17mm}{#1}}}% -% -\def\concline{% - \noindent\parbox[t]{\letterwidth}% - {\@hangfrom{\textrm{\concname}}\ignorespaces\concdecl\strut}% - \par}% -% -\def\auxline{% - \l@@info{Ligne auxiliaire demandee}% - {\scriptsize - \vrefname% - \ifx\@empty \toref - \hspace{21mm}\hfill% - \else - {\small\toref}\hfill% - \fi - \nrefname% - \ifx\@empty \fromref - \hspace{21mm}\hfill% - \else - {\small\fromref}\hfill - \fi - \ifx\@empty \telexnum - \hfill% - \else - T\'ELEX\ \telexnum\hspace{5mm}% - \fi - \ifx\@empty \ccpnum - \hfill% - \else - C.C.P.\ \ccpnum\hspace{5mm}% - \fi}\par}% -% -\def\emailine{% - \l@@info{Ligne d'E-Mail demandee}% - {\scriptsize - \emaillabelname\hfill\ttfamily - \ifx\@empty \ccittnum - \else - \hfill \ccittnum\hfill - \fi - \ifx\@empty \internetnum - \else - \hfill \internetnum\hfill - \fi - \ifx\@empty \bitnetnum - \else - \hfill \bitnetnum\hfill - \fi - \ifx\@empty \telepacnum - \else - \hfill \telepacnum\hfill - \fi - \ifx\@empty \decnetnum - \else - \hfill \decnetnum\hfill - \fi - \ifnum\emailcount<3\relax - \hfill\mbox{}% - \fi}}% -% -\long\def\address#1{\l@@info{Adresse precisee}\def\fromaddress{#1}}% -%\long\def\address*#1{\if@letter -% \l@@info{Adresse avec nom precisee}% -% \def\fromaddress{\fromname\\#1} -% \else -% \l@@warning{Commande illegale dans un fax} -% \fi}% -% -\def\nodate{\l@@info{Date supprimee}\def\pdate{}}% -\def\date#1{\l@@info{Date precisee}\def\pdate{#1}}% -% -\def\nolieu{\l@@info{Lieu supprime}\def\fromlieu{}}% -\def\lieu#1{\l@@info{Lieu precise}\def\fromlieu{#1}}% -% -\def\conc#1{\l@@info{Champ d'objet defini}\def\concdecl{#1}}% -% -\def\location#1{\l@@info{Precision d'adresse definie}\def\fromlocation{#1}}% -% -\def\notelephone{\l@@info{Numero de telephone supprime}\def\telephonenum{}}% -\def\telephone#1{\l@@info{Numero de telephone precise}\def\telephonenum{#1}}% -% -\def\nofax{\l@@info{Numero de fax supprime}\def\faxnum{}}% -\def\fax#1{\l@@info{Numero de fax precise}\def\faxnum{#1}}% -% -\def\email#1{\l@@info{Numero d'E-Mail precise}\def\emailnum{#1}}% -% -\def\username#1{\def\@username{#1}}% -% -\def\ccitt#1{\ifnum\emailcount<3\relax - \def\emailflag{.}% - \advance\emailcount by 1\relax - \def\ccittnum{\ifx\@empty \@username - \l@@warning{<> indefini} - #1% - \else - S=\@username;#1% - \fi}% - \else - \def\ccittnum{}% - \fi}% -\def\internet#1{\ifnum\emailcount<3\relax - \def\emailflag{.}% - \advance\emailcount by 1\relax - \def\internetnum{\ifx\@empty \@username - \l@@warning{<> indefini} - #1\relax - \else - \@username @#1\relax - \fi}% - \else - \def\internetnum{}% - \fi}% -\def\bitnet#1{\ifnum\emailcount<3\relax - \def\emailflag{.}% - \advance\emailcount by 1\relax - \def\bitnetnum{\ifx\@empty \@username - \l@@warning{<> indefini} - #1\relax - \else - \@username\ at #1\relax - \fi}% - \else - \def\bitnetnum{}% - \fi}% -\def\telepac#1{\ifnum\emailcount<3\relax - \def\emailflag{.}% - \advance\emailcount by 1\relax - \def\telepacnum{\ifx\@empty \@username - \l@@warning{<> indefini} - #1\relax - \else - #1::\@username - \fi}% - \else - \def\telepacnum{}% - \fi}% -\def\decnet#1{\ifnum\emailcount<3\relax - \def\emailflag{.}% - \advance\emailcount by 1\relax - \def\decnetnum{\ifx\@empty \@username - \l@@warning{<> indefini} - #1\relax - \else - #1::\@username - \fi}% - \else - \def\decnetnum{}% - \fi}% -\def\telex#1{\ifnum\auxcount<2\relax - \def\auxflag{.}% - \advance\auxcount by 1\relax - \def\telexnum{#1}% - \else - \def\telexnum{}% - \fi}% -\def\ccp#1{\ifnum\auxcount<2\relax - \def\auxflag{.}% - \advance\auxcount by 1\relax - \def\ccpnum{#1}% - \else - \def\ccpnum{}% - \fi}% -% -\def\ps#1#2{\penalty100\relax - \if@letter - \vskip\csname letter\the\c@lettre\endcsname mm - \fi - \l@@info{Post-scriptum defini}% - \noindent\t{#1}{#2\\}\vfill\penalty-100\relax}% -% -\def\cc#1{\penalty100\relax - \if@letter - \vskip\csname letter\the\c@lettre\endcsname mm - \fi - \l@@info{Copies declarees}% - \noindent\t{\ccname}{#1\\}\vfill\penalty-100\relax}% -% -\def\encl#1{\penalty100\relax - \if@letter - \vskip\csname letter\the\c@lettre\endcsname mm - \fi - \l@@info{Annexes declarees}% - \noindent\t{\enclname}{#1\\}\vfill\penalty-100\relax}% -\def\mencl{\penalty100\relax - \if@letter - \vskip\csname letter\the\c@lettre\endcsname mm - \fi - \l@@info{Annexes mentionnees}% - \noindent\t{\mentionname\\}{~}\vfill\penalty-100\relax}% -% -% **************************************** -% * DEFINITIONS DEPENDANT DU LANGAGE * -% **************************************** -% -\def\FAXSTR{\fontfamily{cmdh}\fontseries{m}\fontshape{n}\selectfont}% -\def\FRANCAIS{francais} -\def\francais{% - \ifx\defaultlanguage\FRANCAIS\else\l@@info{Langage modifie: francais}\fi% - \ifx\undefined\frenchname\else % style french loaded - \french - \fi - \ifx\undefined\extrasfrancais\else % style babel and French language loaded - \selectlanguage{francais} - \reset@frenchitemize - \fi - \sigflag=0\relax - \def\cejour{le - \ifx\ier\undefined\def\ier{er}\fi - \ifnum\day=1\relax 1\ier\else \number\day\fi - \space\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 - \space \number\year}% - \def\faxwarning{\large\slshape\bfseries En cas de mauvaise transmission, - appelez s.v.p. l'op\'erateur t\'el\'efax}% - \def\telefaxstring{{\FAXSTR T~\'E~L~\'E~F~A~X}}% - \def\telephonelabelname{T\'EL\'EPHONE :~}% - \def\telefaxlabelname{T\'EL\'EFAX :~}% - \def\telefaxname{T\'el\'ecopie :~}% - \def\tellabelname{T\'el.~}% - \def\faxlabelname{Fax :~}% - \def\emaillabelname{E-Mail :~}% - \def\telexlabelname{T\'ELEX :~}% - \def\headtoname{\`A :~}% - \def\headfromname{De :~}% - \def\pagetotalname{Nombre de pages :~}% - \def\concname{Objet :~}% - \def\ccname{C.c.~}% - \def\enclname{P.j.~}% - \def\mentionname{Annexe(s) mentionn\'ee(s)}% - \def\vrefname{V.\raise.4ex\hbox{\tiny /}r\'ef.~} - \def\nrefname{N.\raise.4ex\hbox{\tiny /}r\'ef.~} -}% -\def\ROMAND{romand} -\def\romand{% - \ifx\defaultlanguage\ROMAND\else\l@@info{Langage modifie: romand}\fi% - \ifx\undefined\frenchname\else % style french loaded - \french - \fi - \ifx\undefined\extrasfrancais\else % style babel and French language loaded - \selectlanguage{francais} - \reset@frenchitemize - \fi - \sigflag=0\relax - \def\cejour{le - \ifx\ier\undefined\def\ier{er}\fi - \ifnum\day=1\relax 1\ier\else \number\day\fi - \space\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 - \space \number\year}% - \def\faxwarning{\large\slshape\bfseries En cas de mauvaise transmission, - appelez s.v.p. l'op\'erateur t\'el\'efax}% - \def\telefaxstring{{\FAXSTR T~\'E~L~\'E~F~A~X}}% - \def\telephonelabelname{T\'EL\'EPHONE :~}% - \def\telefaxlabelname{T\'EL\'EFAX :~}% - \def\telefaxname{T\'el\'efax :~}% - \def\tellabelname{T\'el.~}% - \def\faxlabelname{Fax :~}% - \def\emaillabelname{E-Mail :~}% - \def\telexlabelname{T\'ELEX :~}% - \def\headtoname{\`A :~}% - \def\headfromname{De :~}% - \def\pagetotalname{Nombre de pages :~}% - \def\concname{Concerne :~}% - \def\ccname{C.c.~}% - \def\enclname{Ann.~}% - \def\mentionname{Annexe(s) mentionn\'ee(s)}% - \def\vrefname{V.\raise.4ex\hbox{\tiny /}r\'ef.~} - \def\nrefname{N.\raise.4ex\hbox{\tiny /}r\'ef.~} -}% -\def\ANGLAIS{anglais} -\def\anglais{% - \ifx\defaultlanguage\ANGLAIS\else\l@@info{Langage modifie: anglais}\fi% - \ifx\undefined\frenchname\else % style french loaded - \english - \fi - \ifx\undefined\extrasenglish\else % style babel and English language loaded - \selectlanguage{english} - \fi - \sigflag=1\relax - \def\cejour{\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 ,\space\number\year}% - \def\faxwarning{\large\slshape\bfseries If improperly transmitted, please - call the telefax operator}% - \def\telefaxstring{{\FAXSTR T~E~L~E~F~A~X}}% - \def\telephonelabelname{TELEPHONE:~}% - \def\telefaxlabelname{TELEFAX:~}% - \def\telefaxname{Telefax:~}% - \def\tellabelname{Tel:~}% - \def\faxlabelname{Fax:~}% - \def\emaillabelname{E-Mail:~}% - \def\telexlabelname{TELEX:~}% - \def\headtoname{To:~}% - \def\headfromname{From:~}% - \def\pagetotalname{Total pages:~}% - \def\concname{Subject:~}% - \def\ccname{Cc:~}% - \def\enclname{Encl(s):~}% - \def\mentionname{Encl(s).}% - \def\vrefname{Y.\raise.4ex\hbox{\tiny /}ref.~} - \def\nrefname{O.\raise.4ex\hbox{\tiny /}ref.~} -}% -\def\AMERICAIN{americain} -\def\americain{% - \ifx\defaultlanguage\AMERICAIN\else\l@@info{Langage modifie: americain}\fi% - \ifx\undefined\frenchname\else % style french loaded - \english - \fi - \ifx\undefined\extrasenglish\else % style babel and English language loaded - \selectlanguage{english} - \fi - \sigflag=1\relax - \def\cejour{\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 ,\space\number\year}% - \def\faxwarning{\large\slshape\bfseries If improperly transmitted, please - call the telefax operator}% - \def\telefaxstring{{\FAXSTR T~E~L~E~F~A~X}}% - \def\telephonelabelname{PHONE:~}% - \def\telefaxlabelname{TELEFAX:~}% - \def\telefaxname{Telefax:~}% - \def\tellabelname{Phn:~}% - \def\faxlabelname{Fax:~}% - \def\emaillabelname{E-Mail:~}% - \def\telexlabelname{TELEX:~}% - \def\headtoname{To:~}% - \def\headfromname{From:~}% - \def\pagetotalname{Total pages:~}% - \def\concname{Re:~}% - \def\ccname{Cc:~}% - \def\enclname{Encl(s):~}% - \def\mentionname{Encl(s).}% - \def\vrefname{Y.\raise.4ex\hbox{\tiny /}ref.~} - \def\nrefname{O.\raise.4ex\hbox{\tiny /}ref.~} -}% -\def\ALLEMAND{allemand} -\def\allemand{% - \ifx\defaultlanguage\ALLEMAND\else\l@@info{Langage modifie: allemand}\fi% - \ifx\undefined\extrasgerman\else % style babel and German language loaded - \selectlanguage{german} - \fi - \sigflag=1\relax - \def\cejour{den \number\day .\space\ifcase\month\or - Januar\or Februar\or M\"arz\or April\or Mai\or Juni\or - Juli\or August\or September\or Oktober\or November\or Dezember\fi - \space \number\year}% - \def\concname{Betrifft: }% - \def\faxwarning{\large\slshape\bfseries Bitte unrichtige \"Ubertragungen dem - Sender telefonisch melden}% - \def\telefaxstring{{\FAXSTR T~E~L~E~F~A~X}}% - \def\telephonelabelname{TELEFON:~}% - \def\telefaxlabelname{TELEFAX:~}% - \def\telefaxname{Telefax:~}% - \def\tellabelname{Tel:~}% - \def\faxlabelname{Fax:~}% - \def\emaillabelname{E-Mail:~}% - \def\telexlabelname{TELEX:~}% - \def\headtoname{An:~}% - \def\headfromname{Von:~}% - \def\pagetotalname{Gesamtanzahl der Bl\"atter:~}% - \def\concname{Betrifft:~}% - \def\ccname{Kopie an:~}% - \def\enclname{Beilage(n):~}% - \def\mentionname{Beilage(n) erw\"ahnt}% - \def\vrefname{Ihr Zeichen~} - \def\nrefname{Unser Zeichen~} -}% -% -%************************************************************************ -% -% \document redefini pour ecrire '\startlabels' sur le fichier .etq -% et executer \@startlabels. -% -%************************************************************************ -% -\AtBeginDocument{% - \makeatletter - \@input{\jobname.tns}% - \@input{\jobname.odt}% - \begingroup\@floatplacement\@dblfloatplacement - \immediate\openout\@tensionaux=\jobname.tns% - \if@origdate - \immediate\openout\@dateaux=\jobname.odt% - \fi - \endgroup - \if@etiq - \immediate\openout\@etiqaux=\jobname.etq% - \immediate\write\@etiqaux{\string\startlabels}% - \@startlabels - \fi - \makeatother -}% -% -%************************************************************************ -% -% \enddocument redefini pour sortir la page d'etiquettes, si necessaire. -% -%************************************************************************ -% -\AtEndDocument{% - \l@@info{Nombre de lettres :\the\c@lettre}% - \l@@info{Nombre de telefax :\the\c@telefax}% - \newpage\begingroup - \immediate\closeout\@tensionaux% - \if@origdate - \immediate\closeout\@dateaux% - \fi - \if@letter - \if@etiq - \immediate\closeout\@etiqaux% - \makeatletter - \@input{\jobname.etq}% - \makeatother - \clearpage - \fi - \else - \immediate\closeout\@faxaux% - \fi - \endgroup -}% -% -% **************************************** -% * STYLES DE PAGE * -% **************************************** -% -% -\def\@texttop{\ifnum\c@page=1\vskip 0pt plus .00001fil\relax\fi}% -% -\if@twoside - \def\ps@headings{% - \headheight 12pt% - \headsep 25pt% - \def\@oddhead{{\hspace{15mm}\ifx\@empty\fromlieu\else\fromlieu , \fi - \pdate\hfill Page \thepage}}% - \def\@oddfoot{}% - \def\@evenhead{{Page \thepage\hfill\ifx\@empty\fromlieu\else\fromlieu , \fi - \pdate\hspace{15mm}}}% - \def\@evenfoot{}}% -\else - \def\ps@headings{% - \headheight 12pt% - \headsep 25pt% - \def\@oddhead{{\hspace{15mm}\ifx\@empty\fromlieu\else\fromlieu , \fi - \pdate\hfill Page \thepage}}% - \def\@oddfoot{}% - \def\@evenhead{}% - \def\@evenfoot{}}% -\fi -% -\def\ps@empty{% - \headheight 0pt% - \headsep 9pt% - \def\@oddhead{}% - \def\@oddfoot{% - \ifnum\c@page=1\relax - \ifx\@empty\emailflag - \ifx\@empty\bdp - \else - \hbadness=10000\relax - \rlap{\parbox{\textwidth}{\mbox{}\\\rule{\textwidth}{.4pt}\\\bdp}} - ~\hfill~ - \hbadness=1000\relax - \fi - \else - \hbadness=10000\relax - \rlap{\parbox{\textwidth}{\mbox{}\\\rule{\textwidth}{.4pt}\\\emailine}}% - ~\hfill~ - \hbadness=1000\relax - \fi - \fi}% - \def\@evenhead{}% - \def\@evenfoot{}}% -% -\def\ps@firstpage{% - \headheight 12pt% - \headsep 25pt% - \def\@oddhead{}% - \def\@oddfoot{}% - \def\@evenhead{}% - \def\@evenfoot{}}% -% -\def\ps@plain{% - \headheight 0pt% - \headsep 9pt% - \def\@oddhead{}% - \def\@oddfoot{\textrm{\hfill\thepage\hfill}}% - \def\@evenhead{}% - \def\@evenfoot{\textrm{\hfill\thepage\hfill}}}% -% -% **************************************** -% * CENTER et FLUSHLEFT * -% **************************************** -% -\def\normalcenter{\trivlist \normalcentering\item[]}% -\def\lettercenter{\trivlist \lettercentering\item[]}% -\def\normalcentering{\let\\=\@centercr\rightskip\@flushglue - \leftskip\@flushglue - \parindent\z@\parfillskip\z@}% -\def\lettercentering{\let\\=\@centercr\rightskip\@flushglue - \leftskip\@flushglue\advance\leftskip\lettermargin - \parindent\z@\parfillskip\z@}% -\let\endcenter=\endtrivlist -% -\def\normalflushleft{\trivlist \normalraggedright\item[]}% -\def\letterflushleft{\trivlist \letterraggedright\item[]}% -\def\normalraggedright{\let\\=\@centercr\leftskip\z@ - \@rightskip\@flushglue\rightskip\@rightskip - \parindent\z@}% -\def\letterraggedright{\let\\=\@centercr\leftskip\lettermargin - \@rightskip\@flushglue\rightskip\@rightskip - \parindent\z@}% -\let\endflushleft=\endtrivlist -% -% **************************************** -% * LISTES * -% **************************************** -% -\def\reset@frenchitemize{% - \renewenvironment{itemize}% - {\begin{list}{\textendash}% - {\settowidth{\labelwidth}{\textendash}% - \setlength{\leftmargin}{\listmargin}% - \addtolength{\leftmargin}{\labelwidth}% - \addtolength{\leftmargin}{\labelsep}% - \ifnum\@listdepth=0 - \setlength{\itemindent}{\parindent}% - \else - \addtolength{\leftmargin}{\parindent}% - \fi - \setlength{\itemsep}{\z@}% - \setlength{\parsep}{\z@}% - \setlength{\topsep}{\z@}% - \setlength{\partopsep}{\z@}% - \addtolength{\topsep}{-\parskip}% - \addtolength{\partopsep}{\parskip}% - }% - }% - {\end{list}}% -} -% -\rightmargin 25mm% - \advance\rightmargin 5pt% -\leftmarginii 2.2em% -\leftmarginiii 1.87em% -\leftmarginiv 1.7em% -\leftmarginv 1em% -\leftmarginvi 1em% -\leftmargin\leftmargini -\labelsep 5pt% -\parsep 0pt% -\def\@listi{\leftmargin\listmargin\labelwidth\leftmargin - \advance\leftmargin 1.5em\advance\labelwidth-\labelsep}% -\def\@listii{\leftmargin\leftmarginii - \labelwidth\leftmarginii\advance\labelwidth-\labelsep}% -\def\@listiii{\leftmargin\leftmarginiii - \labelwidth\leftmarginiii\advance\labelwidth-\labelsep - \topsep .1em% - \itemsep \topsep}% -\def\@listiv{\leftmargin\leftmarginiv - \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}% -\def\@listv{\leftmargin\leftmarginv - \labelwidth\leftmarginv\advance\labelwidth-\labelsep}% -\def\@listvi{\leftmargin\leftmarginvi - \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}% -% -\def\labelitemi{$\bullet$}% -\def\labelitemii{\bfseries --}% -\def\labelitemiii{$\ast$}% -\def\labelitemiv{$\cdot$}% -% -\def\labelenumi{\arabic{enumi}.}% -\def\theenumi{\arabic{enumi}}% -\def\labelenumii{(\alph{enumii})}% -\def\theenumii{\alph{enumii}}% -\def\p@enumii{\theenumi}% -\def\labelenumiii{\roman{enumiii}.}% -\def\theenumiii{\roman{enumiii}}% -\def\p@enumiii{\theenumi(\theenumii)}% -\def\labelenumiv{\Alph{enumiv}.}% -\def\theenumiv{\Alph{enumiv}}% -\def\p@enumiv{\p@enumiii\theenumiii}% -% -\def\verse{\let\\=\@centercr - \list{}{\itemsep\z@ \itemindent -15pt\listparindent \itemindent - \rightmargin\leftmargin\advance\leftmargin 15pt}\item[]}% -\let\endverse\endlist -% -\def\quotation{\list{}{\listparindent 1.5em% - \itemindent\listparindent - \rightmargin\leftmargin}\item[]}% -\let\endquotation=\endlist -% -\def\quote{\list{}{\rightmargin\leftmargin}\item[]}% -\let\endquote=\endlist -% -\def\descriptionlabel#1{\itshape #1}% -\def\description{\list{}{\leftmargin=2\listmargin - \labelwidth\listmargin \advance\labelwidth -\labelsep - \let\makelabel\descriptionlabel}}% -\let\enddescription\endlist -% -% **************************************** -% * DIVERS * -% **************************************** -% -\def\@begintheorem#1#2{\itshape \trivlist \item[\hskip \labelsep{\bfseries #1\ #2}]}% -\def\@endtheorem{\endtrivlist}% -% -\def\theequation{\arabic{equation}}% -% -\arraycolsep 5pt% -\tabcolsep 5pt% -\arrayrulewidth .4pt% -\doublerulesep 2pt% -\tabbingsep\labelsep -\skip\@mpfootins=\skip\footins -% -\fboxsep = 3pt % Space left between box and text by \fbox and \framebox. -\fboxrule = .4pt % Width of rules in box made by \fbox and \framebox. -% -% **************************************** -% * FOOTNOTES * -% **************************************** -% -\def\footnoterule{\kern-1\p@ - \hrule width .4\columnwidth - \kern .6\p@}% -% -\long\def\@makefntext#1{\parindent 1em\noindent - \hb@xt@1.8em{% - \hss\@textsuperscript{\normalfont\@thefnmark}}#1}% -% -% **************************************** -% * INITIALISATIONS DES DEFAUTS * -% **************************************** -% -\def\pict@let@width{185}% -\def\pict@let@height{65}% -\def\pict@let@hoffset{0}% -\def\pict@let@voffset{0}% -\def\rule@hpos{-25}% -\def\rule@vpos{-15}% -\def\rule@length{10}% -\def\fromaddress@let@hpos{-10}% -\def\fromaddress@let@vpos{70}% -\fromaddress@let@width=69mm -\def\fromlieu@let@hpos{90}% -\def\fromlieu@let@vpos{62}% -\fromlieu@let@width=69mm -\def\toaddress@let@hpos{90}% -\def\toaddress@let@vpos{40}% -\toaddress@let@width=80mm -% -\def\pict@fax@width{185}% -\def\pict@fax@height{30}% -\def\pict@fax@hoffset{0}% -\def\pict@fax@voffset{0}% -\def\fromaddress@fax@hpos{-10}% -\def\fromaddress@fax@vpos{30}% -\fromaddress@fax@width=69mm -\def\faxstring@hpos{90}% -\def\faxstring@vpos{20}% -\faxstring@width=69mm% -\faxbox@width=170mm% -\toaddress@fax@width=69mm% -\fromname@fax@width=69mm% -% -\def\@institut{\makeatletter - \input{default.ins}% - \makeatother}% -% -\smallskipamount=.5\parskip -\medskipamount=\parskip -\bigskipamount=2\parskip -% -\ps@plain -\pagenumbering{arabic}% -\raggedbottom -\onecolumn -% -% Initialisations des variables de la lettre -% -\def\pdate{\cejour}% -% -\def\emailnum{}% -% -\def\fromlocation{}% -\signum=0\relax -\def\fromsig{}% -\def\fromssig{}% -\def\fromtsig{}% -% -\csname\defaultlanguage\endcsname -\l@@info{Langage par defaut: \defaultlanguage} -\def\concdecl{}% -% -\marge{15mm}% -\msigwidth=\letterwidth -\ssigindent=0.5\letterwidth -\ssigwidth=\letterwidth - \advance\ssigwidth by -\ssigindent - \advance\ssigwidth by -5pt -\sigspace=1.5cm -\openingspace=1cm -\openingindent=0pt -% -\@lettertrue -\faxpage=0\relax -\def\totalpages{}% -% -\def\auxflag{}% -\auxcount=0\relax -\def\toref{}% -\def\fromref{}% -\def\telexnum{}% -\def\ccpnum{}% -% -\def\emailflag{}% -\emailcount=0\relax -\def\@username{}% -\def\ccittnum{}% -\def\internetnum{}% -\def\bitnetnum{}% -\def\telepacnum{}% -\def\decnetnum{}% -% -\def\bdp{}% -\endinput -%% -%% End of file `lettre.cls'. diff --git a/Master/texmf-dist/tex/latex/lettre/obs.ins b/Master/texmf-dist/tex/latex/lettre/obs.ins deleted file mode 100644 index 738c73dd9dc..00000000000 --- a/Master/texmf-dist/tex/latex/lettre/obs.ins +++ /dev/null @@ -1,79 +0,0 @@ -% This file is part of the "lettre" package. -% This package is distributed under the terms of the LaTeX Project -% Public License (LPPL) described in the file lppl.txt. -% -% Denis Mégevand - Observatoire de Genève. -% -% Ce fichier fait partie de la distribution du paquetage "lettre". -% Ce paquetage est distribué sous les termes de la licence publique -% du projet LaTeX (LPPL) décrite dans le fichier lppl.txt. -% -% **************************************** -% * DEFINITIONS LOCALES A L'OBS * -% **************************************** -% -%\input{graphicx.sty} % appele par la classe lettre -\newcommand{\trfam}{\fontencoding{T1}\fontfamily{ptm}\fontseries{m}% - \fontshape{n}} -\newcommand{\treit}{\trfam\fontsize{8}{10pt}\selectfont} -\newcommand{\trten}{\trfam\fontsize{10}{12pt}\selectfont} -\newcommand{\trfvtn}{\trfam\fontsize{15}{18pt}\selectfont} -\long\def\psobs{% - \l@@info{Entete officielle de l'Observatoire}% - \def\fromaddress{\centering - \vskip -5mm% - \if@letter - \treit RÉPUBLIQUE\\[-1mm]% - \treit ET CANTON DE GENÈVE\\[-1mm]% - \fi - \includegraphics[bb=-7 -7 55 65,totalheight=2.5cm]{ecusson55.ps}\par - \mbox{\hss\trfvtn OBSERVATOIRE DE GENÈVE\hss}\\[2mm]% - \if@letter - %\trten Ch. des Maillettes 51\\% - \fi - \if@detail - %\trten Ch. des Maillettes 51\\% - \fi - \trten CH-1290 SAUVERNY\\% - \if@letter - \trten Suisse - \fi - \if@detail - \trten Suisse - \fi}}% -\newcommand{\dhfam}{\fontencoding{T1}\fontfamily{cmdh}\fontseries{m}% - \fontshape{n}} -\newcommand{\cmd}{\dhfam\fontsize{10}{12pt}\selectfont} -\newcommand{\Cmd}{\dhfam\fontsize{12}{14pt}\selectfont} -\newcommand{\CMD}{\dhfam\fontsize{14}{17pt}\selectfont} -\long\def\addressobs{% - \def\fromaddress{\centering - \CMD OBSERVATOIRE DE GENÈVE\rule[6pt]{0pt}% - {1.0\baselineskip}\\[3mm]% - \cmd - \if@letter - %51, chemin des Maillettes\\% - \fi - \if@detail - %51, chemin des Maillettes\\% - \fi - CH-1290 Sauverny\\% - \if@letter - Suisse - \fi - \if@detail - Suisse - \fi}}% -% -\def\lieuobs{\def\fromlieu{Sauverny}}% -\def\telephoneobs{\def\telephonenum{+41 (22) 755 26 11}}% -\def\faxobs{\def\faxnum{+41 (22) 755 39 83}}% -\def\ccpobs{\ccp{12-2130-4}}% -\def\ccittobs{\l@@warning{L'adresse X400 de l'Observatoire (\string\ccittobs) ne doit plus être utilisée}}% -\def\internetobs{\internet{obs.unige.ch}}% -\def\ftpobs{{\tt obsftp.unige.ch \rm(129.194.65.3)}} -\def\wwwobs{{\tt http://obswww.unige.ch/ \rm(129.194.65.3)}} -% -\addressobs\lieuobs\telephoneobs\faxobs -\romand -%fin du fichier obs.ins -- cgit v1.2.3