lean4-htt/tests/lean/run/qed_perf_bug.lean
Leonardo de Moura c2bd8626d7 fix(library/type_context): put back same_head_symbol heuristic
The timeout at qed_perf_bug test demonstrates why it is useful.
2018-01-09 15:31:33 -08:00

17 lines
514 B
Text

definition f (n : nat) : nat :=
if n = 100000 then 1 else 0
example (n : nat) : f 100000 = (if (100000 : nat) = 100000 then 1 else 0) :=
rfl
example (n : nat) : f 100000 = (if (100000 : nat) = 100000 then 1 else 0) :=
by unfold f
example (n : nat) : f 100000 = (if (100000 : nat) = 100000 then 1 else 0) :=
by simp [f]
example (n : nat) : f 100000 = (if (100000 : nat) = 100000 then 1 else 0) :=
by dsimp [f]; refl
example (n : nat) : f 100000 = (if (100000 : nat) = 100000 then 1 else 0) :=
by delta f; refl