removed reference to Nat thms in elim_rls.
authornipkow
Sat, 06 Jan 1996 14:04:12 +0100
changeset 1433 e7f9273024c2
parent 1432 2cdb85e5cd90
child 1434 834da5152421
removed reference to Nat thms in elim_rls.
src/HOL/ind_syntax.ML
--- a/src/HOL/ind_syntax.ML	Sat Jan 06 14:02:52 1996 +0100
+++ b/src/HOL/ind_syntax.ML	Sat Jan 06 14:04:12 1996 +0100
@@ -122,8 +122,8 @@
      (fn _ => [assume_tac 1]);
 
 (*Includes rules for Suc and Pair since they are common constructions*)
-val elim_rls = [asm_rl, FalseE, Suc_neq_Zero, Zero_neq_Suc,
-		make_elim Suc_inject, 
+val elim_rls = [asm_rl, FalseE, (*Suc_neq_Zero, Zero_neq_Suc,
+		make_elim Suc_inject, *)
 		refl_thin, conjE, exE, disjE];
 
 end;