Jack/image-triangles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Merge branch 'master' of https://github.com/bgwines/image-triangles

Browse source
This commit is contained in:
Jack Wines 2018-12-17 14:28:40 -05:00
commit 5b25bbcf7b
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
app/Main.hs
View file

@ -3,10 +3,10 @@ module Main where
import qualified Lib
import Graphics.Image
ii :: IO (Image VU RGB Double)
ii = readImageRGB VU "sierra.jpg"
main :: IO ()
main = do
image <- readImageRGB RPU "sierra.jpg"
Lib.getRandomPixel image >>= print
Lib.getRandomPixel image >>= print
Lib.getRandomPixel image >>= print
image <- readImageRGB VU "sierra.jpg"
displayImage image