lean4-htt/tests/lean/dsimp_whnf.lean

7 lines
105 B
Text

open tactic
example (a b : nat) : ((a + 1, b).1) = a + 1 :=
by do
dsimp,
trace_state,
reflexivity