4947215325
This PR improves the support for `funext` in `grind`. We will push another PR to minimize the number of case-splits later.
6 lines
237 B
Text
6 lines
237 B
Text
example (f : (Nat → Nat) → Nat) : a = b → f (fun x => a + x) = f (fun x => b + x) := by
|
|
grind
|
|
|
|
example (f : (Nat → Nat) → Nat) : a = b → f (fun x => a + x) = f (fun x => b + x) := by
|
|
fail_if_success grind -funext
|
|
sorry
|