Power-Programmierung/CD1.mdf/pascal/library/dos/math/nr/modfile.pas

Pascal/Delphi Source File | 1991-04-29 | 216 b | 5 lines

    TYPE double = real; char12 = string[12];
    FUNCTION sngl(x:real):real; BEGIN sngl := x END;
    PROCEDURE glopen(VAR infile:text; filename:char12);
        BEGIN assign(infile,filename); reset(infile) END;