CMNT	 	Stores the new arg and checks for a positive edge
CMNT	 	Input:  É ¥ key/index/inst/arg/É
CMNT	 	Output:  É ¥ rslt/inst/É
PRIM	Stack/Dup to aux	É/key ¥ key/index/inst/arg/É
PRIM	Stack/Over	É/key ¥ index/key/index/inst/arg/É
PRIM	Stack/Pop to aux	É/key/index ¥ key/index/inst/arg/É
PRIM	S_tree/Read	É/key/index ¥ current/inst/arg/É
PRIM	Stack/Xswap	É/key/index ¥ current/arg/inst/É
PRIM	Ordinal/Test equal	É/key/index ¥ rslt/arg/inst/É
BRFL	 	branch if not equal
	PRIM	Stack/Dup down	É/key/index ¥ arg/inst/arg/É
	PRIM	Stack/Push from aux	É/key ¥ index/arg/inst/arg/É
	PRIM	Stack/Push from aux	É ¥ key/index/arg/inst/arg/É
	PRIM	S_tree/Replace	É ¥ inst/arg/É
	PRIM	Stack/Swap	É ¥ arg/inst/É
BRTR
PRIM	Stack/Drop	É/key/index ¥ inst/É
PRIM	Stack/Drop from aux	É/key ¥ inst/É
PRIM	Stack/Drop from aux	É ¥ inst/É
LITO	0	É ¥ false/inst/É