∀ (motive : Nat.SOM.Mon → Nat.SOM.Mon → Sort u_1) (m₂ : Nat.SOM.Mon) (h_1 : (m₁ : Nat.SOM.Mon) → motive m₁ [])
  (h_2 : (m₂ : Nat.SOM.Mon) → motive [] m₂)
  (h_3 :
    (v₁ : Nat.Linear.Var) →
      (m₁ : List Nat.Linear.Var) → (v₂ : Nat.Linear.Var) → (m₂ : List Nat.Linear.Var) → motive (v₁ :: m₁) (v₂ :: m₂)),
  (m₂ = [] → False) →
    (match [], m₂ with
      | m₁, [] => h_1 m₁
      | [], m₂ => h_2 m₂
      | v₁ :: m₁, v₂ :: m₂ => h_3 v₁ m₁ v₂ m₂) =
      h_2 m₂