1 files changed, 19 insertions, 19 deletions
diff --git a/src/trace/smtTrace.mli b/src/trace/smtTrace.mli
index 06dc6a3..895cdc9 100644
--- a/src/trace/smtTrace.mli
+++ b/src/trace/smtTrace.mli
@@ -48,26 +48,26 @@ val alloc : 'a SmtCertif.clause -> int
 val naive_alloc : 'a SmtCertif.clause -> int
 val build_certif : 'a SmtCertif.clause -> 'b SmtCertif.clause -> int
 val to_coq :
-  ('a -> Structures.constr) ->
-  ('a list list * 'a list -> Structures.types) ->
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t * Structures.constr Lazy.t *
-  Structures.constr Lazy.t * Structures.constr Lazy.t ->
+  ('a -> CoqInterface.constr) ->
+  ('a list list * 'a list -> CoqInterface.types) ->
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t *
+  CoqInterface.constr Lazy.t * CoqInterface.constr Lazy.t ->
   'a SmtCertif.clause ->
-  ('a SmtCertif.clause -> Structures.types * Structures.constr) option ->
-  Structures.constr * 'a SmtCertif.clause *
-    (Structures.id * Structures.types) list
+  ('a SmtCertif.clause -> CoqInterface.types * CoqInterface.constr) option ->
+  CoqInterface.constr * 'a SmtCertif.clause *
+    (CoqInterface.id * CoqInterface.types) list
 
 
 module MakeOpt :