lean4-htt/tests/elab/exposeNames.lean
Garmelon 08eb78a5b2
chore: switch to new test/bench suite (#12590)
This PR sets up the new integrated test/bench suite. It then migrates
all benchmarks and some related tests to the new suite. There's also
some documentation and some linting.

For now, a lot of the old tests are left alone so this PR doesn't become
even larger than it already is. Eventually, all tests should be migrated
to the new suite though so there isn't a confusing mix of two systems.
2026-02-25 13:51:53 +00:00

48 lines
866 B
Text
Raw Permalink Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/--
trace: α : Type u_1
inst : DecidableEq α
inst_1 : Add α
a_1 b_1 : α
h : a_1 = b_1
a_2 b : α
h_1 : b = a_2
a : α
⊢ a = b
-/
#guard_msgs (trace) in
example [DecidableEq α] [Add α] (a b : α) (_ : a = b) (a : α) (b : α) (_ : b = a) (a : α) : a = b := by
expose_names
trace_state
sorry
/--
trace: α : Sort u_1
a b : α
h_1 : a = b
h_2 : True
h_3 : True False
h : b = a
⊢ b = a
-/
#guard_msgs (trace) in
example (a b : α) (h : a = b) (_ : True) (_ : True False) (h : b = a) : b = a := by
expose_names
trace_state
rw [h]
/--
trace: α : Sort u_1
a b : α
h : a = b
h_3 : True
h_4 : False
h_1 : True False
h_5 : True
h_2 : b = a
⊢ b = a
-/
#guard_msgs (trace) in
example (a b : α) (h : a = b) (_ : True) (_ : False) (h_1 : True False) (_ : True) (h_2 : b = a) : b = a := by
expose_names
trace_state
contradiction