move english latex doc out of texmf-doc

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

1 files changed, 131 insertions, 0 deletions

diff --git a/Master/texmf-dist/doc/latex/guide-to-latex/mpletter.cls b/Master/texmf-dist/doc/latex/guide-to-latex/mpletter.cls
new file mode 100644
index 00000000000..b9bb9e0bc49
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/guide-to-latex/mpletter.cls
@@ -0,0 +1,131 @@
+% MPLETTER.CLS as taken out of gtl-letters.tex 4th edition
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesClass{mpletter}
+\RequirePackage{ifthen}
+\newboolean{@german}
+\setboolean{@german}{false}
+\DeclareOption{german}{\setboolean{@german}{true}}
+\DeclareOption*{\PassOptionsToClass{\CurrentOption}{letter}}
+\ProcessOptions
+\LoadClass[a4paper]{letter}
+\newcommand{\englishnames}{%
+ \newcommand{\yrefname}{\textsl{Your Ref.}}
+ \newcommand{\ymailname}{\textsl{Your letter from}}
+ \newcommand{\myrefname}{\textsl{Our Ref.}}
+ \newcommand{\subjectname}{\textsl{Subject}}
+ \newcommand{\telephonename}{Telephone}
+ \newcommand{\stationname}{Train Station}
+ \newcommand{\germanname}{GERMANY}
+ \newcommand{\telcode}{[49]-5556-401}
+ \newcommand{\postcode}{D--37191}
+}
+
+\newcommand{\germannames}{%
+%. . . . . . . . . . . . . . . . . . . . .
+ \newcommand{\telcode}{(05556) 401}
+ \newcommand{\postcode}{37191}
+}
+
+\ifthenelse{\boolean{@german}}
+  {\RequirePackage{german}\germannames}{\englishnames}
+\newcommand{\@yref}{}     \newcommand{\@ymail}{}
+\newcommand{\@myref}{}    \newcommand{\@subject}{}
+\newcommand{\@internet}{}
+
+\newcommand{\yref}[1]{\renewcommand{\@yref}{\yrefname: #1}}
+\newcommand{\ymail}[1]{\renewcommand{\@ymail}{\ymailname: #1}}
+\newcommand{\myref}[1]{\renewcommand{\@myref}{\myrefname: #1}}
+\newcommand{\subject}[1]{\renewcommand{\@subject}
+                           {\subjectname: #1}}
+\newcommand{\internet}[1]{\renewcommand{\@internet}{#1}}
+\newcommand{\INTERNET}{@linmpi.mpg.de}
+\setlength{\textheight}{215mm}  \setlength{\textwidth}{160mm}
+\setlength{\oddsidemargin}{0pt} \setlength{\evensidemargin}{0pt}
+\setlength{\topmargin}{-20pt}   \setlength{\headheight}{12pt}
+\setlength{\headsep}{35pt}
+\DeclareFixedFont{\xviisf}{OT1}{cmss}{m}{n}{17}
+\DeclareFixedFont{\xsf}{OT1}{cmss}{m}{n}{10}
+\DeclareFixedFont{\viiisf}{OT1}{cmss}{m}{n}{8}
+\newlength{\leftfield}    \setlength{\leftfield}{117mm}
+\newlength{\rightfield}   \setlength{\rightfield}{43mm}
+\newsavebox{\FIRM}       \newsavebox{\firmaddress}
+\newsavebox{\firm}       \newsavebox{\firmreturn}
+
+\sbox{\FIRM}
+  {\parbox[t]{\leftfield}
+       {\xviisf MAX--PLANCK--INSTITUT F\"UR AERONOMIE}}
+
+\sbox{\firm}
+  {\xsf MAX--PLANCK--INSTITUT F\"UR AERONOMIE}
+
+\sbox{\firmreturn}
+  {\viiisf\underline{MPI f\"ur Aeronomie,
+                     \postcode{} Katlenburg--Lindau}}
+
+\sbox{\firmaddress}
+  {\parbox[t]{\rightfield}{\viiisf\baselineskip10pt
+    Max--Planck--Stra{\ss}e 2\\
+    \postcode{} Katlenburg--Lindau\\\germanname}}
+\newsavebox{\firmhead}   \newsavebox{\firmfoot}
+
+\sbox{\firmhead}
+  {\parbox{\textwidth}{\usebox{\FIRM}\raisebox{6pt}
+     {\usebox{\firmaddress}}\\[3pt] \rule{\textwidth}{1pt}}}
+
+\sbox{\firmfoot}
+  {\parbox{\textwidth}{\rule{\textwidth}{0.6pt}\\[5pt]
+     \viiisf\setlength{\baselineskip}{12pt}%
+    \begin{tabular}[t]{@{}ll}
+       \underline{\telephonename}  & \telcode-1\\
+       \underline{Telefax}         & \telcode-240\\
+       \underline{Telex}           & 9\,65\,527 aerli
+    \end{tabular}\hfill
+    \begin{tabular}[t]{l}
+       \underline{Bank}\\
+       Kreis--Sparkasse Northeim\\
+       41\,104\,449 (BLZ 262\,500\,01)
+    \end{tabular}\hfill
+    \begin{tabular}[t]{l@{}}
+       \underline{\stationname}\\
+       Northeim\\
+       (Han.)
+    \end{tabular} }}
+\renewcommand{\ps@firstpage}
+  {\setlength{\headheight}{41pt}\setlength{\headsep}{25pt}%
+   \renewcommand{\@oddhead}{\usebox{\firmhead}}%
+   \renewcommand{\@oddfoot}{\raisebox{-20pt}[0pt]
+                             {\usebox{\firmfoot}}}%
+   \renewcommand{\@evenhead}{}\renewcommand{\@evenfoot}{}}
+\renewcommand{\ps@headings}
+   {\setlength{\headheight}{41pt}%
+    \renewcommand{\@oddhead}
+       {\parbox{\textwidth}{\usebox{\firm}\\[5pt]
+          \slshape \headtoname{} \toname\hfill\@date\hfill
+                                     \pagename{} \thepage\\
+          \rule[3pt]{\textwidth}{1pt}}}
+    \renewcommand{\@oddfoot}{}
+    \renewcommand{\@evenhead}{\@oddhead}
+    \renewcommand{\@evenfoot}{\@oddfoot}}
+\providecommand{\@evenhead}{}\providecommand{\@oddhead}{}
+\providecommand{\@evenfoot}{}\providecommand{\@oddfoot}{}
+\pagestyle{headings}
+\renewcommand{\opening}[1]{\thispagestyle{firstpage}%
+  \parbox[t]{\leftfield}
+     {\usebox{\firmreturn}\\
+      \parbox[b][3.5cm][c]{\leftfield}{\toname\\\toaddress}}%
+  \parbox[t]{\rightfield}
+     {\fromname
+      \ifthenelse{\equal{\telephonenum}{}}
+         {}{\\ Tel.: \telcode-\telephonenum}
+      \ifthenelse{\equal{\@internet}{}}
+         {}{\\{\viiisf Email: \@internet\INTERNET}}
+      \\[5mm] \@date}
+  \par
+  \rule{\textwidth}{0.6pt}
+  \makebox[\leftfield][l]
+     {\ifthenelse{\equal{\@yref}{}}
+        {\@ymail}{\@yref\hfill\@ymail\hfill}}
+  \@myref\par
+  \ifthenelse{\equal{\@subject}{}}
+     {}{\@subject\par}
+  \vspace{2\parskip} #1 \par\nobreak}