fact: Fixpoint assignableList (case:GENERIC_SPEC_CASE.t) : list (optional StoreRefList) := match GENERIC_SPEC_CASE.genericBody case with | inl simpleBody => extractClauses assignableT false simpleBody | inr nested => concat (map assignableList nested) end.
imports: JML(Prelude) Coq(ZArith) Coq(Bool) Coq(List) JML(TaggedList) JML(ListHelpers) JML(ListFunctions) JML(OptionHelpers) JML(JMLProgramPlusImpl) JML(JMLFull2Basic) JML(JMLExpressionNotations)