10 lines
318 B
Haskell
10 lines
318 B
Haskell
import Graphics.Gloss
|
|
import Graphics.Gloss.Data.Color (makeColor, red)
|
|
|
|
main :: IO ()
|
|
main = display (InWindow "Hello World" (500,500) (100,100))
|
|
(makeColor 0.9 0.9 0.9 1)
|
|
(Pictures [ Color red (Circle 1000)
|
|
, Text "Hello World Text"
|
|
])
|