% -*- Mode:Text -*- 
\documentstyle{book}

\input pack10.sty
\input packchapter.sty
\input sorspath

 \def\drip#1{}
 \def\inputfile{\edef\CS{\expandafter\string\csname\currentinputfile\endcsname}\expandafter\drip\CS}


\def\runninghead{\relax
	{\em \step{} Technical Reference}\par
	{\tt\sourcepath/\inputfile}\par
	DRAFT, \today}
\input notecomm
\input cam8spec

\makeatletter
%\def\@input#1{\openin1 #1\gdef\currentinput{#1} \ifeof1 \typeout
\def\@input#1{\openin1 #1\def\currentinputfile{#1} \ifeof1 \typeout
  {No file #1.}\else\closein1 \relax\@@input #1 \fi}
\makeatother



\input psfig
%\psdraft

\includeonly{_host}

\newsavebox{\toy}

\begin{document}

\include{_host}

{\tt\inputfile}

\end{document}
