fact: Definition setInvariant (ts:TYPESPEC.t) (inv:list INVARIANT.t) : TYPESPEC.t := let (_, c, rep, i, a, read, w, m) := ts in TYPESPEC.Build_t inv c rep i a read w m.
imports: JML(JMLProgramPlus) Coq(ZArith) JML(ZHelpers) JML(LogicHelpers) Coq(Bool) Coq(Sumbool) Coq(Ndec) JML(PosAux) JML(EqBoolAux) Coq(Relation_Operators) Coq(List) JML(ListFunctions) JML(ListHelpers) JML(OptionHelpers)