let (bag,maxvar), goals =
HExtlib.list_mapi_acc (fun x _ a -> P.mk_goal a x) (bag,maxvar) [t]
in
- let solutions = P.paramod (bag,maxvar) ~g_passives:goals ~passives in
+ let solutions =
+ P.paramod ~max_steps:max_int ~timeout:(Unix.gettimeofday () +. 300.0)
+ ~g_passives:goals ~passives (bag,maxvar)
+ in
List.map
(fun (bag,i,l) ->
let stamp = Unix.gettimeofday () in