diff -r dd58f13a8eb4 -r eb85850d3eb7 src/HOL/Library/Primes.thy --- a/src/HOL/Library/Primes.thy Fri Nov 17 02:19:55 2006 +0100 +++ b/src/HOL/Library/Primes.thy Fri Nov 17 02:20:03 2006 +0100 @@ -11,10 +11,11 @@ begin definition - coprime :: "nat => nat => bool" + coprime :: "nat => nat => bool" where "coprime m n = (gcd (m, n) = 1)" - prime :: "nat \ bool" +definition + prime :: "nat \ bool" where "prime p = (1 < p \ (\m. m dvd p --> m = 1 \ m = p))"