RosettaCodeData/Task/Detect-division-by-zero/Pure/detect-division-by-zero-2.pure

4 lines
78 B
Plaintext

> inf_or_nan x = infp x || nanp x;
> map inf_or_nan [1/0, -1/0, 0/0];
[1,1,1]