trivial
authorChristian Urban <urbanc@in.tum.de>
Thu, 14 Jan 2010 23:51:17 +0100
changeset 886 eb84e8ca214f
parent 885 fe7d27e197e5
child 887 d2660637e764
trivial
Quot/quotient_info.ML
--- a/Quot/quotient_info.ML	Thu Jan 14 23:48:31 2010 +0100
+++ b/Quot/quotient_info.ML	Thu Jan 14 23:51:17 2010 +0100
@@ -219,8 +219,7 @@
     | SOME l =>
       (case (find_first matches l) of
         SOME x => x
-      | NONE => raise NotFound
-      )
+      | NONE => raise NotFound)
   end
 
 fun print_qconstinfo ctxt =