Searched refs:babs (Results 1 - 6 of 6) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/lib/Math/BigInt/
H A DSubclass.pm59 *babs = \&Math::BigInt::babs;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A Dbigintpl.t61 &babs
H A Dbigfloat.pl145 &norm(&round(&'bdiv($xm.('0' x $scale),$ym),&'babs($ym)),
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DBigRat.pm168 $self->{_d}->blsft($diff_e->babs(),10);
201 $self->{sign} = $self->{_n}->{sign}; $self->{_n}->babs();
204 $self->{_d}->babs(); # normalize
226 $self->{sign} = $self->{_n}->{sign}; $self->{_n}->babs();
595 my $u = $x->copy()->babs();
853 return $y->is_odd() ? $x->round(@r) : $x->babs()->round(@r);
900 my $y1 = $MBI->new($y->{_n}/$y->{_d})->babs();
1039 $x->{_n}->blsft($x->{_d}->exponent()->babs(),10); # 7.1/4.51 => 7.1/45.1
1045 $x->{_d}->blsft($x->{_n}->exponent()->babs(),10); # 71/45.1 => 710/45.1
H A DBigInt.pm78 'abs' => sub { $_[0]->copy()->babs(); },
956 sub babs subroutine
962 return $x if $x->modify('babs');
1263 my $x = $y->copy()->babs(); # keep arguments
2620 $x->babs(); # absolute value
3022 =head2 babs
3024 $x->babs();
3662 $x = Math::BigInt->babs("-12345"); # BigInt "12345"
3771 C<babs()> etc), instead of O(N) and thus nearly always take much less time.
H A DBigFloat.pm1907 return $MBI->_is_odd($y1) ? $x : $x->babs(1);
2510 $x->babs(); # absolute value

Completed in 41 milliseconds