Searched refs:bpow (Results 1 - 8 of 8) sorted by relevance
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/t/ |
| H A D | biglog.t | 3 # Test blog function (and bpow, since it uses blog).
96 ok ($cl->new('1.2')->bpow('0.3',10), '1.056219968');
97 ok ($cl->new('10')->bpow('0.6',10), '3.981071706');
103 ok ($cl->new(2)->bpow(32)->blog(2), '32'); # 2 ** 32
104 ok ($cl->new(3)->bpow(32)->blog(3), '32'); # 3 ** 32
105 ok ($cl->new(2)->bpow(65)->blog(2), '65'); # 2 ** 65
135 print "# Tried: $x->bpow($y,$scale);\n"
136 unless ok ($cl->new($x)->bpow($y,$scale),$result);
|
| H A D | bigroot.t | 65 print "# Try: $cl $x->bpow($n)->broot($y,$s) == $result:\n";
66 ok ($cl->new($x)->bpow($n)->broot($y,$scale),$result);
68 print "# Try: $c $x->bpow($n)->broot($y,$s) == $result:\n";
69 ok ($c->new($x)->bpow($n)->broot($y,$scale),$result);
|
| H A D | downgrade.t | 52 # for the bpow() side
53 ok (Math::BigFloat->bpow('2','0.5'),$x->bsqrt());
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigRat/t/ |
| H A D | bigratpm.inc | 89 } elsif ($f eq "bpow") {
92 $try .= '$x->bpow($y);';
795 &bpow
796 # bpow test for overload of **
|
| H A D | bigrat.t | 182 # bpow
184 $x = $cr->new('2/1'); $z = $x->bpow('3/1'); ok ($x,'8');
185 $x = $cr->new('1/2'); $z = $x->bpow('3/1'); ok ($x,'1/8');
186 $x = $cr->new('1/3'); $z = $x->bpow('4/1'); ok ($x,'1/81');
187 $x = $cr->new('2/3'); $z = $x->bpow('4/1'); ok ($x,'16/81');
190 #$x = $cr->new('2/3'); $z = $x->bpow('5/3'); ok ($x,'32/81 ???');
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/ |
| H A D | BigRat.pm | 834 sub bpow subroutine
867 $x->{_n}->bpow($y->{_n}); # x/1 ** y/1 => (x ** y)/1
882 $x->{_n}->bpow($y->{_n}); # 5/2 ** y/1 => 5 ** y / 2 ** y
883 $x->{_d}->bpow($y->{_n});
1061 $x->bmul( $b->copy()->bpow($y), @r);
1071 $x->bdiv( $b->copy()->bpow($y), @r);
|
| H A D | BigFloat.pm | 806 if ($base->as_number()->bpow($int) == $x)
1551 if ($int->copy()->bpow($y) == $x)
1565 $x->bpow($u,$scale+4); # el cheapo
1880 sub bpow subroutine
2147 $x->bdiv($n->bpow($y),$a,$p,$r,$y);
2166 $x->bmul($n->bpow($y),$a,$p,$r,$y);
2523 $x->bpow($y); # power of arguments ($x ** $y)
2948 =item bpow
2950 C<bpow()> now modifies the first argument, unlike the old code which left
2954 print bpow(
[all...] |
| H A D | BigInt.pm | 56 '**=' => sub { $_[0]->bpow($_[1]); },
96 $_[2] ? ref($_[0])->new($_[1])->bpow($_[0]) : $_[0]->copy->bpow($_[1]);
1649 sub bpow subroutine
1663 return $x if $x->modify('bpow');
1665 return $upgrade->bpow($upgrade->new($x),$y,@r)
2636 $x->bpow($y); # power of arguments (x ** y)
3103 =head2 bpow
3105 $x->bpow($y); # power of arguments (x ** y)
4128 =item bpow
[all...] |
Completed in 62 milliseconds