Andrea Amantini / Jul 25 2019
Haskell Template
![](/data/QmSgqz22o7Hg4vkbgxDZRd8si2M8AWi9kUwEW8FzbR9Sn7?content-type=image%2Fpng&filename=Haskell-Logo-Variation.png)
import IHaskell.Display html "<h1>Haskell 💖</h1>"
import IHaskell.Display.Juicypixels import Codec.Picture
renderer :: Int -> Int -> PixelRGB8 renderer x y = let (q, r) = x `quotRem` max 10 y s = fromIntegral . min 0xff in PixelRGB8 (s q) (s r) (s (q + r)) generateImage renderer 800 300