Re^2: Answer: How do I create/detect/handle Infinity?

NaN doesn't test as == anything, even another NaN.

I was wondering:

unless ($x <= $inf) { print "\$x is definitely a NaN\n" }
else { print "\$x is definitely NOT a NaN\n" }
[download]

Is that reliable ? ... assuming, of course, that $inf is in fact + infinity, and that there are no bugs present.
Seems to me that ought to be good enough.

Cheers,
Rob

Comment on Re^2: Answer: How do I create/detect/handle Infinity? Download Code

Replies are listed 'Best First'.
Re^3: Answer: How do I create/detect/handle Infinity? by ysth (Canon) on Jul 26, 2009 at 10:12 UTC
Yes. Other ways: `$isnan = ($x != $x); $isnan = ! defined($x <=> 0);` [download] -- Online Fortune Cookie Search Office Space merchandise	[reply] [d/l]
Re^4: Answer: How do I create/detect/handle Infinity? by syphilis (Archbishop) on Jul 26, 2009 at 12:07 UTC
$isnan = ! defined($x <=> 0); Ooow ... wasn't aware that perl did that. In the mpfr library, the mpfr_cmp(x,y) function will return -1 if x<y, +1 if x>y. Otherwise it returns 0 (and sets the erange flag iff one/both of the arguments is a nan). So, I'm left wondering whether, in Math::MPFR (which more-or-less wraps the mpfr library), the spaceship operator (which overloads the mpfr_cmp function) should: a) adhere to mpfr library behaviour and return 0 and set the erange flag when nans are involved; or b) adhere to perl behaviour and return undef when nans are involved. If b), then there's also the question of whether the erange flag should still be set. Interested to hear any thoughts on that. Cheers, Rob	[reply]
Re^5: Answer: How do I create/detect/handle Infinity? by ysth (Canon) on Jul 26, 2009 at 20:32 UTC
I think it really depends on whether you expect people to use Math::MPFR as an extension of what they can do with numbers in Perl or to have a Perl interface to using mpfr. -- Online Fortune Cookie Search Office Space merchandise	[reply]