proposition: Lemma eval_insert_normalised_clause : forall i cl st (HCL : Annot.lift (has_clause (hconsmap st)) cl) (WF : wf_state st) (ES : eval_state st) (EC : Annot.lift eval_clause cl), eval_result_state (insert_normalised_clause i cl st).
proof: Proof. unfold insert_normalised_clause. intros. unfold Annot.lift in *. destruct (Annot.elt cl) ; simpl ; auto. - intros; apply eval_insert_unit;auto. - intros. apply eval_add_watched_clause; auto. Qed.
imports: Cdcl.PatriciaR Cdcl.KeyInt Cdcl.ReifClasses Cdcl.Lib Bool Setoid ZifyBool ZArith Uint63 Lia List Cdcl.Syntax Cdcl.Clause