type problem

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 problem_of_string_tmp: string -> problem
val solve: problem -> result