{A : Type u_2} →
  {motive : InvolutiveNeg A → Sort u} →
    (t : InvolutiveNeg A) →
      ([toNeg : Neg A] → (neg_neg : ∀ (x : A), - -x = x) → motive { toNeg := toNeg, neg_neg := neg_neg }) → motive t