fact: Hypothesis B_subbasis_cond: forall (J:Type) (V:J->Ensemble X), FiniteT J -> (forall j:J, In B (V j)) -> Inhabited (IndexedIntersection V).
imports: ZornsLemma(DecidableDec FiniteIntersections FunctionProperties) ZornsLemma(FiniteIntersections)