Btw, Cetin, this is good practice, along with -funbox-strict-fields:Where can I read more of such good practice? Looking forward to Real World Haskell to read lots of code, hope it'll help lots of people interested in learning haskell. (Will be released around Christmas here in Germany, I think.)
data RGB = RGB !Int !Int !Int
deriving Show
Much better code than using a lazy triple.
bertram.felgenhauer:
> Cetin Sert wrote::-) fast eyes.
> [snip]
> > colorR :: RandomGen g ⇒ (RGB,RGB) → g → (RGB,g)
> > colorR ((a,b,c),(x,y,z)) s0 = ((r,g,b),s3)
> > where
> > (r,s1) = q (a,x) s0
> > (g,s2) = q (b,y) s1
> > (b,s3) = q (c,z) s2
> > q = randomR
>
> Look closely at how you use the variable 'b'.
Btw, Cetin, this is good practice, along with -funbox-strict-fields:
data RGB = RGB !Int !Int !Int
deriving Show
Much better code than using a lazy triple.
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe