{X : Type u_1} →
  [t : TopologicalSpace X] →
    {C D : Set X} →
      [inst : Topology.RelCWComplex C D] →
        (carrier : Set X) →
          (I : (n : ℕ) → Set (Topology.RelCWComplex.cell C n)) →
            IsClosed carrier →
              D ∪ ⋃ n, ⋃ j, Topology.RelCWComplex.openCell n ↑j = carrier → Topology.RelCWComplex.Subcomplex C