Skip to content
Browse files

256, not 255

  • Loading branch information...
1 parent 9d6741d commit 582bd57126a2e72f6b6e971ae116815b060a88dd @substack committed Mar 21, 2010
Showing with 1 addition and 1 deletion.
  1. +1 −1 examples/noise.hs
View
2 examples/noise.hs
@@ -4,4 +4,4 @@ import System.Random
main = do
g <- newStdGen
(savePngFile "noise.png" =<<) . newImage (400,300) $ do
- setPixels $ map fromInteger $ randomRs (0,255^3) g
+ setPixels $ map fromInteger $ randomRs (0,256^3-1) g

0 comments on commit 582bd57

Please sign in to comment.
Something went wrong with that request. Please try again.