src/HOL/Tools/refute_isar.ML
changeset 17057 0934ac31985f
parent 15570 8d8c70b41bab
child 17273 e95f7141ba2f
     1.1 --- a/src/HOL/Tools/refute_isar.ML	Tue Aug 16 13:42:23 2005 +0200
     1.2 +++ b/src/HOL/Tools/refute_isar.ML	Tue Aug 16 13:42:26 2005 +0200
     1.3 @@ -54,7 +54,7 @@
     1.4  
     1.5  	fun refute_parser tokens = (refute_scan_args tokens) |>> refute_trans;
     1.6  
     1.7 -	val refute_cmd = OuterSyntax.improper_command "refute" "try to find a model that refutes a given subgoal" OuterSyntax.Keyword.diag refute_parser;
     1.8 +	val refute_cmd = OuterSyntax.improper_command "refute" "try to find a model that refutes a given subgoal" OuterKeyword.diag refute_parser;
     1.9  
    1.10  (* ------------------------------------------------------------------------- *)
    1.11  (* set up the 'refute_params' command                                        *)
    1.12 @@ -90,7 +90,7 @@
    1.13  
    1.14  	fun refute_params_parser tokens = (refute_params_scan_args tokens) |>> refute_params_trans;
    1.15  
    1.16 -	val refute_params_cmd = OuterSyntax.command "refute_params" "show/store default parameters for the 'refute' command" OuterSyntax.Keyword.thy_decl refute_params_parser;
    1.17 +	val refute_params_cmd = OuterSyntax.command "refute_params" "show/store default parameters for the 'refute' command" OuterKeyword.thy_decl refute_params_parser;
    1.18  
    1.19  end;
    1.20