fact: Definition update_watched_clause (l : Annot.t literal) (id : int) (cl: Annot.t watched_clause) (st: dresult) : dresult := match st with | Fail f => Fail f | Success p => Success p | Progress st => insert_watched_clause (Some l) id cl (remove_watched_clause id (Annot.elt cl) st) end.
imports: Cdcl.PatriciaR Cdcl.KeyInt Cdcl.ReifClasses Cdcl.Lib Bool Setoid ZifyBool ZArith Uint63 Lia List Cdcl.Syntax Cdcl.Clause