Lines Matching defs:bnan

599 sub bnan
612 Carp::croak ("Tried to set $self to NaN in $class\::bnan()");
615 return if $self->modify('bnan');
868 return ($self->bnan()) if defined $a && defined $p; # error
928 return $self->bnan() if defined $a && defined $p;
1076 return $x->bnan() if (($x->{sign} eq $nan) || ($y->{sign} eq $nan));
1082 return $x->bnan();
1218 return $x->bnan()
1225 return $x->bnan() unless defined $rc; # not possible to take log?
1264 return $x->bnan() if $x->{sign} !~ /^[+-]$/; # x NaN?
1270 return $x->bnan() if $y->{sign} !~ /^[+-]$/; # y NaN?
1393 return $x->bnan() if (($x->{sign} eq $nan) || ($y->{sign} eq $nan));
1398 return $x->bnan() if $x->is_zero() || $y->is_zero();
1427 return wantarray ? ($x->bnan(),$self->bnan()) : $x->bnan()
1434 return wantarray ? ($x->bnan(),$self->bnan()) : $x->bnan();
1584 return $x->bnan()
1595 return $x->bnan() if !defined $x->{value}; # in case no GCD found
1612 return $num->bnan() if ($mod->{sign} ne '+' # NaN, - , -inf, +inf
1619 return $num->bnan();
1625 return $num->bnan() if $num->{sign} !~ /^[+-]$/;
1643 return $x->bnan() if $x->{sign} ne '+'; # NaN, <0 etc => NaN
1670 return $x->bnan() if $x->{sign} eq $nan || $y->{sign} eq $nan;
1682 return $x->bnan() if $y->{sign} eq '-' && !$CALC->_is_one($x->{value});
1705 return $x->bnan() if ($x->{sign} !~ /^[+-]$/ || $y->{sign} !~ /^[+-]$/);
1708 $n = 2 if !defined $n; return $x->bnan() if $n <= 0 || $y->{sign} eq '-';
1728 return $x->bnan() if ($x->{sign} !~ /^[+-]$/ || $y->{sign} !~ /^[+-]$/);
1732 $n = 2 if !defined $n; return $x->bnan() if $n <= 0 || $y->{sign} eq '-';
1792 return $x->bnan() if ($x->{sign} !~ /^[+-]$/ || $y->{sign} !~ /^[+-]$/);
1829 return $x->bnan() if ($x->{sign} !~ /^[+-]$/ || $y->{sign} !~ /^[+-]$/);
1870 return $x->bnan() if ($x->{sign} !~ /^[+-]$/ || $y->{sign} !~ /^[+-]$/);
1928 return $x->bnan() if $x->{sign} !~ /^\+/; # -x or -inf or NaN => NaN
1955 return $x->bnan() if $x->{sign} !~ /^\+/ || $y->is_zero() ||
2442 return $x->bnan() if $hs !~ /^[\-\+]?0x[0-9A-Fa-f]+$/;
2461 return $x->bnan() if $bs !~ /^[+-]?0b[01]+$/;
2545 return $x->bnan() if ($x->{sign} eq $nan) || ($ty->{sign} eq $nan);
2580 $nan = Math::BigInt->bnan(); # create a NotANumber
2613 $x->bnan(); # set $x to NaN
2731 $nan = Math::BigInt->bnan();
2907 =head2 bnan
2909 $x = Math::BigInt->bnan();
2914 $x->bnan();