changeset 6 | 8ce8c4d13d4d |
parent 0 | a5a9c433f639 |
child 14 | 1c0926788772 |
--- a/src/ZF/bool.ML Fri Sep 17 12:53:53 1993 +0200 +++ b/src/ZF/bool.ML Fri Sep 17 16:16:38 1993 +0200 @@ -53,9 +53,6 @@ by (resolve_tac prems 1); val cond_type = result(); -val [cond_cong] = mk_congs Bool.thy ["cond"]; -val bool_congs = mk_congs Bool.thy ["cond","not","op and","op or","op xor"]; - val [rew] = goal Bool.thy "[| !!b. j(b)==cond(b,c,d) |] ==> j(1) = c"; by (rewtac rew); by (rtac cond_1 1);