# HG changeset patch # User huffman # Date 1273629695 25200 # Node ID 02df88789641b73fc40a612c3fa9c7cb7cf37118 # Parent 1e020f4458464a0368e34b4a5e944b95a39f3390 include iszero_simps in semiring_norm just once (they are already included in rel_simps) diff -r 1e020f445846 -r 02df88789641 src/HOL/Nat_Numeral.thy --- a/src/HOL/Nat_Numeral.thy Tue May 11 19:00:32 2010 -0700 +++ b/src/HOL/Nat_Numeral.thy Tue May 11 19:01:35 2010 -0700 @@ -712,7 +712,7 @@ if_True add_0 add_Suc add_number_of_left mult_number_of_left numeral_1_eq_1 [symmetric] Suc_eq_plus1 numeral_0_eq_0 [symmetric] numerals [symmetric] - iszero_simps not_iszero_Numeral1 + not_iszero_Numeral1 lemma Let_Suc [simp]: "Let (Suc n) f == f (Suc n)" by (fact Let_def)