src/HOL/Tools/Presburger/cooper_dec.ML
changeset 15661 9ef583b08647
parent 15574 b1d1b5bfc464
child 15859 7bc8b9683224
--- a/src/HOL/Tools/Presburger/cooper_dec.ML	Thu Apr 07 09:24:35 2005 +0200
+++ b/src/HOL/Tools/Presburger/cooper_dec.ML	Thu Apr 07 09:25:33 2005 +0200
@@ -92,7 +92,7 @@
 fun dest_numeral (Const("0",Type ("IntDef.int", []))) = 0
    |dest_numeral (Const("1",Type ("IntDef.int", []))) = 1
    |dest_numeral (Const ("Numeral.number_of",_) $ n)= HOLogic.dest_binum n; 
-(*SOME terms often used for pattern matching*) 
+(*Some terms often used for pattern matching*) 
  
 val zero = mk_numeral 0; 
 val one = mk_numeral 1;