| changeset 39923 | 0e1bd289c8ea |
| parent 38761 | b32975d3db3e |
| child 39924 | f4d3e70ed3a8 |
--- a/src/HOL/Tools/Function/scnp_reconstruct.ML Tue Oct 05 11:45:16 2010 +0200 +++ b/src/HOL/Tools/Function/scnp_reconstruct.ML Tue Oct 05 14:19:38 2010 +0200 @@ -383,7 +383,7 @@ val strategy = Then (Then first_round second_round) third_round in - TERMINATION ctxt (strategy err_cont err_cont) + TERMINATION ctxt autom_tac (strategy err_cont err_cont) end fun gen_sizechange_tac orders autom_tac ctxt err_cont =