let vars = Array.to_list
(Array.init no_bound_vars (fun x -> "x" ^ string_of_int x)) in
repeat (fun _ ->
let div, convs = gen complex vars in
let vars = Array.to_list
(Array.init no_bound_vars (fun x -> "x" ^ string_of_int x)) in
repeat (fun _ ->
let div, convs = gen complex vars in