/********************************************************************/
/* Package  : TeXShell for CMS, version 2.0                         */
/* Author   : Humberto Jose' Bortolossi                             */
/*                                                                  */
/* Bitnet   : hjbortol at brlncc.bitnet, hjbortol at brfuem.bitnet  */
/* Internet : hjbortol at gauss.impa.br                             */
/*                                                                  */
/* Organizations : Instituto de Matematica Pura e Aplicada (IMPA)   */
/*                 Fundacao Universidade Estadual de Maringa'       */
/*                                                                  */
/* Copyright : This program is freely distributable.                */
/*             You can do changes but, please, keep my name.        */
/*                                                                  */
/* Description : Do a preview.                                      */
/*                                                                  */
/*                                               (C) Copyright 1992 */
/********************************************************************/
parse arg fm
'execio 1 diskr PRIMARY FILE' fm '(FINIS'
 pull fn ft .
 
say 'Voce poderia ver o seu arquivo no terminal somente'
say 'quando instalarem a versao nova do GDDM para nosso'
say "novo IBM. Verifique se isto ja' foi feito."
exit 0