author | Christian Urban <christian dot urban at kcl dot ac dot uk> |
Thu, 13 Mar 2014 09:30:26 +0000 | |
changeset 3230 | b33b42211bbf |
parent 3229 | b52e8651591f |
child 3231 | 188826f1ccdb |
--- a/Nominal/Nominal2_FCB.thy Thu Mar 13 09:21:31 2014 +0000 +++ b/Nominal/Nominal2_FCB.thy Thu Mar 13 09:30:26 2014 +0000 @@ -9,7 +9,7 @@ *} ML {* -val all_trivials : (Proof.context -> Method.method) context_parser = +val all_trivials : (Proof.context -> Proof.method) context_parser = Scan.succeed (fn ctxt => let val tac = TRYALL (SOLVED' (full_simp_tac ctxt))