Searched defs:bone (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DBigInt.pm115 # use $_[0]->bone(), it would modify $_[0] to be 1!
708 sub bone subroutine
721 return if $self->modify('bone');
738 # call like: $x->bone($sign,$a,$p,$r,$y);
743 # call like: $x->bone($sign,$a,$p,$r);
1169 $x->badd($self->bone(),$a,$p,$r); # badd does round
1185 return $x->badd($self->bone('-'),@r) unless $x->{sign} eq '+'; # inf/NaN
1977 return $self->bone() if $x->is_zero();
2584 $one = Math::BigInt->bone(); # create a +1
2585 $one = Math::BigInt->bone('
[all...]

Completed in 26 milliseconds