--- a/src/HOL/ex/Qsort.thy Thu Nov 30 12:58:44 1995 +0100
+++ b/src/HOL/ex/Qsort.thy Fri Dec 01 12:03:13 1995 +0100
@@ -8,7 +8,7 @@
Qsort = Sorting +
consts
- qsort :: "[['a,'a] => bool, 'a list] => 'a list"
+ qsort :: [['a,'a] => bool, 'a list] => 'a list
rules