X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=ocaml%2Flambda4.mli;h=d6e42027db5c9545d6dcb1f7003933f897f13b2a;hb=5d8249a042beefbe21bfeed48619ed1917ebbcb7;hp=0b92ad9688b95e8df21f424a06c92d1ff91ae1c7;hpb=608c40045f651c6402b17c437f997de4d63f6afd;p=fireball-separation.git

diff --git a/ocaml/lambda4.mli b/ocaml/lambda4.mli
index 0b92ad9..d6e4202 100644
--- a/ocaml/lambda4.mli
+++ b/ocaml/lambda4.mli
@@ -1,5 +1,7 @@
 type problem
 
+val label_of_problem : problem -> string
+
 type response = [
  | `CompleteSeparable of string
  | `CompleteUnseparable of string
@@ -13,5 +15,9 @@ type result = [
  | `Unseparable of string
 ]
 
-val problem_of: div:(string option) -> conv:string list -> nums:string list -> problem * response
+val problem_of: (string (* problem label *)
+* Num.i_var option (* div *)
+* Num.i_n_var list (* conv *)
+* Num.i_n_var list (* ps *)
+* string list (* names of free variables *)) -> problem * response
 val solve: problem * response -> result