MODULE GPText; IMPORT GPTextFiles, Console; PROCEDURE WriteLn*(p0 : GPTextFiles.FILE); PROCEDURE WriteFiller*( p0 : GPTextFiles.FILE; IN p1 : ARRAY OF CHAR; p2 : CHAR; p3 : INTEGER); PROCEDURE WriteInt*(p0 : GPTextFiles.FILE; p1 : INTEGER; p2 : INTEGER); PROCEDURE WriteString*( p0 : GPTextFiles.FILE; IN p1 : ARRAY OF CHAR); PROCEDURE WriteLong*(p0 : GPTextFiles.FILE; p1 : LONGINT; p2 : INTEGER); PROCEDURE Assign*(IN p0 : ARRAY OF CHAR; OUT p1 : ARRAY OF CHAR); PROCEDURE LongToStr*( p0 : LONGINT; OUT p1 : ARRAY OF CHAR); PROCEDURE Write*(p0 : GPTextFiles.FILE; p1 : CHAR); PROCEDURE IntToStr*( p0 : INTEGER; OUT p1 : ARRAY OF CHAR); END GPText.