Added label to problem

[fireball-separation.git] / ocaml / lambda4.mli

diff --git a/ocaml/lambda4.mli b/ocaml/lambda4.mli
index af249e34972fb5cfa028dad87af48590757d5062..c8a40bfa8c719694f0796ec429c13943ac3cf200 100644 (file)
--- a/ocaml/lambda4.mli
+++ b/ocaml/lambda4.mli
@@ -1,5 +1,7 @@
 type problem\r
 \r
+val label_of_problem : problem -> string\r
+\r
 type result = [\r
  | `Separable of (int * Num.nf) list\r
  | `Unseparable of string\r