Create Problem1.hs