rewrite sample/hello.hs