src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML
changeset 67399 eab6ce8368fa
parent 63806 c54a53ef1873
child 67405 e9ab4ad7bd15
equal deleted inserted replaced
67398:5eb932e604a2 67399:eab6ce8368fa
   470     val lam_trans = AList.lookup (op =) args lam_transK
   470     val lam_trans = AList.lookup (op =) args lam_transK
   471     val uncurried_aliases = AList.lookup (op =) args uncurried_aliasesK
   471     val uncurried_aliases = AList.lookup (op =) args uncurried_aliasesK
   472     val e_selection_heuristic = AList.lookup (op =) args e_selection_heuristicK
   472     val e_selection_heuristic = AList.lookup (op =) args e_selection_heuristicK
   473     val term_order = AList.lookup (op =) args term_orderK
   473     val term_order = AList.lookup (op =) args term_orderK
   474     val force_sos = AList.lookup (op =) args force_sosK
   474     val force_sos = AList.lookup (op =) args force_sosK
   475       |> Option.map (curry (op <>) "false")
   475       |> Option.map (curry (<>) "false")
   476     val dir = AList.lookup (op =) args keepK
   476     val dir = AList.lookup (op =) args keepK
   477     val timeout = Mirabelle.get_int_setting args (prover_timeoutK, 30)
   477     val timeout = Mirabelle.get_int_setting args (prover_timeoutK, 30)
   478     (* always use a hard timeout, but give some slack so that the automatic
   478     (* always use a hard timeout, but give some slack so that the automatic
   479        minimizer has a chance to do its magic *)
   479        minimizer has a chance to do its magic *)
   480     val preplay_timeout = AList.lookup (op =) args preplay_timeoutK
   480     val preplay_timeout = AList.lookup (op =) args preplay_timeoutK