Create q2.hs