Remove redundant Analyses.Dom.lift

Same definition is already included from LiftConf

Author: sim642

src/framework/analyses.ml

@@ -128,8 +128,6 @@ struct
       let top_name = "Totally unknown and messed up"
     end) (LD)
 
-  let lift (x:LD.t) : t = `Lifted x
-
   let unlift x =
     match x with
     | `Lifted x -> x