src/HOL/Tools/Sledgehammer/sledgehammer_mash.ML
changeset 57089 353652f47974
parent 57076 3d4b172d2209
child 57095 001ec97c3e59
equal deleted inserted replaced
57088:c3f95255c7e5 57089:353652f47974
   115   end
   115   end
   116 
   116 
   117 datatype mash_engine = MaSh_Py | MaSh_SML_kNN | MaSh_SML_NB
   117 datatype mash_engine = MaSh_Py | MaSh_SML_kNN | MaSh_SML_NB
   118 
   118 
   119 fun mash_engine () =
   119 fun mash_engine () =
   120   let val flag1 = Options.default_string @{system_option maSh} in
   120   let val flag1 = Options.default_string @{system_option MaSh} in
   121     (case if flag1 <> "none" (* default *) then flag1 else getenv "MASH" of
   121     (case if flag1 <> "none" (* default *) then flag1 else getenv "MASH" of
   122       "yes" => SOME MaSh_Py
   122       "yes" => SOME MaSh_Py
   123     | "py" => SOME MaSh_Py
   123     | "py" => SOME MaSh_Py
   124     | "sml" => SOME MaSh_SML_kNN
   124     | "sml" => SOME MaSh_SML_kNN
   125     | "sml_knn" => SOME MaSh_SML_kNN
   125     | "sml_knn" => SOME MaSh_SML_kNN