1.1 --- a/src/HOL/Library/Numeral_Type.thy	Sun Mar 11 13:39:16 2012 +0100
     1.2 +++ b/src/HOL/Library/Numeral_Type.thy	Sun Mar 11 13:54:08 2012 +0100
     1.3 @@ -135,8 +135,8 @@
     1.4  
     1.5  end
     1.6  
     1.7 -locale mod_ring = mod_type +
     1.8 -  constrains n :: int
     1.9 +locale mod_ring = mod_type n Rep Abs
    1.10 +  for n :: int
    1.11    and Rep :: "'a::{number_ring} \<Rightarrow> int"
    1.12    and Abs :: "int \<Rightarrow> 'a::{number_ring}"
    1.13  begin