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 _______________________________________________ Haskell-Cafe mailing list [email protected] http://www.haskell.org/mailman/listinfo/haskell-cafe
