% LETTER FORMAT FILE bth 4/1/87 \catcode`*=11 \raggedbottom % text height may vary from page to page \if*msp\defaultmono \let\titlefont=\defaultmono \let\twelvept=\defaultmono \let\tenpt=\defaultmono \let\rm=\defaultmono \fi % monospace check \newtoks\departmentname % department name for letterhead \newtoks\campuszip % zip code for letterhead \newtoks\campusphone % phone number for letterhead \newtoks\date % date token list \newif\if*postscript \*postscriptfalse % \def\STOP{\endgroup\par}% ends obeylines grouping % \def\BEGINADDRESS{\begingroup\parskip=0pt\parindent=0pt\obeylines}% \let\SALUTATION=\null \let\BODY=\STOP \def\CLOSING{\par\vs{\bl}\begingroup\parskip=0pt\parindent=0pt \obeylines}% \def\COPIES{\par\vs{\bl} \setbox0=\hbox{Copies:\quad}\parindent=\wd0 \nin Copies:\quad}% \def\ENCLOSURES#1{\par Enclosures:\quad #1}% sets enclosures text line \def\ENDLETTER{\par\endgroup}% stop any obeylines grouping % Default for the title (first) page \titlepageformat{\titleleadskip{0in} \titlefootline{} }% end title page format \def\letterhead{{\parskip=0pt \if*msp \cl{\titlefont Washington State University} \vs{\bl}\hrule\vs{\bl} \cl{\the\departmentname} \cl{Pullman, Washington\ \the\campuszip} \cl{\the\campusphone} \vs{1\bl} % number of blank lines inserted \nin\the\date % \else \cl{\titlefont Washington State University} \vs{4pt}\hrule\vs{6pt} \cl{\twelvept \the\departmentname} \cl{\tenpt Pullman, Washington\ \the\campuszip} \cl{\tenpt \the\campusphone} \vs{1\bl} % number of blank lines inserted \nin\the\date % \fi }}% end letterhead markup \catcode`*=12