Create p8.hs