Re: [Haskell-cafe] random colors, stack space overflow, mersenne and mersenne.pure64

cetin.sert:

random = color2 randomR = colorR

color2 :: RandomGen g .$B"M.(B g .$B"*.(B (RGB,g) color2 = colorR (minRGB,maxRGB)

color :: RandomGen g .$B"M.(B g .$B"*.(B (RGB,g) color s0 = ((r,g,b),s3) where

^^^^^^^^^^ There's some corruption in this text. Could you post the file somewhere? -- Don