home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / PASCAL / NRPAS13.ZIP / MODFILE.PAS < prev    next >
Pascal/Delphi Source File  |  1991-04-29  |  216b  |  5 lines
  1.     TYPE double = real; char12 = string[12];
  2.     FUNCTION sngl(x:real):real; BEGIN sngl := x END;
  3.     PROCEDURE glopen(VAR infile:text; filename:char12);
  4.         BEGIN assign(infile,filename); reset(infile) END;
  5.