fact: Definition method (e:t) (sms:ShortMethodSignature) : option Method := let eq_sms (m:Method) := METHODSIGNATURE.eq_t (METHOD.signature m) sms in List.find eq_sms (methods e).
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)