Help for this page

Select Code to Download

Select or download this

use Test::More tests => 10;

...
       . ".33";
    is $bf->bdiv(3), $xpect, $i . ' / 3 = ' . $xpect;
}

Select or download this

for( my $i = 1; $i < 1000000000; $i *= 10 ) {
    my $bf = Math::BigFloat->new( $i );
...
       . ".33";
    is $bf->bdiv(3)->bfround(-2), $xpect, $i . ' / 3 = ' . $xpect;
}