fact: Fixpoint implementsList (l:list Implements) : list Interface := match l with | (implements i)::xs => i :: (implementsList xs) | (implements_weakly _)::xs => (implementsList xs) | nil => nil end.
imports: JML(Prelude) Coq(ZArith) Coq(Bool) Coq(List) JML(TaggedList) JML(ListHelpers) JML(ListFunctions) JML(OptionHelpers) JML(JMLProgramPlusImpl) JML(JMLFull2Basic) JML(JMLExpressionNotations)