X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_paramodulation%2FnCicParamod.ml;h=2536f6443c9f95cbabf1f70fc50cb0d441c34260;hb=65e1aa022da79a3a880f5c2d5d0d512b80e50635;hp=dc346d7c457ba5dab5855e174e674c6028fc1f59;hpb=f7bfbdc706a75256c0e9b15ecc242175f562eb71;p=helm.git diff --git a/helm/software/components/ng_paramodulation/nCicParamod.ml b/helm/software/components/ng_paramodulation/nCicParamod.ml index dc346d7c4..2536f6443 100644 --- a/helm/software/components/ng_paramodulation/nCicParamod.ml +++ b/helm/software/components/ng_paramodulation/nCicParamod.ml @@ -31,7 +31,10 @@ let nparamod rdb metasenv subst context t table = 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