lean4-htt/tests/lean/keyAttrErase.lean

6 lines
123 B
Text

theorem ex {i j : Fin n} (h : i = j) : i.val = j.val :=
h ▸ rfl
attribute [-appUnexpander] unexpandEqNDRec
#print ex