Skip to content

Instantly share code, notes, and snippets.

@spockz

spockz/gist:348907

Created March 30, 2010 08:21
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save spockz/348907 to your computer and use it in GitHub Desktop.
Save spockz/348907 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.hs
pixels = concat
[[renderPixel depth i j raymaker world | i <- [0..(h `div` 2 - 1)], j <- [0..w-1]] `using` parListChunk (w*h `div` 4) rdeepseq
,[renderPixel depth i j raymaker world | i <- [(h `div` 2)..h-1], j <- [0..w-1]]] `using` parListChunk (w*h `div` 4) rdeepseq
`using` parListChunk (w*h `div` 4) rdeepseq
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment