home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / PROG / PASCAL / NRPAS13.ZIP / MODFILE.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1991-04-29  |  216 b   |  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.