I am working with the ocaml for Z3 in order to name each constraints when getting unsat core such as
(set-option :produce-unsat-cores true) (declare-fun x ()
