changeset 51631 | 8d60dfb41d19 |
parent 51467 | 60472a1b4536 |
child 51872 | af2e0b2c4d7e |
51630:603436283686 | 51631:8d60dfb41d19 |
---|---|
265 + Config.get ctxt (e_selection_heuristic_case heuristic |
265 + Config.get ctxt (e_selection_heuristic_case heuristic |
266 e_fun_weight_base e_sym_offs_weight_base) |
266 e_fun_weight_base e_sym_offs_weight_base) |
267 |> Real.ceil |> signed_string_of_int |
267 |> Real.ceil |> signed_string_of_int |
268 |
268 |
269 fun e_selection_weight_arguments ctxt heuristic sel_weights = |
269 fun e_selection_weight_arguments ctxt heuristic sel_weights = |
270 if heuristic = e_autoN then |
270 if heuristic = e_fun_weightN orelse heuristic = e_sym_offset_weightN then |
271 "-xAuto" |
|
272 else |
|
273 (* supplied by Stephan Schulz *) |
271 (* supplied by Stephan Schulz *) |
274 "--split-clauses=4 --split-reuse-defs --simul-paramod --forward-context-sr \ |
272 "--split-clauses=4 --split-reuse-defs --simul-paramod --forward-context-sr \ |
275 \--destructive-er-aggressive --destructive-er --presat-simplify \ |
273 \--destructive-er-aggressive --destructive-er --presat-simplify \ |
276 \--prefer-initial-clauses -winvfreqrank -c1 -Ginvfreqconjmax -F1 \ |
274 \--prefer-initial-clauses -winvfreqrank -c1 -Ginvfreqconjmax -F1 \ |
277 \--delete-bad-limit=150000000 -WSelectMaxLComplexAvoidPosPred -H'(4*" ^ |
275 \--delete-bad-limit=150000000 -WSelectMaxLComplexAvoidPosPred -H'(4*" ^ |
286 scaled_e_selection_weight ctxt heuristic w) |
284 scaled_e_selection_weight ctxt heuristic w) |
287 |> implode) ^ |
285 |> implode) ^ |
288 "),3*ConjectureGeneralSymbolWeight(PreferNonGoals,200,100,200,50,50,1,100,\ |
286 "),3*ConjectureGeneralSymbolWeight(PreferNonGoals,200,100,200,50,50,1,100,\ |
289 \1.5,1.5,1),1*Clauseweight(PreferProcessed,1,1,1),1*\ |
287 \1.5,1.5,1),1*Clauseweight(PreferProcessed,1,1,1),1*\ |
290 \FIFOWeight(PreferProcessed))'" |
288 \FIFOWeight(PreferProcessed))'" |
289 else |
|
290 "-xAuto" |
|
291 |
291 |
292 val e_ord_weights = |
292 val e_ord_weights = |
293 map (fn (s, w) => s ^ ":" ^ string_of_int w) #> space_implode "," |
293 map (fn (s, w) => s ^ ":" ^ string_of_int w) #> space_implode "," |
294 fun e_ord_precedence [_] = "" |
294 fun e_ord_precedence [_] = "" |
295 | e_ord_precedence info = info |> map fst |> space_implode "<" |
295 | e_ord_precedence info = info |> map fst |> space_implode "<" |