src/HOL/Tools/Sledgehammer/sledgehammer_provers.ML
changeset 43830 954783662daf
parent 43828 e07a2c4cbad8
child 43850 7f2cbc713344
equal deleted inserted replaced
43829:fba9754b827e 43830:954783662daf
   517 fun effective_atp_lambda_translation ctxt type_enc =
   517 fun effective_atp_lambda_translation ctxt type_enc =
   518   Config.get ctxt atp_lambda_translation
   518   Config.get ctxt atp_lambda_translation
   519   |> (fn trans =>
   519   |> (fn trans =>
   520          if trans = smartN then
   520          if trans = smartN then
   521            if is_type_enc_higher_order type_enc then lambdasN else combinatorsN
   521            if is_type_enc_higher_order type_enc then lambdasN else combinatorsN
       
   522          else if trans = lambdasN andalso
       
   523                  not (is_type_enc_higher_order type_enc) then
       
   524            error ("Lambda translation method incompatible with \
       
   525                   \first-order encoding.")
   522          else
   526          else
   523            trans)
   527            trans)
   524 
   528 
   525 val metis_minimize_max_time = seconds 2.0
   529 val metis_minimize_max_time = seconds 2.0
   526 
   530