open nat
example (n : ℕ) : n + 1 = succ n :=
by rewrite [<d n+1]