perm filename HEAD[USE,CSR] blob sn#608186 filedate 1981-08-21 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	REQUIRE "MACRO.SAI[l,ima]" SOURCE_FILE
C00004 ENDMK
CāŠ—;
REQUIRE "MACRO.SAI[l,ima]" SOURCE_FILE;
REQUIRE "HAX.REL[l,ima]" LOAD_MODULE;
EXTERNAL INTEGER INCH,OUCH,BRK,EOF,INLF,INFF;	! INPUT/OUTPUT GLOBALS;

EXTERNAL PROC PREP0;	REQUIRE PREP0 INITIALIZATION;
STRING EXTERNAL PROC ASK(STRING S);
EXTERNAL PROC OOPS(STRING MESS);
STRING EXTERNAL PROC LOOK(STRING FILE);
STRING EXTERNAL PROC LOOKout(STRING FILE);
STRING EXTERNAL PROC LOOKon(STRING FILE);
BOOLEAN EXTERNAL PROC ENT(STRING FILE);
BOOLEAN EXTERNAL PROC ENTout(STRING FILE);
BOOLEAN EXTERNAL PROC ENTon(STRING FILE);
STRING EXTERNAL PROC LEFT(INTEGER L; STRING S);
STRING EXTERNAL PROC RIGHT(INTEGER L; STRING S);
STRING EXTERNAL PROC CENTER(INTEGER L; STRING S);
external procedure BAIL;