fact: Definition build (callee : Method) (params : ParamDict.t) (adds : Adds.t) : t := let pc' := match METHOD.body callee with | Some body => STATEMENT.pc (METHODBODY.compound body) | None => NoBodyPC end in make params VarDict.empty pc' (Normal None) adds.
imports: Coq(List) Coq(Relation_Operators) Coq(DecidableType) Coq(FSetInterface)