src/HOL/Tools/Presburger/cooper_dec.ML
changeset 23261 85f27f79232f
parent 23253 b1f3f53c60b5
--- a/src/HOL/Tools/Presburger/cooper_dec.ML	Tue Jun 05 18:36:10 2007 +0200
+++ b/src/HOL/Tools/Presburger/cooper_dec.ML	Tue Jun 05 19:19:30 2007 +0200
@@ -222,7 +222,6 @@
 (* ------------------------------------------------------------------------- *) 
 (*gcd calculates gcd (a,b) and helps lcm_num calculating lcm (a,b)*) 
  
-(*BEWARE: replaces Library.gcd!! There is also Library.lcm!*)
 fun gcd (a:IntInf.int) b = if a=0 then b else gcd (b mod a) a ; 
 fun lcm_num a b = (abs a*b) div (gcd (abs a) (abs b));