Fixpoint iseven (n:nat): bool.
Proof.
induction n.
- exact true.
- destruct n.
* exact false.
* exact (iseven n).
Defined.