∀ {α : Sort u} {β : Sort v} {motive : α ⊕' β → Sort u_1} (α_1 : Sort u✝) (β_1 : α_1 → Sort v✝) (f : (x : α_1) → β_1 x)
  (rel : α ⊕' β → α_1 → Prop) (t : α ⊕' β)
  (inl : (val : α) → ((y : α_1) → rel (PSum.inl val) y → β_1 y) → motive (PSum.inl val))
  (inr : (val : β) → ((y : α_1) → rel (PSum.inr val) y → β_1 y) → motive (PSum.inr val)),
  (PSum.casesOn (motive := fun t => ((y : α_1) → rel t y → β_1 y) → motive t) t inl inr fun y h => f y) =
    PSum.casesOn t (fun val => inl val fun y h => f y) fun val => inr val fun y h => f y