fact: Fixpoint isEmptySpecification (specs:list FULL_SPEC_CASE.t) : bool := match specs with | nil => true | s::ss => if FULL_SPEC_CASE.isRedundant s then (isEmptySpecification ss) else false end.
imports: JML(Prelude) Coq(ZArith) Coq(Bool) Coq(List) JML(TaggedList) JML(ListHelpers) JML(ListFunctions) JML(OptionHelpers) JML(JMLProgramPlusImpl) JML(JMLFull2Basic) JML(JMLExpressionNotations)