STRE	 	Prototype
	SGLB	Misc/Class Reference
		CLAS	354153
	ESBR
	SORD	2
		LITO	1	/o,1,255;No input event
		LITO	1	/o,1,255;Input #1 event
		LITO	2	/o,1,255;Input #2 event
		LITO	3	/o,1,255;Input #3 event
		LITO	4	/o,1,255;Input #4 event
		LITO	5	/o,1,255;Input #5 event
		LITO	6	/o,1,255;Input #6 event
	ESBR
	SORD	3
		LITO	0	current output
		LITO	0	input #6
		LITO	0	input #5
		LITO	0	input #4
		LITO	0	input #3
		LITO	0	input #2
		LITO	0	input #1
	ESBR
	SGLB	Output/#1
		LCON	 	/*+;Output
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354008
	ESBR
	SGLB	General/Initialize
		CMNT	 	Expects:  É ¥ inst/É
		LITO	1	É ¥ 1/inst/É
		LITO	2	É ¥ 2/1/inst/É
		PRIM	S_tree/Read	É ¥ legend/inst/É
		PRIM	Stack/Dup down	É ¥ legend/inst/legend/É
		LITO	1	É ¥ 1/legend/inst/legend/É
		LITO	3	É ¥ 3/1/legend/inst/legend/É
		PRIM	S_tree/Replace	É ¥ inst/legend/É
		PRIM	Stack/Swap	É ¥ legend/inst/É
		GSYM	Output/#1	É ¥ #1/legend/inst/É
		CALL	354024	É ¥ inst/É
		PRIM	Heap/Store self
	ESBR
	SGLB	FSM/Input 1	/3t5,false,true;Select...
		CMNT	 	Expects:  É ¥ inst/arg/É
		LITO	7	É ¥ 2/inst/arg/É
		LCAL	DoIt
	ESBR
	SGLB	FSM/Input 2	/3t5,false,true;Select...
		CMNT	 	Expects:  É ¥ inst/arg/É
		LITO	6	É ¥ 2/inst/arg/É
		LCAL	DoIt
	ESBR
	SGLB	FSM/Input 3	/3t5,false,true;Select...
		CMNT	 	Expects:  É ¥ inst/arg/É
		LITO	5	É ¥ 2/inst/arg/É
		LCAL	DoIt
	ESBR
	SGLB	FSM/Input 4	/3t5,false,true;Select...
		CMNT	 	Expects:  É ¥ inst/arg/É
		LITO	4	É ¥ 2/inst/arg/É
		LCAL	DoIt
	ESBR
	SGLB	FSM/Input 5	/3t5,false,true;Select...
		CMNT	 	Expects:  É ¥ inst/arg/É
		LITO	3	É ¥ 2/inst/arg/É
		LCAL	DoIt
	ESBR
	SGLB	FSM/Input 6	/3t5,false,true;Select...
		CMNT	 	Expects:  É ¥ inst/arg/É
		LITO	2	É ¥ 2/inst/arg/É
		LCAL	DoIt
	ESBR
	SGLB	FSM/Get Input 1	/2t4,false,true
		LITO	7
		CALL	354074
	ESBR
	SGLB	FSM/Get Input 2	/2t4,false,true
		LITO	6
		CALL	354074
	ESBR
	SGLB	FSM/Get Input 3	/2t4,false,true
		LITO	5
		CALL	354074
	ESBR
	SGLB	FSM/Get Input 4	/2t4,false,true
		LITO	4
		CALL	354074
	ESBR
	SGLB	FSM/Get Input 5	/2t4,false,true
		LITO	3
		CALL	354074
	ESBR
	SGLB	FSM/Get Input 6	/2t4,false,true
		LITO	2
		CALL	354074
	ESBR
	SGLB	FSM/Get Output	/2u2
		LITO	1
		CALL	354074
	ESBR
ESTR
LDEF	DoIt
	CMNT	 	Stores the input and sends a new output (if necessary)
	CMNT	 	Input:  É ¥ ref/inst/arg/É
	CMNT	 	Output:  É ¥ É
	PRIM	Stack/Dup to aux	É/ref ¥ ref/inst/arg/É
	LITO	3	É/ref ¥ 3/ref/inst/arg/É
	PRIM	S_tree/Read	É/ref ¥ current/inst/arg/É
	PRIM	Stack/Xswap	É/ref ¥ current/arg/inst/É
	PRIM	Ordinal/Test equal	É/ref ¥ rslt/arg/inst/É
	BRFL	 	branch if change
		PRIM	Stack/Push from aux	É ¥ ref/arg/inst/É
		LITO	3	É ¥ 3/ref/arg/inst/É
		PRIM	S_tree/Replace	É ¥ inst/É
		LITO	3	É ¥ 3/inst/É
		CALL	354148	É ¥ in1/in2/in3/in4/in5/in6/out/inst/É
		BRFL	 	branch if input 1 false
			BRFL	 	branch if input 2 false
				BRFL	 	branch if input 3 false
					BRFL	 	branch if input 4 false
						BRFL	 	branch if input 5 false
							BRFL	 	branch if input 6 false
								LITO	1	É ¥ 1/out/inst/É
								LCAL	EndIt
							BRTR
							LITO	7	É ¥ 7/out/inst/É
							LCAL	EndIt
						BRTR
						PRIM	Stack/Drop	É ¥ out/inst/É
						LITO	6	É ¥ 6/out/inst/É
						LCAL	EndIt
					BRTR
					PRIM	Stack/Drop	É ¥ in6/out/inst/É
					PRIM	Stack/Drop	É ¥ out/inst/É
					LITO	5	É ¥ 5/out/inst/É
					LCAL	EndIt
				BRTR
				PRIM	Stack/Drop	É ¥ in5/in6/out/inst/É
				PRIM	Stack/Drop	É ¥ in6/out/inst/É
				PRIM	Stack/Drop	É ¥ out/inst/É
				LITO	4	É ¥ 4/out/inst/É
				LCAL	EndIt
			BRTR
			PRIM	Stack/Drop	É ¥ in4/in5/in6/out/inst/É
			PRIM	Stack/Drop	É ¥ in5/in6/out/inst/É
			PRIM	Stack/Drop	É ¥ in6/out/inst/É
			PRIM	Stack/Drop	É ¥ out/inst/É
			LITO	3	É ¥ 3/out/inst/É
			LCAL	EndIt
		BRTR
		PRIM	Stack/Drop	É ¥ in3/in4/in5/in6/out/inst/É
		PRIM	Stack/Drop	É ¥ in4/in5/in6/out/inst/É
		PRIM	Stack/Drop	É ¥ in5/in6/out/inst/É
		PRIM	Stack/Drop	É ¥ in6/out/inst/É
		PRIM	Stack/Drop	É ¥ out/inst/É
		LITO	2	É ¥ 2/out/inst/É
		LCAL	EndIt
	BRTR
	PRIM	Stack/Drop	É/ref ¥ inst/É
	PRIM	Stack/Drop from aux	É ¥ inst/É
	PRIM	Heap/Store self
EDEF
LDEF	EndIt
	CMNT	 	Stores the input and sends a new output (if necessary)
	CMNT	 	Input:  É ¥ ref/out/inst/É
	CMNT	 	Output:  É ¥ É
	PRIM	Stack/Xswap	É ¥ ref/inst/out/É
	LITO	2	É ¥ 2/ref/inst/out/É
	PRIM	S_tree/Read	É ¥ new/inst/out/É
	PRIM	Stack/Rotate down	É ¥ out/new/inst/É
	PRIM	Ordinal/Test equal	É ¥ rslt/new/inst/É
	BRFL	 	branch if not equal
		PRIM	Stack/Dup down	É ¥ new/inst/new/É
		LITO	1	É ¥ 1/new/inst/new/É
		LITO	3	É ¥ 3/1/new/inst/new/É
		PRIM	S_tree/Replace	É ¥ inst/new/É
		PRIM	Stack/Swap	É ¥ new/inst/É
		GSYM	Output/#1	É ¥ #1/new/inst/É
		CALL	354024	É ¥ inst/É
		PRIM	Heap/Store self
	BRTR
	PRIM	Stack/Drop	É ¥ inst/É
	PRIM	Heap/Store self
EDEF