Create PointInCircle.hs