1
2
open ILL_predlog;
3
4
5
fun auto1 x = prove_goal thy x
6
(fn prems => [best_tac safe_cs 1]) ;
7
8
fun auto2 x = prove_goal thy x
9
(fn prems => [best_tac power_cs 1]) ;