{α : Type u_4} →
  {motive : CoheytingAlgebra α → Sort u} →
    ([toGeneralizedCoheytingAlgebra : GeneralizedCoheytingAlgebra α] →
        [toOrderTop : OrderTop α] →
          [toHNot : HNot α] →
            (top_sdiff : ∀ (a : α), ⊤ \ a = ￢a) →
              motive
                { toGeneralizedCoheytingAlgebra := toGeneralizedCoheytingAlgebra, toOrderTop := toOrderTop,
                  toHNot := toHNot, top_sdiff := top_sdiff }) →
      (t : CoheytingAlgebra α) → motive t