more Point in Circle

Haskell