INSFL.MAC;3/AU/-BF=[12,10]INSFL.MAC;2
-2,2,/;SLJ.1/
	.IDENT	/13.04A/
-56,,/;SLJ.1/
;	S.L. JOBES	07-MAR-84	MAYO CLINIC, ROCHESTER, MN
;		SLJ.1  -- ALLOW #TASK LIKE $TASK ONLY MEMBER IS 1
;			  GREATER THAN <SYSUIC> & <LIBUIC>,
;			  TYPICALLY [1,55] & [3,55]
-91,,/;SLJ.1/
	NUM =	40		; #TASK NAME SEEN
-236,,/;SLJ.1/
	CMPB	R1,#'#		; SPECIAL USER DIRECTORY ?
	BNE	121$		; IF NE NO
	BIS	#NUM, FLAG	; SAY WE HAVE SEEN #TASK
	BR	15$		; YES
-276,,/;SLJ.1/
	BIT	#NUM, FLAG	; WAS IT SPECIAL DIRECTORY ?
	BEQ	161$		; IF EQ NO
	INCB	R1		; YES, INC MEMBER
161$:
/