∀ {α : Type u_1} (motive : (ys xs : List α) → ℕ → xs.Sublist ys → Prop) (ys xs : List α) (n : ℕ) (h : xs.Sublist ys),
  (∀ (ys xs : List α) (x : xs.Sublist ys), motive ys xs 0 x) →
    (∀ (n : ℕ), motive [] [] n.succ ⋯) →
      (∀ (xs : List α) (n : ℕ) (l₂ : List α) (a : α) (h : xs.Sublist l₂), motive (a :: l₂) xs n.succ ⋯) →
        (∀ (n : ℕ) (l₁ l₂ : List α) (a : α) (h : l₁.Sublist l₂), motive (a :: l₂) (a :: l₁) n.succ ⋯) → motive ys xs n h