Create polygon.hs