Searched refs:AMB (Results 1 - 1 of 1) sorted by relevance
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/t/ |
| H A D | mbi_rand.t | 31 my ($A,$B,$As,$Bs,$ADB,$AMB,$la,$lb);
61 ($ADB,$AMB) = $A->copy()->bdiv($B);
62 # print "# ($A / $B, $A % $B ) = $ADB $AMB\n";
65 "# tried $ADB * $B + $two*$AMB - $AMB\n"
66 unless ok ($ADB*$B+$two*$AMB-$AMB,$As);
71 ($ADB,$AMB) = $B->copy()->bdiv($A);
72 #print "check: $ADB $AMB";
74 "# tried $ADB * $A + $two*$AMB
[all...] |
Completed in 25 milliseconds