# HG changeset patch
# User huffman
# Date 1228883731 28800
# Node ID 90f42c1385853578c073f1b0b1adb4bf43b0fc9f
# Parent  208fee4049a0de6ffeeecb409225f9004681f910
use {less,le}_number_of in integer simprocs

diff -r 208fee4049a0 -r 90f42c138585 src/HOL/Tools/int_factor_simprocs.ML
--- a/src/HOL/Tools/int_factor_simprocs.ML	Tue Dec 09 16:26:47 2008 -0800
+++ b/src/HOL/Tools/int_factor_simprocs.ML	Tue Dec 09 20:35:31 2008 -0800
@@ -19,7 +19,7 @@
 and d = gcd(m,m') and n=m/d and n'=m'/d.
 *)
 
-val rel_number_of = [@{thm eq_number_of_eq}, @{thm less_number_of_eq_neg}, @{thm le_number_of_eq}];
+val rel_number_of = [@{thm eq_number_of_eq}, @{thm less_number_of}, @{thm le_number_of}];
 
 local
   open Int_Numeral_Simprocs