/********************
* Program: ttfilter *
*********************

Program Function: Filter to replace '.' lines with blank lines andm '@'
                  lines with form feed characters from a tidytext file.
                  May be used prior to printing a previously tidied
                  'tidytext' fornat file which does not use underlining
                  or bold print options.

                  (Written for use with laue_install.utx to create the
                  LAUEINSTALL file for the anonymous ftp facility)

Author:           John W. Campbell, June 1992

*/

#include <stdio.h>

#define MAXLIN1  1001    /*Maximum allowed input line length + 1 */

main()
{
   char line[MAXLIN1];

   while (gets(line)!=0)
   {
      if (strlen(line)==0){puts(" ");continue;}
      switch (line[0])
      {
         case '@':
            puts("\f");
            break;
         case '.':
            puts(" ");
            break;
         default:
            puts(line);
       }
   }
   exit(0);
}