This is the same example as presented in the tutorial, See section A Haggis tutorial:
module Main(main) where
import Haggis
main =
wopen ["*title: Hello"]
(label "Hello, World") >>
return ()
The Hello, World example consist of two parts:
label :: Picture -> Component (Label, DisplayHandle)