perm filename X.SAI[LSP,BGB]1 blob sn#001394 filedate 1972-11-05 generic text, type T, neo UTF8
00100	BEGIN "X"
00200		REQUIRE "LISP" LOAD_MODULE;
00300		EXTERNAL PROCEDURE LISP(INTEGER SIZ);
00500	
00600		INTERNAL SIMPLE PROCEDURE QQ (INTEGER I,J);
00700		OUTSTR(13&10&9&CVS(I)&9&CVS(J)&CVS(I*J)&13&10);
00800		LISP(9000);
00900	END "X";