simplified definition of axclass cpo

--- a/src/HOLCF/Pcpo.thy	Tue Sep 08 17:07:39 1998 +0200
+++ b/src/HOLCF/Pcpo.thy	Wed Sep 09 16:13:35 1998 +0200
@@ -11,7 +11,7 @@
 (* ********************************************** *)
 axclass cpo < po
         (* class axiom: *)
-  cpo   "chain S ==> ? x. range(S) <<| (x::'a::po)" 
+  cpo   "chain S ==> ? x. range S <<| x" 
 
 (* The class pcpo of pointed cpos *)
 (* ****************************** *)