fact: Definition label_is_put (l: Label): Prop := match l with | put_label n k v => True | get_label n k v => False | update_label n k v => False | fault_label n => False end.
imports: Coq(FunctionalExtensionality Arith Lia) Coq(Arith.Peano_dec Arith.Compare_dec) Coq(Relations.Relation_Operators) Coq(List) Chapar(Predefs)