lean4-htt/tests/lean/run/592.lean
2016-06-10 18:29:41 -07:00

8 lines
148 B
Text

exit
import data.nat
open nat algebra
definition foo (a b : nat) := a * b
example (a : nat) : foo a 0 = 0 :=
calc a * 0 = 0 : by rewrite mul_zero