src/HOL/Tools/Sledgehammer/sledgehammer_isar.ML
changeset 46435 e9c90516bc0d
parent 46409 d4754183ccce
child 46949 94aa7b81bcf6
equal deleted inserted replaced
46434:6d2af424d0f8 46435:e9c90516bc0d
   161            ("lam_trans", [name])
   161            ("lam_trans", [name])
   162          else
   162          else
   163            error ("Unknown parameter: " ^ quote name ^ "."))
   163            error ("Unknown parameter: " ^ quote name ^ "."))
   164 
   164 
   165 
   165 
   166 (* Ensures that type encodings such as "mono_simple?" and "poly_guards!!" are
   166 (* Ensures that type encodings such as "mono_native?" and "poly_guards!!" are
   167    read correctly. *)
   167    read correctly. *)
   168 val implode_param = strip_spaces_except_between_idents o space_implode " "
   168 val implode_param = strip_spaces_except_between_idents o space_implode " "
   169 
   169 
   170 structure Data = Theory_Data
   170 structure Data = Theory_Data
   171 (
   171 (