don't throw away float <-> double conversions for FORTRAN.

[unix-history] / usr / src / old / lib2648 / cleara.c

/*      cleara.c        4.1     83/03/09        */

#include "2648.h"

cleara()
{
       sync();
       escseq(NONE);
       outstr("\33H\33J");
}