Opaque OneMinusMultPlus_e.
(** Def 10 of (Rose) *)
Definition PlusMod2_e : Cobham :=
Comp 2 Cond [
Proj 2 1;
Proj 2 0;
Comp 2 Succ_e [Proj 2 0];
Proj 2 0
].

Lemma arity_PlusMod2 :
arity PlusMod2_e = ok_arity 2.