COMMENT ⊗   VALID 00005 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	
C00003 00003
C00006 00004
C00008 00005
C00009 ENDMK
C⊗;

	1) FOO2 vs. 2) FOO2[S,AIL]	SRCCOM	08-13-76	10:59	PAGES 1,1

******** FOO2 **** PAGE 1  LINE 5
1)	C00017 00003	TTYIN		STRING		OWN+BILTIN	2 0 4
1)	C00027 00004	INDEXFILE	INTEGR	OWN	1 0 3
1)	C00040 ENDMK
1)	C⊗;
*** FOO2[S,AIL] *** PAGE 1  LINE 5
2)	C00018 00003	TTYIN		STRING		OWN+BILTIN	2 0 4
2)	C00029 00004	INDEXFILE	INTEGR	OWN	1 0 3
2)	C00042 ENDMK
2)	C⊗;


******** FOO2 **** PAGE 2  LINE 8
1)	NOSTANFORD NOCMU NOTENX NOIMSSS
1)	FALSECONDITIONALS[ STANFORD CMU TENX IMSSS]
1)	<ASSIGN>
*** FOO2[S,AIL] *** PAGE 2  LINE 8
2)	STANFORD NOCMU NOTENX NOIMSSS
2)	FALSECONDITIONALS[ NOSTANFORD CMU TENX IMSSS]
2)	<ASSIGN>


******** FOO2 **** PAGE 2  LINE 149
1)	RELEASE		UNTYPE		OWN+BILTIN	2 0 2
*** FOO2[S,AIL] *** PAGE 2  LINE 149
2)	SCANC		STRING		OWN+CONOK X4 4 2
2)	VALSTR	(ARGIN)		STRING		VALUE
2)	VALSTR	(BRK)		STRING		VALUE
2)	VALSTR	(OMIT)		STRING		VALUE
2)	VALSTR	(MODE)		STRING		VALUE
2)	RELEASE		UNTYPE		OWN+BILTIN	2 0 2


******** FOO2 **** PAGE 2  LINE 215
1)	RENAME		UNTYPE		OWN+BILTIN	4 1 3
*** FOO2[S,AIL] *** PAGE 2  LINE 221
2)	TYMSHARE[
2)	AUXCLV		INTEGR		OWN		3 0 4
2)	VALINT (PORT)		INTEGR		VALUE
2)	VALINT (ARGUMENT)	INTEGR		VALUE
2)	VALINT (FUNCTION)	INTEGR		VALUE
2)	AUXCLR		INTEGR		OWN		3 0 4
2)	VALINT (PORT)		INTEGR		VALUE
2)	REFINT (ARGUMENT)	INTEGR		REFRNC
2)	VALINT (FUNCTION)	INTEGR		VALUE
2)	IONEOU		UNTYPE		OWN		1 0 4
2)	VALINT (CHARACTER)	INTEGR		VALUE
2)	CHNIOV		INTEGR		OWN		3 0 3

	1) FOO2 vs. 2) FOO2[S,AIL]	SRCCOM	08-13-76	10:59	PAGES 2,2

2)	VALINT (CHANNEL)	INTEGR		VALUE
2)	VALINT (ARGUMENT)	INTEGR		VALUE
2)	VALINT (FUNCTION)	INTEGR		VALUE
2)	CHNIOR		INTEGR		OWN		3 0 3
2)	VALINT (CHANNEL)	INTEGR		VALUE
2)	REFINT (ARGUMENT)	INTEGR		REFRNC
2)	VALINT (FUNCTION)	INTEGR		VALUE
2)	CALLI		INTEGR		OWN		2 0 4
2)	VALINT	(INPUT-VAL)	INTEGR		VALUE
2)	VALINT	(INPUT-CALLINUM) INTEGR	VALUE
2)	]
2)	RENAME		UNTYPE		OWN+BILTIN	4 1 3


******** FOO2 **** PAGE 3  LINE 32
1)	]
*** FOO2[S,AIL] *** PAGE 3  LINE 33
2)	TMPIN		STRING		OWN		2 1 3
2)	VALSTR (FID)	STRING	VALUE
2)	REFINT (FLAG)	INTEGR	REFRNC
2)	TMPOUT		UNTYPE		OWN		3 2 3
2)	VALSTR (FID)	STRING	VALUE
2)	VALSTR (STR)	STRING	VALUE
2)	REFINT (FLAG)	INTEGR	REFRNC
2)	]


******** FOO2 **** PAGE 3  LINE 89
1)	INTMOD		UNTYPE		OWN		0 0 5
1)	]
*** FOO2[S,AIL] *** PAGE 3  LINE 96
2)	NOTYMSHARE[
2)	INTMOD		UNTYPE		OWN		0 0 5
2)	]
2)	]


******** FOO2 **** PAGE 4  LINE 45
1)	OPENF	UNTYPE	OWN	2 0 2
*** FOO2[S,AIL] *** PAGE 4  LINE 45
2)	JFNSL	STRING	OWN	3 0 2
2)	VALINT  (CHAN)	INTEGR	VALUE
2)	VALINT  (FLAGS)	INTEGR	VALUE
2)	VALINT  (LHFLG)	INTEGR	VALUE
2)	OPENF	UNTYPE	OWN	2 0 2


******** FOO2 **** PAGE 4  LINE 247

	1) FOO2 vs. 2) FOO2[S,AIL]	SRCCOM	08-13-76	10:59	PAGES 4,4

1)	KPSITIME	UNTYPE	OWN	1 0 5
*** FOO2[S,AIL] *** PAGE 4  LINE 252
2)	RDSEG		UNTYPE	OWN	2 0 0
2)	REFINT	(SEG)	INTEGR	REFRNC
2)	REFINT	(BUF)	INTEGR	REFRNC
2)	KPSITIME	UNTYPE	OWN	1 0 5