00100 BEGIN "X"
00200 REQUIRE "SAITRG[SYS,BGB]" SOURCE_FILE;
00210 REQUIRE "SALISP[SYS,BGB]" LOAD_MODULE;
00220 INTEGER PROCEDURE HI;BEGIN OUTSTR(" HI LOSERS !!");RETURN(0);END;
00300 EXTERNAL PROCEDURE LISP(INTEGER SIZ);
00400 LISP(9000);
00500 END "X";