X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=ocaml%2Flambda4.mli;h=8e89903e92a1c322b890e94538f367f7f35f722b;hb=ad332f3befc4922498db7a9ca6dbb7cc67dbf75b;hp=af249e34972fb5cfa028dad87af48590757d5062;hpb=f6a7ce917055ee2d750bb0e1bec6617945ea9928;p=fireball-separation.git

diff --git a/ocaml/lambda4.mli b/ocaml/lambda4.mli
index af249e3..8e89903 100644
--- a/ocaml/lambda4.mli
+++ b/ocaml/lambda4.mli
@@ -1,13 +1,13 @@
 type problem
 
+val label_of_problem : problem -> string
+
 type result = [
  | `Separable of (int * Num.nf) list
  | `Unseparable of string
 ]
 
-val problem_of: div:(string option) -> conv:string list -> nums:string list -> problem
-(* the following will soon replace the one above *)
-val tmp: (string (* problem label *)
+val problem_of: (string (* problem label *)
 * Num.i_var option (* div *)
 * Num.i_n_var list (* conv *)
 * Num.i_n_var list (* ps *)