\font\smallheadfont=cmr10 at 10truept
\font\medheadfont=cmr10 at 10truept % would prefer cmr7
\font\logofont=cmdunh10 at 17.28truept
\font\tinylogofont=cmdunh10 at 12truept
\font\smlogofont=cmdunh10 at 14.4truept
\font\tenrm=cmr10 at 10truept
\newdimen\longindent  \longindent=4.40truein
\newdimen\rblockindent	\rblockindent=4.40truein

\def\beginlinemode{\endmode
	\begingroup\obeylines\def\endmode{\par\endgroup}}
\let\endmode=\par
\def\up#1{\leavevmode \raise.16ex\hbox{#1}}
\def\returnaddress{ Michael S. Pilant \par
		    Prof. of Mathematics, \par
			\qquad Aerospace Engineering, and \par
			\qquad Computer Science \par
			Assoc. Director Institute\par
			\qquad For Scientific Computation\par
		    TEL:(409)-845-5631 \par
		    E-MAIL:mpilant@math.tamu.edu \par
		    FAX:(409)-845-6028 \par
}

\def\bothreturnaddress{ Michael S. Pilant \par
			William Rundell\par
		    Departments of Mathematics and \par
			Computer Science \par
		    TEL:(409)-845-3261 \par
		    E-MAIL:mpilant@math.tamu.edu \par
		    FAX:(409)-845-6028 \par
}

\def\tamuletterhead{
\line{\hfill}
\vskip-0.6true in plus 0.1true in minus 0.1true in
\hbox{
\hbox to\longindent{
{\logofont Texas }{\smlogofont A}{\tinylogofont\&}{\smlogofont M}
{\logofont University}\hfil}%
\kern-\longindent
   \vbox{
		\smallheadfont\baselineskip=12truept \parskip=0pt
      	\leftskip=\rblockindent 
%		{\medheadfont Department of Mathematics} \par
	    {\smallheadfont College Station,\ \thinspace Texas 77843} 
		}
     }
\vskip3truept\hrule\vskip4truept
}

\def\letterhead{
\line{\hfill}
\vskip-0.6true in plus 0.1true in minus 0.1true in
\hbox{\hbox to\longindent{
{\logofont Texas }{\smlogofont A}{\tinylogofont\&}{\smlogofont M}
{\logofont University}\hfil}%
\kern-\longindent
   \vbox{\smallheadfont\baselineskip=12truept \parskip=0pt
      \leftskip=\rblockindent {\medheadfont Department of Mathematics} \par
	      {\smallheadfont College Station,\ \thinspace Texas 77843--3368} }
     }
\vskip3truept\hrule\vskip4truept
}

\def\boxit#1#2{\vbox{\hrule\hbox{\vrule\kern#2pt
		\vbox{\kern#2pt #1\kern#2pt}\kern#2pt\vrule}\hrule}}

\def\boxletterhead{
\setbox1=\vbox{
\centerline{
	{\logofont Texas }{\smlogofont A}{\tinylogofont\&}{\smlogofont M}
	{\logofont University}
}
\centerline{\medheadfont Department of Mathematics}
\centerline{\smallheadfont College Station,\ \thinspace Texas 77843--3368}
}
\boxit{\copy1}{1}
}

\def\bothletterhead{
    \vbox{ \baselineskip=11truept \parskip=0pt\tenrm
     \leftskip=\rblockindent \bothreturnaddress
     }
     \vskip15truept plus 5true pt minus 3true pt
}

\def\pletterhead{
    \vbox{ \baselineskip=11truept \parskip=0pt\tenrm
     \leftskip=\rblockindent \returnaddress
     }
     \vskip15truept plus 5true pt minus 3true pt
}

\def\thedate{
  \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
}
\def\today{
\vskip 13pt plus 8pt minus 6pt
\vbox{\leftskip=\longindent \thedate }
}

\def\address#1{ \noindent{\obeylines\parskip=0pt
#1
}}

\def\FullSig{{
\nobreak
\vskip 16pt plus 5pt minus 4pt
\bigskip
\vbox{
\vbox{\leftskip=\longindent Sincerely yours, }
\vskip 30pt plus 10pt minus 5pt
\nobreak
\vbox{\leftskip=\longindent  \parskip=0pt 
			Michael S. Pilant \par
		    Prof. of Mathematics, \par
			\qquad Aerospace Engineering, and \par
			\qquad Computer Science \par
			Assoc. Director Institute\par
			\qquad For Scientific Computation\par}
}}
}

\def\Sig{{
\nobreak
\vskip 16pt plus 5pt minus 4pt
\bigskip
\vbox{
\vbox{\leftskip=\longindent Sincerely yours, }
\vskip 30pt plus 10pt minus 5pt
\nobreak
\vbox{\leftskip=\longindent Michael S. Pilant }
}}
}

\def\bothsig{{
\nobreak
\vskip 16pt plus 5pt minus 4pt
\bigskip
\vbox{
\vbox{\leftskip=\longindent Sincerely yours, }
\vskip 30pt plus 10pt minus 5pt
\nobreak
\vbox{\leftskip=\longindent Michael Pilant }
\vskip 30pt plus 10pt minus 5pt
\nobreak
\vbox{\leftskip=\longindent William Rundell }
}}
}

\global\def\firstpage{\voffset=-0.0true in \vsize=9.0true in }
\global\def\otherpage{\voffset=0.0true in \vsize=9.0true in }
{\ifnum\pageno>1 \otherpage \else \firstpage \fi }
%\headline={\ifnum\pageno>1
%	  \tenrm\thedate\hfil Page \folio
%	  \else\hfil \fi }
\nopagenumbers
\parindent=0pt
\parskip=4pt plus 1pt minus 1pt
%\voffset=20pt
\advance\vsize by -\voffset