1N/A chdir 't' if -d 't'; 1N/A# testing of Math::BigRat 1N/A############################################################################## 1N/A # input ala '1+1/3' isn't parsed ok yet 1N/A ############################################################################ 1N/A # other classes as input 1N/A# failed due to BigFlaot bug 1N/A############################################################################## 1N/A############################################################################## 1N/A '1732050807568877293527446341505872366943/' 1N/A .'2000000000000000000000000000000000000000');
1N/A############################################################################## 1N/A#$x = $cr->new('2/3'); $z = $x->bpow('5/3'); ok ($x,'32/81 ???'); 1N/A############################################################################## 1N/Afor (my $i = 0; $i < 8; $i++) 1N/A# test for $self->bnan() vs. $x->bnan(); 1N/A############################################################################## 1N/A############################################################################## 1N/A############################################################################## 1N/A############################################################################## 1N/A############################################################################## 1N/A# broot(), bmodpow() and bmodinv() 1N/A# square root with exact result 1N/A# log with exact result 1N/Aok ($x->copy()->blog(2), '8000563442710106079310294693803606983661/1000000000000000000000000000000000000000');
1N/A##############################################################################