lean4-htt/tests/lean/run/1900.lean
Leonardo de Moura 8a573b5d87 fix: fixes #1900
2022-12-02 10:04:01 -08:00

4 lines
215 B
Text

@[elab_as_elim]
def strongSubRecursion {P : Nat → Nat → Sort _} (H : ∀ a b, (∀ x y, x < a → y < b → P x y) → P a b) :
∀ n m : Nat, P n m
| n, m => H n m fun x y _ _ => strongSubRecursion H x y