definition ex1 (a : nat) : nat.succ a = 0 → false
.