 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%% initex-me.tex %
 %%  TeX entry point for fe-format-dumper-cm directory
 %%  L. Siebenmann, 2-93
 %%  Documentation in fe-dump.doc
 %%  Master posting: ftp  matups.matups.fr

  \catcode`\{=1 \catcode`\}=2
  \catcode9=10\relax% tab is space
  \begingroup\def\space{ }
  \catcode`\/=13\def/{\space\space}
  \immediate\write16{} 
  \immediate\write16{ 
  **** fe-format-dumper-cm directs format compilation for}
  \immediate\write16{ 
  **** French-English formats under initex (virtex for some).}
  \immediate\write16{ 
  **** Read fe-dump.doc for instruction if use unclear.}
  \immediate\write16{ 
  *** Type /abort/ when a file is missing.}
  \immediate\write16{ 
  ** Hit return here to exit.}
  \immediate\write16{ 
  * Hit  /p/ and return for Plain TeX.}
  \immediate\write16{ 
  * Hit (lower case)  /l/  and return for LaTeX.}
  \immediate\write16{ 
  * Hit  /a/ and return for AmSTeX.}
  \immediate\write16{ 
  * Hit  /lam/  and return for LamsTeX.}
  \endgroup
  \read16 to \YourChoice
 %
 %%% Exit
  \def\temp{\par}
  \ifx\YourChoice\temp\expandafter\end\fi 
 %%% Plain
  \def\temp{p }\def\Temp{\input fe-plain.dmp}
  \ifx\YourChoice\temp\expandafter\Temp\fi
 %%% LateX
  \def\temp{l }\def\Temp{\input fe-latex.dmp}
  \ifx\YourChoice\temp\expandafter\Temp\fi
 %%% AmSteX
  \def\temp{a }\def\Temp{\input fe-ams.dmp}
  \ifx\YourChoice\temp\expandafter\Temp\fi
 %%% LamsteX
  \def\temp{lam }\def\Temp{\input fe-lams.dmp}
  \ifx\YourChoice\temp\expandafter\Temp\fi
 %
 \catcode`\/=13\def\space{ }\def/{\space\space}
 \immediate\write16{ 
    Sorry, /\string \YourChoice/:/
    \meaning\YourChoice/ is not an option.}
 \immediate\write16{}   
 \end

