is_ass.
apply OrI1;apply K;is_ass.
apply OrI2;apply K0;is_ass.
Qed.

(* Specifications: *)
Lemma CNF_and_prov : forall ll1 ll2, Provable (CNFtoPropF (ll1 ++ ll2) → CNFtoPropF ll1 ∧ CNFtoPropF ll2).
intros;induction ll1;simpl.