Create p3.hs