Definition Pred : Cobham :=
  Rec Zero (Proj 2 0) (Proj 2 0) (Proj 1 0).

(* Specifications: *)
Lemma rec_bounded_Pred : rec_bounded' Pred.
Lemma Pred_correct l : sem pred nil l = Sem Pred l.
Lemma cond'_correct l : sem cond nil l = Sem Cond l.