<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">% LETTER
% 
% This macro can be used to format text for sending letters. The
% format of your output would appear as follows:
% 
% &lt;To Name&gt;                                          &lt;Date/time&gt;
% &lt;continued to address&gt;
% 
%                             .
%                             .
%                        body of letter
%                             .
%                             .
% 
%                                      &lt;From/Sincerely/whatever&gt;
%                                      &lt;room for signature&gt;
%                                      &lt;From name&gt;
% 
% &lt;From initials/sect. inits&gt;
% &lt;any cc:s&gt;
% &lt;Any P.S.s&gt;
% 
% To use this format, put the line
%       \input letter
% at the top of your file. The following are the symbols that may be
% used with this macro:
% 
% \address - This should be followed by the "to" name enclosed
%            in curly brackets. The following line should start
%            with an open curly bracket followed by the address
%            of the "to" name followed by a close curly bracket.
%            For example...
%                               \address
%                               {Dana Zirin}
%                               {Caltech
%                               Mail Station 264-33
%                               Pasadena, CA 91125}
% 
% \body    - This should be used after the \address to separate
%            the address from the body of the letter.
% 
% \closing - This should be followed by the "nicety" ending
%            enclosed in curly brackets followed by the ending
%            name and title enclosed in curly brackets as well.
%            For example...
%                               \closing
%                               {Yours Truely,}
%                               {Dan Zirin
%                               Systems Manager}
% 
% \annotations - This is used to start any annotations you may
%            wish to include. For example...
%                               \annotations
%                               DMZ/TeX
%                               cc: William A. Goddard III
% 
% \ps      - This should be used before starting any post scripts.
% 
% \endletter - Used to terminate the letter.
%
% (From The TeXbook)
\parindent=0pt
\parskip=0pt
\interlinepenalty=1000
\nopagenumbers
\raggedbottom
\def\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}
\headline={\ifnum\pageno&gt;1\rm To \addressee\hfil\today\hfil Page \folio
    \else\hfil\fi}
\def\beginlinemode{\endmode\begingroup\obeylines\def\endmode{\par\endgroup}}
\def\beginparmode{\endmode\begingroup\parskip=\medskipamount\def\endmode{
    \par\endgroup}}
\let\endmode=\par
\def\endletter{\endmode\vfill\supereject\end}
\newdimen\longindentation\longindentation=4truein
\newbox\theaddress
\def\address{\beginlinemode\getaddress}
{\obeylines\gdef\getaddress#1#2{\line{#1\hfil\today}\gdef\addressee{#2}%
\global\setbox\theaddress=\vbox\bgroup\raggedright%
\hsize=\longindentation\everypar{\hangindent2em}#2
\def\endmode{\egroup\endgroup\copy\theaddress\bigskip}}}
\def\body{\beginparmode}
\def\closing{\beginlinemode\getclosing}
{\obeylines\gdef\getclosing#1#2{#1\nobreak\bigskip\leftskip=\longindentation #2
\nobreak\bigskip\bigskip\bigskip\def
{\endgraf\nobreak}}}
\def\annotations{\beginlinemode\def\par{\endgraf\nobreak}\obeylines\par}
\def\ps{\beginparmode\nobreak\interlinepenalty5000\def\par{\endgraf%
\penalty5000}}
</pre></body></html>