fact: Definition rewriteTypeDef (e0:TYPEDEF.t) : TYPEDEF.t := let ts1 := rewriteTypeSpecs (TYPEDEF.typeSpec e0) e0 in let methods1 := map (fun m => rewriteMethod m e0) (TYPEDEF.methods e0) in let e1 := TYPEDEF.setTypeSpec e0 ts1 in let e2 := TYPEDEF.setMethods e1 methods1 in e2.
imports: JML(Prelude) Coq(ZArith) Coq(Bool) Coq(List) JML(TaggedList) JML(ListHelpers) JML(ListFunctions) JML(OptionHelpers) JML(JMLProgramPlusImpl) JML(JMLFull2Basic) JML(JMLExpressionNotations)