Searched refs:badd (Results 1 - 15 of 15) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/t/
H A Duse_lib1.t39 ok (Math::BigFloat->new(123)->badd(123),246);
H A Duse_lib2.t40 ok (Math::BigFloat->new(123)->badd(123),246);
H A Duse_lib3.t40 ok (Math::BigFloat->new(123)->badd(123),246);
H A Duse_lib4.t41 ok (Math::BigFloat->new(123)->badd(123),246);
H A Dupgradef.t55 sub badd subroutine
78 $x = $class->new(123); $y = $ECL->new(123); $z = $x->badd($y);
H A Dinf_nan.t110 my $r = $x->badd($y);
H A Dmbimbf.inc243 ok ($c->new(123)->badd(123),246);
244 ok ($c->badd(123,321),444);
245 ok ($c->badd(123,$c->new(321)),444);
766 # see if $x->bsub(0) and $x->badd(0) really round
772 $x = $class->new(123); $class->accuracy(2); $x->badd(0);
890 &badd
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A Dbigintpl.t91 &badd
H A Dbigrat.pm241 print $x->badd(1), " ", $y,"\n"; # prints 10 10
H A Dbigint.pm326 print $x->badd(1), " ", $y,"\n"; # prints 10 10
H A Dbignum.pm238 perl -Mbignum -le 'print 1234->binc->badd(6);'
246 perl -Mbignum -le 'print 1234->binc->badd(6);'
365 print $x->badd(1), " ", $y,"\n"; # prints 10 10
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigRat/t/
H A Dbigrat.t96 ok ($cr->new('3/7')->badd(1),'10/7');
97 ok ($cr->new('3/10')->badd(1.1),'7/5');
98 ok ($cr->new('3/7')->badd($mbi->new(1)),'10/7');
99 ok ($cr->new('3/10')->badd($mbf->new('1.1')),'7/5');
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DBigFloat.pm547 sub badd subroutine
577 return $upgrade->badd($x,$y,$a,$p,$r) if defined $upgrade &&
649 $x->badd($y,$a,$p,$r); # badd does not leave internal zeros
651 $x; # already rounded by badd()
661 return $x->badd($self->bone(),@r); # digits after dot
686 $x->badd($self->bone(),@r); # badd() does round
696 return $x->badd($self->bone('-'),@r); # digits after dot
722 $x->badd(
[all...]
H A DBigInt.pm48 '+=' => sub { $_[0]->badd($_[1]); },
84 $c->bneg()->badd($_[1]) :
86 '+' => sub { $_[0]->copy()->badd($_[1]); },
1054 sub badd subroutine
1067 return $x if $x->modify('badd');
1068 return $upgrade->badd($upgrade->new($x),$upgrade->new($y),@r) if defined $upgrade &&
1144 $x->badd($y,@r); # badd does not leave internal zeros
1146 $x; # already rounded by badd() or no round necc.
1169 $x->badd(
[all...]
H A DBigRat.pm409 sub badd subroutine
444 $x->{_n}->badd($m);
466 # flip sign of $x, call badd(), then flip sign of result
469 $x->badd($y,@r); # does norm and round
634 $x->{_n}->badd($x->{_d}); # -5/2 => -7/2
676 $x->{_n}->badd($x->{_d}); # 5/2 => 7/2

Completed in 57 milliseconds