COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	BEGIN "T"
C00003 ENDMK
C⊗;
BEGIN "T"
RECURSIVE INTEGER PROCEDURE FOO (INTEGER GEE);
BEGIN "FOO"

INTEGER X,Y,Z;
BLAT;
X←Y←Z←100;
X←FOO(Y)
RETURN(X+Y);
END "FOO"

FOO(2);


END"T"