Lines Matching defs:bpow
53 '**' => sub { $_[2] ? ref($_[0]) -> new($_[1]) -> bpow($_[0])
54 : $_[0] -> copy() -> bpow($_[1]); },
74 '**=' => sub { $_[0] -> bpow($_[1]); },
753 my $emax = $class -> new(2) -> bpow($w - 1) -> bdec();
798 $x = $x -> bpow($bias + $t - 1) -> bmul($mant);
812 $mant = $class -> new(2) -> bpow($t) -> badd($mant);
816 $x = $x -> bpow($t - $expo) -> bmul($mant);
819 $x = $x -> bpow($expo - $t) -> bmul($mant);
2458 $num = $num->bpow($exp)->bmod($mod);
2465 sub bpow {
2477 return $x if $x -> modify('bpow');
2513 return $upgrade -> bpow($x, $y, $a, $p, $r) if defined $upgrade;
2972 $mant = $mant -> bmul($half -> copy() -> bpow($expo));
2975 $mant = $mant -> bmul($two -> copy() -> bpow($expo_abs));
2995 $x = $x -> bpow($mant, $rescale);
2996 my $pow2 = $two -> bpow($expo, $rescale);
2999 # The bpow() below fails with the GMP and GMPz libraries if abs($pow2)
3007 $x = $x -> bpow($pow2, $rescale);
3861 if ($int->copy()->bpow($y) == $x) {
3874 $x = $x->bpow($u, $scale+4); # el cheapo
4065 $x = $x -> bmul($b -> bpow($y), $r[0], $r[1], $r[2], $y);
4096 $x = $x -> bdiv($b -> bpow($y), $r[0], $r[1], $r[2], $y);
5417 my $emax = $class -> new(2) -> bpow($w - 1) -> bdec();
5431 $mant = $class -> new(2) -> bpow($t - 1);
5489 $mant = $mant -> bmul($binv -> copy() -> bpow($expo));
5492 $mant = $mant -> bmul($b -> copy() -> bpow($expo_abs));
5531 my $const = $class -> new($b) -> bpow($t - 1);
5553 my $const = $class -> new($b) -> bpow($t);
6332 $x->bpow($y); # power of arguments (x ** y)