diff options
author | vblot <24938579+vblot@users.noreply.github.com> | 2021-05-28 18:29:37 +0200 |
---|---|---|
committer | GitHub <noreply@github.com> | 2021-05-28 18:29:37 +0200 |
commit | e12110637730d067c216abcc86185b761189b342 (patch) | |
tree | c9ed415bbdadb2801e4917aae4a803035b13d4e8 /src/trace/smtForm.mli | |
parent | 52980aab9541a12619eb9191a94e9b2ba4684447 (diff) | |
download | smtcoq-e12110637730d067c216abcc86185b761189b342.tar.gz smtcoq-e12110637730d067c216abcc86185b761189b342.zip |
getting rid of native-coq (#95)
Diffstat (limited to 'src/trace/smtForm.mli')
-rw-r--r-- | src/trace/smtForm.mli | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/trace/smtForm.mli b/src/trace/smtForm.mli index 06a867f..47b4123 100644 --- a/src/trace/smtForm.mli +++ b/src/trace/smtForm.mli @@ -77,7 +77,7 @@ module type FORM = val get : ?declare:bool -> reify -> pform -> t (** Given a coq term, build the corresponding formula *) - val of_coq : (Structures.constr -> hatom) -> reify -> Structures.constr -> t + val of_coq : (CoqInterface.constr -> hatom) -> reify -> CoqInterface.constr -> t val hash_hform : (hatom -> hatom) -> reify -> t -> t @@ -90,20 +90,20 @@ module type FORM = (** Producing Coq terms *) - val to_coq : t -> Structures.constr + val to_coq : t -> CoqInterface.constr val pform_tbl : reify -> pform array val to_array : reify -> 'a -> (pform -> 'a) -> int * 'a array - val interp_tbl : reify -> Structures.constr * Structures.constr + val interp_tbl : reify -> CoqInterface.constr * CoqInterface.constr val nvars : reify -> int (* Producing a Coq term corresponding to the interpretation of a formula *) (* [interp_atom] map [hatom] to coq term, it is better if it produce shared terms. *) val interp_to_coq : - (hatom -> Structures.constr) -> (int, Structures.constr) Hashtbl.t -> - t -> Structures.constr + (hatom -> CoqInterface.constr) -> (int, CoqInterface.constr) Hashtbl.t -> + t -> CoqInterface.constr (* Unstratified terms *) type atom_form_lit = |