Create Sub.hs