fact: Axiom guard_method_R : forall n s1 s2 k v1 v2 u1 u2, RState _ _ R s1 s2 -> R v1 v2 -> RUpdate _ _ R u1 u2 -> guard_method _ n s1 k v1 u1 = guard_method _ n s2 k v2 u2.
imports: Coq(FunctionalExtensionality Arith Lia) Coq(Arith.Peano_dec Arith.Compare_dec) Coq(Relations.Relation_Operators) Coq(List) Chapar(Predefs)