lean4-htt/tests/lean/run/elab6.lean
2017-03-09 18:41:19 -08:00

5 lines
149 B
Text

constants a b : nat
constant p : nat → Prop
constant H1 : p (a + a + a)
constant H2 : a = b
#check (eq.subst H2 H1 : p (a + b + a))