{α : Type u_4} →
  [inst : TopologicalSpace α] →
    {motive : TopologicalSpace.Compacts α → Sort u} →
      (t : TopologicalSpace.Compacts α) →
        ((carrier : Set α) →
            (isCompact' : IsCompact carrier) → motive { carrier := carrier, isCompact' := isCompact' }) →
          motive t