changeset 2440 | 0a36825b16c1 |
parent 2438 | abafea9b39bb |
child 2448 | b9d9c4540265 |
--- a/Nominal/NewParser.thy Fri Aug 27 02:08:36 2010 +0800 +++ b/Nominal/NewParser.thy Fri Aug 27 03:37:17 2010 +0800 @@ -434,7 +434,7 @@ val alpha_bn_rsp = if get_STEPS lthy > 20 - then raw_alpha_bn_rsp alpha_bn_equivp_thms alpha_bn_imp_thms + then raw_alpha_bn_rsp alpha_bn_trms alpha_bn_equivp_thms alpha_bn_imp_thms else raise TEST lthy6 (* noting the quot_respects lemmas *)