proposition: Lemma add_mk_list_true: forall n acc, length (mk_list_true_acc n acc) = (n + length acc)%nat.
proof: Proof. intros n. induction n as [ | n' IHn]. + auto. + intro acc. simpl. rewrite IHn. simpl. lia. Qed.
imports: List Bool NArith Psatz Int63 Nnat ZArith Misc ProofIrrelevance