diff options
| author | ckeller <ckeller@users.noreply.github.com> | 2021-02-23 17:06:51 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2021-02-23 17:06:51 +0100 |
| commit | 240b76807340e59bb85b35e3ebbb807792459912 (patch) | |
| tree | 22d60d5c8db5034bdd9045e8579df14406ac69bc /src/trace/smtAtom.mli | |
| parent | 74558c622de91801e3e188bdf690eb9a665f965b (diff) | |
| download | smtcoq-240b76807340e59bb85b35e3ebbb807792459912.tar.gz smtcoq-240b76807340e59bb85b35e3ebbb807792459912.zip | |
Link equality on uninterpreted sorts with SMT equality (#86)
Equality is now treated from uninterpreted sorts, which makes them usable with tactics!
Closes #17
Closes #78
Diffstat (limited to 'src/trace/smtAtom.mli')
| -rw-r--r-- | src/trace/smtAtom.mli | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/trace/smtAtom.mli b/src/trace/smtAtom.mli index f076cb8..17a0cd0 100644 --- a/src/trace/smtAtom.mli +++ b/src/trace/smtAtom.mli @@ -140,7 +140,7 @@ module Atom : val print_atoms : reify_tbl -> string -> unit (** Given a coq term, build the corresponding atom *) - val of_coq : ?hash:bool -> SmtBtype.reify_tbl -> Op.reify_tbl -> + val of_coq : ?eqsym:bool -> SmtBtype.reify_tbl -> Op.reify_tbl -> reify_tbl -> SmtMisc.logic -> Environ.env -> Evd.evar_map -> Structures.constr -> t val get_coq_term_op : int -> Structures.constr @@ -159,7 +159,7 @@ module Atom : (* Generation of atoms *) val hatom_Z_of_int : reify_tbl -> int -> t val hatom_Z_of_bigint : reify_tbl -> Big_int.big_int -> t - val mk_eq : reify_tbl -> ?declare:bool -> btype -> t -> t -> t + val mk_eq_sym : reify_tbl -> ?declare:bool -> btype -> t -> t -> t val mk_lt : reify_tbl -> ?declare:bool -> t -> t -> t val mk_le : reify_tbl -> ?declare:bool -> t -> t -> t val mk_gt : reify_tbl -> ?declare:bool -> t -> t -> t |