STRE
	SGLB	Misc/Class Reference
		CLAS	350754
	ESBR
	SORD	2
		PORD	0	current state
		PORD	0	Toggle state
	ESBR
	SGLB	Output/#1
		LCON	 	/*+;Non-inverted Output
	ESBR
	SGLB	Output/#2
		LCON	 	/*+;Inverted Output
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354031
	ESBR
	SGLB	General/Initialize
		CMNT	 	Expects:  É ¥ inst/É
		GSYM	Logic/Initialize	É ¥ method/inst/É
		PRIM	Heap/Delegate to self
	ESBR
	SGLB	Logic/Set	/3t5,false,true;Set input
		CMNT	 	Expects:  É ¥ inst/data/É
		CALL	354063	É ¥ state/data/inst/É
		STRE
			SORD	0	false
				BRFL	 	branch if set=0
					PRIM	Heap/Store self
				BRTR
				LITO	1	É ¥ 1/inst/É
				CALL	354064	É ¥ inst/É
				LITO	3	É ¥ 3/inst/É
				CALL	354065
			ESBR
			SORD	1	true
				BRFL	 	branch if set=0
					PRIM	Heap/Store self
				BRTR
				LITO	3	É ¥ 3/inst/É
				CALL	354065
			ESBR
			SORD	2	reset
				BRFL	 	branch if set=0
					PRIM	Heap/Store self
				BRTR
				LITO	4	É ¥ 4/inst/É
				CALL	354065
			ESBR
			SORD	3	set
				BRFL	 	branch if set=0
					LITO	1	É ¥ 1/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
			SORD	4	contention
				BRFL	 	branch if set=0
					LITO	2	É ¥ 2/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
		ESTR
	ESBR
	SGLB	Logic/Reset	/3t5,false,true;Reset input
		CMNT	 	Expects:  É ¥ inst/data/É
		CALL	354063	É ¥ state/data/inst/É
		STRE
			SORD	0	false
				BRFL	 	branch if reset=0
					PRIM	Heap/Store self
				BRTR
				LITO	2	É ¥ 2/inst/É
				CALL	354065
			ESBR
			SORD	1	true
				BRFL	 	branch if reset=0
					PRIM	Heap/Store self
				BRTR
				LITO	0	É ¥ 0/inst/É
				CALL	354064	É ¥ inst/É
				LITO	2	É ¥ 2/inst/É
				CALL	354065
			ESBR
			SORD	2	reset
				BRFL	 	branch if reset=0
					LITO	0	É ¥ 0/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
			SORD	3	set
				BRFL	 	branch if reset=0
					PRIM	Heap/Store self
				BRTR
				LITO	0	É ¥ 0/inst/É
				CALL	354064	É ¥ inst/É
				LITO	4	É ¥ 4/inst/É
				CALL	354065
			ESBR
			SORD	4	contention
				BRFL	 	branch if reset=0
					LITO	1	É ¥ 1/inst/É
					CALL	354064	É ¥ inst/É
					LITO	3	É ¥ 3/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
		ESTR
	ESBR
	SGLB	Logic/Toggle	/3t5,false,true;Toggle input
		CMNT	 	Expects:  É ¥ inst/data/É
		LITO	2	É ¥ 2/inst/data/É
		LITO	2	É ¥ 2/2/inst/data/É
		PRIM	S_tree/Read	É ¥ last/inst/data/É
		PRIM	Stack/Xswap	É ¥ last/data/inst/É
		PRIM	Ordinal/Test equal	É ¥ rslt/data/inst/É
		BRFL	 	branch if not equal
			PRIM	Stack/Dup down	É ¥ data/inst/data/É
			LITO	2	É ¥ 2/data/inst/data/É
			LITO	2	É ¥ 2/2/data/inst/data/É
			PRIM	S_tree/Replace	É ¥ inst/data/É
			PRIM	Stack/Swap	É ¥ data/inst/É
			BRFL	 	branch if toggle=0
				PRIM	Heap/Store self
			BRTR
			LITO	1	É ¥ 1/inst/É
			LITO	2	É ¥ 2/1/inst/É
			PRIM	S_tree/Read	É ¥ state/inst/É
			STRE
				SORD	0	false
					LITO	1	É ¥ 1/inst/É
					CALL	354064	É ¥ inst/É
					LITO	1	É ¥ 1/inst/É
					CALL	354065
				ESBR
				SORD	1	true
					LITO	0	É ¥ 0/inst/É
					CALL	354064	É ¥ inst/É
					LITO	0	É ¥ 0/inst/É
					CALL	354065
				ESBR
				SORD	2	reset
					PRIM	Heap/Store self
				ESBR
				SORD	3	set
					PRIM	Heap/Store self
				ESBR
				SORD	4	contention
					PRIM	Heap/Store self
				ESBR
			ESTR
		BRTR
		PRIM	Stack/Drop	É ¥ inst/É
		PRIM	Heap/Store self
	ESBR
	SGLB	Logic/Get Output	/2e16,false,true,reset (false),set (true),contention (false)
	ESBR
ESTR