18/07/02 12:38:37.90 kbkiBz9c.net
Prelude> length [(x,y)|x<-[-100..100],y<-[-100..100],(x-0.0)^2+(y-0.0)^2<1.1^2]
5
Prelude> length [(x,y)|x<-[-100..100],y<-[-100..100],(x-0.5)^2+(y-0.01)^2<25.3^2]
2018
18/07/02 12:38:37.90 kbkiBz9c.net
Prelude> length [(x,y)|x<-[-100..100],y<-[-100..100],(x-0.0)^2+(y-0.0)^2<1.1^2]
5
Prelude> length [(x,y)|x<-[-100..100],y<-[-100..100],(x-0.5)^2+(y-0.01)^2<25.3^2]
2018