STRE	 	Prototype
	SGLB	Misc/Class Reference
		CLAS	354156
	ESBR
	SORD	2
		LITO	0	input
		LITO	0	/e,false-to-true,true-to-false,both;Which edge
	ESBR
	SGLB	Output/#1
		LCON	 	/*+;Non-inverted Output
	ESBR
	SGLB	Output/#2
		LCON	 	/*+;Inverted Output
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354008
	ESBR
	SGLB	General/Initialize
		CMNT	 	Expects:  É ¥ inst/É
		LITO	0	É ¥ 0/inst/É
		GSYM	Output/#1	É ¥ #1/0/inst/É
		PRIM	Misc/Send entry	É ¥ inst/É
		LITO	1	É ¥ 1/inst/É
		GSYM	Output/#2	É ¥ #2/1/inst/É
		PRIM	Misc/Send entry	É ¥ inst/É
		PRIM	Heap/Store self
	ESBR
	SGLB	Logic/Input	/3t5,false,true;Select...
		CMNT	 	Expects:  É ¥ inst/arg/É
		LITO	1	É ¥ 1/inst/arg/É
		LITO	2	É ¥ 2/1/inst/arg/É
		PRIM	S_tree/Read	É ¥ old/inst/arg/É
		PRIM	Stack/Rotate down	É ¥ arg/old/inst/É
		BRFL	 	branch if new is false
			BRFL	 	branch if old was false
				PRIM	Heap/Store self
			BRTR
			CMNT	 	negative edge!
			LITO	0	É ¥ 0/inst/É
			LCAL	DoIt
		BRTR
		BRFL	 	branch if old was false
			CMNT	 	positive edge!
			LITO	1	É ¥ 1/inst/É
			LCAL	DoIt
		BRTR
		PRIM	Heap/Store self
	ESBR
	SGLB	Logic/Get Input	/2t4,false,true
		LITO	1
		CALL	354072
	ESBR
ESTR
LDEF	DoIt
	CMNT	 	sends the outputs if nesc.
	CMNT	 	Input:  É ¥ input/inst/É
	CMNT	 	Output:  É ¥ É
	PRIM	Stack/Dup down	É ¥ input/inst/input/É
	LITO	1	É ¥ 1/input/inst/input/É
	LITO	2	É ¥ 2/1/input/inst/input/É
	PRIM	S_tree/Replace	É ¥ inst/input/É
	LITO	2	É ¥ 2/inst/input/É
	LITO	2	É ¥ 2/2/inst/input/É
	PRIM	S_tree/Read	É ¥ type/inst/input/É
	PRIM	Stack/Xswap	É ¥ type/input/inst/É
	STRE	 	type s-tree
		SORD	0	false-to-true
			BRFL	 	branch if true-to-false edge
				PRIM	Heap/Store self
			BRTR
			LCAL	Send
		ESBR
		SORD	1	true-to-false
			BRFL	 	branch if true-to-false edge
				LCAL	Send
			BRTR
			PRIM	Heap/Store self
		ESBR
		SORD	2	both
			PRIM	Stack/Drop	É ¥ inst/É
			LCAL	Send
		ESBR
	ESTR
EDEF
LDEF	Send
	CMNT	 	sends the outputs
	CMNT	 	Input:  É ¥ inst/É
	CMNT	 	Output:  É ¥ É
	LITO	1	É ¥ 1/inst/É
	GSYM	Output/#1	É ¥ #1/1/inst/É
	PRIM	Misc/Send entry	É ¥ inst/É
	LITO	0	É ¥ 0/inst/É
	GSYM	Output/#2	É ¥ #2/0/inst/É
	PRIM	Misc/Send entry	É ¥ inst/É
	LITO	0	É ¥ 0/inst/É
	GSYM	Output/#1	É ¥ #1/0/inst/É
	PRIM	Misc/Send entry	É ¥ inst/É
	LITO	1	É ¥ 1/inst/É
	GSYM	Output/#2	É ¥ #2/1/inst/É
	PRIM	Misc/Send entry	É ¥ inst/É
	PRIM	Heap/Store self
EDEF