--- a/RandomBlumBlumShub.st	Fri Mar 02 14:04:29 2018 +0100
+++ b/RandomBlumBlumShub.st	Fri Mar 02 14:04:31 2018 +0100
@@ -17,7 +17,7 @@
 	instanceVariableNames:'p q m seed'
 	classVariableNames:''
 	poolDictionaries:''
-	category:'Magnitude-Numbers'
+	category:'Magnitude-Numbers-Random'
 !
 
 !RandomBlumBlumShub class methodsFor:'documentation'!