fact: Definition guard_method (n: NId)(this: @State Val)(k: Key)(v: Val)(u: @Update Val): bool := let s := store this in let r := rec this in let d := dep this in let n' := sender_node u in let d' := sender_dep u in (fold_left (fun b n => b && ((d' n) <=? (r n))) nids true) && ((d' n') =? ((r n') + 1)).
imports: Coq(FunctionalExtensionality List Bool Program.Basics) Coq(Arith Arith.Peano_dec Arith.Compare_dec) Chapar(Predefs extralib KVStore)