lean4-htt/tests/lean/run/subst_heq.lean

9 lines
148 B
Text

example (a b : nat) (h : a == b) : a + 1 = b + 1 :=
begin
subst h
end
example (a b : nat) (h : a == b) : a + 1 = b + 1 :=
begin
subst_vars
end