ocaml/lambda4.mli

   1 type problem\r
   2 \r
   3 val label_of_problem : problem -> string\r
   4 \r
   5 type response = [\r
   6  | `CompleteSeparable of string\r
   7  | `CompleteUnseparable of string\r
   8  | `Uncomplete\r
   9 ]\r
  10 \r
  11 type result = [\r
  12  `Complete | `Uncomplete\r
  13 ] * [\r
  14  | `Separable of (int * Num.nf) list\r
  15  | `Unseparable of string\r
  16 ]\r
  17 \r
  18 val problem_of: div:(string option) -> conv:string list -> nums:string list -> problem * response\r
  19 (* the following will soon replace the one above *)\r
  20 val tmp: (string (* problem label *)\r
  21 * Num.i_var option (* div *)\r
  22 * Num.i_n_var list (* conv *)\r
  23 * Num.i_n_var list (* ps *)\r
  24 * string list (* names of free variables *)) -> problem * response\r
  25 val solve: problem * response -> result\r