proposition: Lemma positive_rect2_helper_bool : forall P c1 c2 c3 p, positive_rect2_helper P c1 c2 c3 true p = positive_rect2_helper P c1 c2 c3 false (Pos.succ p).
proof: Proof. intros P c1 c2 c3. induction p; try reflexivity. simpl. rewrite IHp. reflexivity. Qed.
imports: Coq(Lia) CoRN.stdlib_omissions.List Coq.Logic.Eqdep_dec Coq.Setoids.Setoid