∀ {α : Type u_1} (motive : Ordnode α × α → Sort u_2) (r' : Ordnode α) (xm : α)
  (h_1 : (r' : Ordnode α) → (xm : α) → motive (r', xm)),
  (match (r', xm) with
    | (r', xm) => h_1 r' xm) =
    h_1 r' xm