Home
last modified time | relevance | path

Searched refs:badd (Results 1 – 20 of 20) sorted by relevance

/mirbsd/src/gnu/usr.bin/perl/lib/Math/BigInt/t/
Dupgradef.t55 sub badd
78 $x = $class->new(123); $y = $ECL->new(123); $z = $x->badd($y);
Duse_lib1.t39 ok (Math::BigFloat->new(123)->badd(123),246);
Duse_lib2.t40 ok (Math::BigFloat->new(123)->badd(123),246);
Duse_lib4.t41 ok (Math::BigFloat->new(123)->badd(123),246);
Duse_lib3.t40 ok (Math::BigFloat->new(123)->badd(123),246);
Dbigintpm.inc102 } elsif ($f eq "badd"){
268 $x = $class->new(-5); $y = $class->new(3); $x->badd($y); ok ($x,-2); ok ($y,3);
274 $x = $class->new(5); $y = $class->new(3); $x->badd($y); ok ($x,8); ok ($y,3);
280 $x = $class->new(5); $y = $class->new(-3); $x->badd($y); ok ($x,2); ok($y,-3);
336 # check badd(4,5) form
338 $try = "\$x = $class\->badd(4,5);";
393 ok ($class->new(123)->badd(123),246);
394 ok ($class->badd(123,321),444);
395 ok ($class->badd(123,$class->new(321)),444);
1264 &badd
Dinf_nan.t107 my $r = $x->badd($y);
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
Dupgrade.inc124 } elsif ($f eq "badd"){
690 &badd
/mirbsd/src/gnu/usr.bin/perl/lib/Math/BigRat/t/
Dbigrat.t99 ok ($cr->new($mbi->new(3),$mbi->new(7))->badd(1),'10/7');
107 ok ($cr->new('3/7')->badd(1),'10/7');
108 ok ($cr->new('3/10')->badd(1.1),'7/5');
109 ok ($cr->new('3/7')->badd($mbi->new(1)),'10/7');
110 ok ($cr->new('3/10')->badd($mbf->new('1.1')),'7/5');
Dbigratpm.inc95 } elsif ($f eq "badd") {
436 &badd
/mirbsd/src/gnu/usr.bin/perl/lib/
Dbigint.pl139 sub main'badd { #(num_str, num_str) return num_str
163 &'badd($_[$[],&'bneg($_[$[+1]));
Dbigrat.pl109 &norm(&'badd(&'bmul($xn,$yd),&'bmul($yn,$xd)),&'bmul($xd,$yd));
Dbigintpl.t91 &badd
Dbigfloat.pl166 &'badd($q, ((substr($q,$[,1) eq '-') ? '-1' : '+1'));
/mirbsd/src/gnu/usr.bin/perl/lib/Math/
DBigFloat.pm575 sub badd subroutine
605 return $upgrade->badd($x,$y,$a,$p,$r) if defined $upgrade &&
666 return $x->badd($self->bone(),@r); # digits after dot
691 $x->badd($self->bone(),@r); # badd() does round
701 return $x->badd($self->bone('-'),@r); # digits after dot
727 $x->badd($self->bone('-'),@r); # does round
931 $x->badd($next);
933 $over *= $u; $below *= $v; $factor->badd($f);
979 $x->bzero(); $x->badd($LOG_10);
992 $x->bzero(); $x->badd($LOG_2);
[all …]
DBigInt.pm49 '+=' => sub { $_[0]->badd($_[1]); },
95 $c->bneg()->badd( $_[1]) :
97 '+' => sub { $_[0]->copy()->badd($_[1]); },
1066 sub badd
1080 return $upgrade->badd($upgrade->new($x),$upgrade->new($y),@r) if defined $upgrade &&
1161 $x->badd($y,@r); # badd does not leave internal zeros
1184 $x->badd($self->bone(),$a,$p,$r); # badd does round
1200 return $x->badd($self->bone('-'),@r) unless $x->{sign} eq '+'; # inf or NaN
DBigRat.pm498 sub badd subroutine
559 $x->badd($y,@r); # does norm and round
/mirbsd/src/usr.bin/dc/
Dbcode.c97 static void badd(void);
155 { '+', badd },
950 badd(void) in badd() function
/mirbsd/src/gnu/usr.bin/perl/pod/
Dperltoc.pod16415 =item badd