diff options
Diffstat (limited to '')
| -rw-r--r-- | src/Chelleport.hs | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/src/Chelleport.hs b/src/Chelleport.hs new file mode 100644 index 0000000..fdd443a --- /dev/null +++ b/src/Chelleport.hs @@ -0,0 +1,18 @@ +module Chelleport where + +import Graphics.Gloss + +open = + display + ( InWindow + "Hello World" -- window title + (400, 150) -- window size + (10, 10) -- window position + ) + white -- background color + picture -- picture to display + +picture = + Translate (-170) (-20) $ -- shift the text to the middle of the window + Scale 0.5 0.5 $ -- display it half the original size + Text "Hello World" -- text to display |