PATH=/usr/bin:/bin:/home/fly1800/cpanfly-5.18/var/megalib/bin Start 2016-04-23T08:22:49 ActivePerl-1800 CPAN-2.10 Reading '/home/fly1800/cpanfly-5.18/var/cpan/Metadata' Database was generated on Sat, 23 Apr 2016 04:17:02 GMT Fetching with LWP: http://ppm.activestate.com/CPAN/authors/id/P/PJ/PJACKLAM/Math-BigInt-GMP-1.50.tar.gz Checksum for /home/fly1800/cpanfly-5.18/var/cpan/sources/authors/id/P/PJ/PJACKLAM/Math-BigInt-GMP-1.50.tar.gz ok Math-BigInt-GMP-1.50/ Math-BigInt-GMP-1.50/BUGS Math-BigInt-GMP-1.50/build/ Math-BigInt-GMP-1.50/build/leak.pl Math-BigInt-GMP-1.50/build/leaktest Math-BigInt-GMP-1.50/build/README Math-BigInt-GMP-1.50/CHANGES Math-BigInt-GMP-1.50/CREDITS Math-BigInt-GMP-1.50/GMP.xs Math-BigInt-GMP-1.50/inc/ Math-BigInt-GMP-1.50/inc/Devel/ Math-BigInt-GMP-1.50/inc/Devel/CheckLib.pm Math-BigInt-GMP-1.50/INSTALL Math-BigInt-GMP-1.50/lib/ Math-BigInt-GMP-1.50/lib/Math/ Math-BigInt-GMP-1.50/lib/Math/BigInt/ Math-BigInt-GMP-1.50/lib/Math/BigInt/GMP.pm Math-BigInt-GMP-1.50/LICENSE Math-BigInt-GMP-1.50/Makefile.PL Math-BigInt-GMP-1.50/MANIFEST Math-BigInt-GMP-1.50/MANIFEST.SKIP Math-BigInt-GMP-1.50/META.json Math-BigInt-GMP-1.50/META.yml Math-BigInt-GMP-1.50/README Math-BigInt-GMP-1.50/SIGNATURE Math-BigInt-GMP-1.50/t/ Math-BigInt-GMP-1.50/t/00sig.t Math-BigInt-GMP-1.50/t/01load.t Math-BigInt-GMP-1.50/t/02pod.t Math-BigInt-GMP-1.50/t/03podcov.t Math-BigInt-GMP-1.50/t/bigfltpm.inc Math-BigInt-GMP-1.50/t/bigfltpm.t Math-BigInt-GMP-1.50/t/bigintg.t Math-BigInt-GMP-1.50/t/bigintpm.inc Math-BigInt-GMP-1.50/t/bigintpm.t Math-BigInt-GMP-1.50/t/biglog.t Math-BigInt-GMP-1.50/t/bigroot.t Math-BigInt-GMP-1.50/t/mbi-from-big-scalar.t Math-BigInt-GMP-1.50/t/storable.t Math-BigInt-GMP-1.50/t/threads.t Math-BigInt-GMP-1.50/TODO Math-BigInt-GMP-1.50/typemap Configuring P/PJ/PJACKLAM/Math-BigInt-GMP-1.50.tar.gz with Makefile.PL >>> /home/fly1800/ap1800-297235/bin/perl-static Makefile.PL Checking if your kit is complete... Looks good Have /home/fly1800/cpanfly-5.18/var/megalib Want /home/fly1800/ap1800-297235/lib Your perl and your Config.pm seem to have different ideas about the architecture they are running on. Perl thinks: [megalib] Config says: [x86_64-linux-thread-multi] This may or may not cause problems. Please check your installation of perl if you have problems building this extension. Generating a Unix-style Makefile Writing Makefile for Math::BigInt::GMP Writing MYMETA.yml and MYMETA.json PJACKLAM/Math-BigInt-GMP-1.50.tar.gz /home/fly1800/ap1800-297235/bin/perl-static Makefile.PL -- OK Running make for P/PJ/PJACKLAM/Math-BigInt-GMP-1.50.tar.gz >>> make cp lib/Math/BigInt/GMP.pm blib/lib/Math/BigInt/GMP.pm Running Mkbootstrap for Math::BigInt::GMP () chmod 644 "GMP.bs" "/home/fly1800/ap1800-297235/bin/perl-static" "/home/fly1800/cpanfly-5.18/var/megalib/ExtUtils/xsubpp" -typemap "/home/fly1800/ap1800-297235/lib/ExtUtils/typemap" -typemap "typemap" GMP.xs > GMP.xsc && mv GMP.xsc GMP.c gcc -c -D_REENTRANT -D_GNU_SOURCE -DUSE_SITECUSTOMIZE -DPERL_RELOCATABLE_INCPUSH -fno-merge-constants -fno-strict-aliasing -pipe -fstack-protector -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O2 -DVERSION=\"1.50\" -DXS_VERSION=\"1.50\" -fPIC "-I/home/fly1800/ap1800-297235/lib/CORE" GMP.c rm -f blib/arch/auto/Math/BigInt/GMP/GMP.so LD_RUN_PATH="/usr/lib64" gcc -shared -O2 -fstack-protector GMP.o -o blib/arch/auto/Math/BigInt/GMP/GMP.so \ -lgmp \ chmod 755 blib/arch/auto/Math/BigInt/GMP/GMP.so "/home/fly1800/ap1800-297235/bin/perl-static" -MExtUtils::Command::MM -e 'cp_nonempty' -- GMP.bs blib/arch/auto/Math/BigInt/GMP/GMP.bs 644 Manifying 1 pod document PJACKLAM/Math-BigInt-GMP-1.50.tar.gz make -- OK Running make test >>> make test TEST_VERBOSE=1 Running Mkbootstrap for Math::BigInt::GMP () chmod 644 "GMP.bs" PERL_DL_NONLAZY=1 "/home/fly1800/ap1800-297235/bin/perl-static" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/00sig.t ................ skipped: Set the environment variable TEST_SIGNATURE to enable this test. # # Testing with Perl 5.018000, /home/fly1800/ap1800-297235/bin/perl-static # # Version Module # ------- ------ # 1.50 Math::BigInt::GMP # 1.999718 Math::BigInt # t/01load.t ............... 1..2 ok 1 - use Math::BigInt::GMP; ok 2 - use Math::BigInt; ok t/02pod.t ................ 1..1 ok 1 - POD test for blib/lib/Math/BigInt/GMP.pm ok t/03podcov.t ............. 1..1 ok 1 - All modules are covered ok t/bigfltpm.t ............. 1..2407 ok 1 - Math::BigFloat->config()->{class} ok 2 - Math::BigFloat->config()->{with} ok 3 - $c = Math::BigFloat -> new("123.3"); $y = $c -> bsub("123") ok 4 - 0.008 / 3 = 0.0027 ok 5 # skip skipping test which is not for this backend ok 6 - Math::BigFloat->config()->{lib} ok 7 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 8 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 9 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 10 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 11 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 12 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 13 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 14 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 15 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 16 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 17 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 18 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 19 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 20 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 21 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 22 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 23 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 24 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 25 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 26 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 27 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 28 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 29 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 30 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 31 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 32 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 33 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 34 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 35 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat::bgcd($x, $y); ok 36 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat::bgcd($x, $y); ok 37 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 38 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 39 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 40 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 41 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat::bgcd($x, $y); ok 42 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat::bgcd($x, $y); ok 43 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 44 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 45 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 46 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 47 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat::bgcd($x, $y); ok 48 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat::bgcd($x, $y); ok 49 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat::bgcd($x, $y); ok 50 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat::bgcd($x, $y); ok 51 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat::bgcd($x, $y); ok 52 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat::bgcd($x, $y); ok 53 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat::bgcd($x, $y); ok 54 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat::bgcd($x, $y); ok 55 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat::bgcd($x, $y, $z); ok 56 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat::bgcd($x, $y, $z); ok 57 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat::bgcd($x, $y, $z); ok 58 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat::bgcd($x, $y, $z); ok 59 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 60 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 61 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 62 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 63 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 64 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 65 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 66 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 67 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 68 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 69 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::blcm($x, $y); ok 70 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::blcm($x, $y); ok 71 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat::blcm($x, $y); ok 72 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat::blcm($x, $y); ok 73 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat::blcm($x, $y); ok 74 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat::blcm($x, $y); ok 75 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 76 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 77 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 78 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 79 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 80 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 81 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 82 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 83 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 84 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 85 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 86 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 87 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 88 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 89 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 90 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 91 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 92 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 93 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 94 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 95 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 96 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 97 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 98 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 99 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 100 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 101 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 102 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 103 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 104 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 105 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 106 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 107 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 108 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 109 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 110 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 111 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 112 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 113 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 114 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 115 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 116 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 117 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 118 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 119 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 120 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 121 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 122 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 123 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 124 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 125 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 126 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 127 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 128 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 129 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 130 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 131 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 132 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 133 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 134 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 135 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 136 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 137 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 138 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 139 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 140 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 141 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 142 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 143 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 144 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 145 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 146 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 147 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 148 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 149 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 150 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 151 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 152 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 153 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 154 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 155 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 156 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 157 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 158 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 159 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 160 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 161 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 162 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 163 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 164 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 165 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 166 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 167 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 168 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 169 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 170 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 171 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 172 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 173 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 174 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 175 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 176 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 177 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 178 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 179 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 180 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 181 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 182 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 183 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 184 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 185 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 186 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 187 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 188 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 189 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 190 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 191 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 192 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 193 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 194 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 195 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 196 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 197 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 198 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 199 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 200 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 201 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 202 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 203 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 204 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 205 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 206 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 207 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 208 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 209 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 210 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 211 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 212 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 213 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 214 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 215 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 216 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 217 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 218 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 219 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 220 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 221 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 222 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 223 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 224 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 225 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 226 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 227 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 228 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 229 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 230 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 231 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 232 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 233 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 234 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 235 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 236 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 237 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 238 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 239 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 240 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 241 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 242 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 243 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 244 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 245 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 246 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 247 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 248 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 249 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 250 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 251 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 252 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 253 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 254 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 255 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 256 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 257 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 258 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 259 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 260 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 261 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 262 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 263 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 264 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 265 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 266 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 267 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 268 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 269 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 270 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 271 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 272 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 273 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 274 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 275 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 276 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 277 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 278 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 279 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 280 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 281 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 282 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 283 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 284 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 285 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 286 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 287 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 288 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 289 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 290 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 291 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 292 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 293 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 294 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 295 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 296 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 297 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 298 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 299 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 300 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 301 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 302 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 303 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 304 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 305 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 306 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 307 - $x = Math::BigFloat->new("NaNbrsft"); $y = Math::BigFloat->new("2"); $x >> $y; ok 308 - $x = Math::BigFloat->new("NaNbrsft"); $y = Math::BigFloat->new("2"); $x >> $y; ok 309 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x >> $y; ok 310 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x >> $y; ok 311 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x >> $y; ok 312 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x >> $y; ok 313 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x >> $y; ok 314 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x >> $y; ok 315 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x >> $y; ok 316 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x >> $y; ok 317 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x >> $y; ok 318 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x >> $y; ok 319 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x >> $y; ok 320 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x >> $y; ok 321 - $x = Math::BigFloat->new("NaNblsft"); $y = Math::BigFloat->new("0"); $x << $y; ok 322 - $x = Math::BigFloat->new("NaNblsft"); $y = Math::BigFloat->new("0"); $x << $y; ok 323 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x << $y; ok 324 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x << $y; ok 325 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x << $y; ok 326 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x << $y; ok 327 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x << $y; ok 328 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x << $y; ok 329 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x << $y; ok 330 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x << $y; ok 331 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x << $y; ok 332 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x << $y; ok 333 - $x = Math::BigFloat->new("1"); $x; ok 334 - $x = Math::BigFloat->new("1"); $x; ok 335 - $x = Math::BigFloat->new("-0"); $x; ok 336 - $x = Math::BigFloat->new("-0"); $x; ok 337 - $x = Math::BigFloat->new("bnormNaN"); $x; ok 338 - $x = Math::BigFloat->new("bnormNaN"); $x; ok 339 - $x = Math::BigFloat->new("+inf"); $x; ok 340 - $x = Math::BigFloat->new("+inf"); $x; ok 341 - $x = Math::BigFloat->new("-inf"); $x; ok 342 - $x = Math::BigFloat->new("-inf"); $x; ok 343 - $x = Math::BigFloat->new("123"); $x; ok 344 - $x = Math::BigFloat->new("123"); $x; ok 345 - $x = Math::BigFloat->new("-123.4567"); $x; ok 346 - $x = Math::BigFloat->new("-123.4567"); $x; ok 347 - $x = Math::BigFloat->new("1__2"); $x; ok 348 - $x = Math::BigFloat->new("1__2"); $x; ok 349 - $x = Math::BigFloat->new("1E1__2"); $x; ok 350 - $x = Math::BigFloat->new("1E1__2"); $x; ok 351 - $x = Math::BigFloat->new("11__2E2"); $x; ok 352 - $x = Math::BigFloat->new("11__2E2"); $x; ok 353 - $x = Math::BigFloat->new(".2E-3."); $x; ok 354 - $x = Math::BigFloat->new(".2E-3."); $x; ok 355 - $x = Math::BigFloat->new("1e3e4"); $x; ok 356 - $x = Math::BigFloat->new("1e3e4"); $x; ok 357 - $x = Math::BigFloat->new(".2E2"); $x; ok 358 - $x = Math::BigFloat->new(".2E2"); $x; ok 359 - $x = Math::BigFloat->new("1.E3"); $x; ok 360 - $x = Math::BigFloat->new("1.E3"); $x; ok 361 - $x = Math::BigFloat->new("0e0"); $x; ok 362 - $x = Math::BigFloat->new("0e0"); $x; ok 363 - $x = Math::BigFloat->new("+0e0"); $x; ok 364 - $x = Math::BigFloat->new("+0e0"); $x; ok 365 - $x = Math::BigFloat->new("+0e+0"); $x; ok 366 - $x = Math::BigFloat->new("+0e+0"); $x; ok 367 - $x = Math::BigFloat->new("-0e+0"); $x; ok 368 - $x = Math::BigFloat->new("-0e+0"); $x; ok 369 - $x = Math::BigFloat->new("0e-0"); $x; ok 370 - $x = Math::BigFloat->new("0e-0"); $x; ok 371 - $x = Math::BigFloat->new("-0e-0"); $x; ok 372 - $x = Math::BigFloat->new("-0e-0"); $x; ok 373 - $x = Math::BigFloat->new("+0e-0"); $x; ok 374 - $x = Math::BigFloat->new("+0e-0"); $x; ok 375 - $x = Math::BigFloat->new("000"); $x; ok 376 - $x = Math::BigFloat->new("000"); $x; ok 377 - $x = Math::BigFloat->new("00e2"); $x; ok 378 - $x = Math::BigFloat->new("00e2"); $x; ok 379 - $x = Math::BigFloat->new("00e02"); $x; ok 380 - $x = Math::BigFloat->new("00e02"); $x; ok 381 - $x = Math::BigFloat->new("000e002"); $x; ok 382 - $x = Math::BigFloat->new("000e002"); $x; ok 383 - $x = Math::BigFloat->new("000e1230"); $x; ok 384 - $x = Math::BigFloat->new("000e1230"); $x; ok 385 - $x = Math::BigFloat->new("00e-3"); $x; ok 386 - $x = Math::BigFloat->new("00e-3"); $x; ok 387 - $x = Math::BigFloat->new("00e+3"); $x; ok 388 - $x = Math::BigFloat->new("00e+3"); $x; ok 389 - $x = Math::BigFloat->new("00e-03"); $x; ok 390 - $x = Math::BigFloat->new("00e-03"); $x; ok 391 - $x = Math::BigFloat->new("00e+03"); $x; ok 392 - $x = Math::BigFloat->new("00e+03"); $x; ok 393 - $x = Math::BigFloat->new("-000"); $x; ok 394 - $x = Math::BigFloat->new("-000"); $x; ok 395 - $x = Math::BigFloat->new("-00e2"); $x; ok 396 - $x = Math::BigFloat->new("-00e2"); $x; ok 397 - $x = Math::BigFloat->new("-00e02"); $x; ok 398 - $x = Math::BigFloat->new("-00e02"); $x; ok 399 - $x = Math::BigFloat->new("-000e002"); $x; ok 400 - $x = Math::BigFloat->new("-000e002"); $x; ok 401 - $x = Math::BigFloat->new("-000e1230"); $x; ok 402 - $x = Math::BigFloat->new("-000e1230"); $x; ok 403 - $x = Math::BigFloat->new("-00e-3"); $x; ok 404 - $x = Math::BigFloat->new("-00e-3"); $x; ok 405 - $x = Math::BigFloat->new("-00e+3"); $x; ok 406 - $x = Math::BigFloat->new("-00e+3"); $x; ok 407 - $x = Math::BigFloat->new("-00e-03"); $x; ok 408 - $x = Math::BigFloat->new("-00e-03"); $x; ok 409 - $x = Math::BigFloat->new("-00e+03"); $x; ok 410 - $x = Math::BigFloat->new("-00e+03"); $x; ok 411 - $x = Math::BigFloat->new("0"); $x->as_number(); ok 412 - $x = Math::BigFloat->new("1"); $x->as_number(); ok 413 - $x = Math::BigFloat->new("1.2"); $x->as_number(); ok 414 - $x = Math::BigFloat->new("2.345"); $x->as_number(); ok 415 - $x = Math::BigFloat->new("-2"); $x->as_number(); ok 416 - $x = Math::BigFloat->new("-123.456"); $x->as_number(); ok 417 - $x = Math::BigFloat->new("-200"); $x->as_number(); ok 418 - $x = Math::BigFloat->new("-inf"); $x->as_number(); ok 419 - $x = Math::BigFloat->new("inf"); $x->as_number(); ok 420 - $x = Math::BigFloat->new("NaN"); $x->as_number(); ok 421 - $x = Math::BigFloat->new("71243225429896467497217836789578596379"); $x->as_number(); ok 422 - $x = Math::BigFloat->new("0.000641"); $x->as_number(); ok 423 - $x = Math::BigFloat->new("0.0006412"); $x->as_number(); ok 424 - $x = Math::BigFloat->new("0.00064123"); $x->as_number(); ok 425 - $x = Math::BigFloat->new("0.000641234"); $x->as_number(); ok 426 - $x = Math::BigFloat->new("0.0006412345"); $x->as_number(); ok 427 - $x = Math::BigFloat->new("0.00064123456"); $x->as_number(); ok 428 - $x = Math::BigFloat->new("0.000641234567"); $x->as_number(); ok 429 - $x = Math::BigFloat->new("0.0006412345678"); $x->as_number(); ok 430 - $x = Math::BigFloat->new("0.00064123456789"); $x->as_number(); ok 431 - $x = Math::BigFloat->new("0.1"); $x->as_number(); ok 432 - $x = Math::BigFloat->new("0.01"); $x->as_number(); ok 433 - $x = Math::BigFloat->new("0.001"); $x->as_number(); ok 434 - $x = Math::BigFloat->new("0.0001"); $x->as_number(); ok 435 - $x = Math::BigFloat->new("0.00001"); $x->as_number(); ok 436 - $x = Math::BigFloat->new("0.000001"); $x->as_number(); ok 437 - $x = Math::BigFloat->new("0.0000001"); $x->as_number(); ok 438 - $x = Math::BigFloat->new("0.00000001"); $x->as_number(); ok 439 - $x = Math::BigFloat->new("0.000000001"); $x->as_number(); ok 440 - $x = Math::BigFloat->new("0.0000000001"); $x->as_number(); ok 441 - $x = Math::BigFloat->new("0.00000000001"); $x->as_number(); ok 442 - $x = Math::BigFloat->new("0.12345"); $x->as_number(); ok 443 - $x = Math::BigFloat->new("0.123456"); $x->as_number(); ok 444 - $x = Math::BigFloat->new("0.1234567"); $x->as_number(); ok 445 - $x = Math::BigFloat->new("0.12345678"); $x->as_number(); ok 446 - $x = Math::BigFloat->new("0.123456789"); $x->as_number(); ok 447 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 448 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 449 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 450 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 451 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 452 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 453 - $x = Math::BigFloat->new("+inf"); $x->as_hex(); ok 454 - $x = Math::BigFloat->new("-inf"); $x->as_hex(); ok 455 - $x = Math::BigFloat->new("hexNaN"); $x->as_hex(); ok 456 - $x = Math::BigFloat->new("0"); $x->as_hex(); ok 457 - $x = Math::BigFloat->new("5"); $x->as_hex(); ok 458 - $x = Math::BigFloat->new("-5"); $x->as_hex(); ok 459 - $x = Math::BigFloat->new("+inf"); $x->as_bin(); ok 460 - $x = Math::BigFloat->new("-inf"); $x->as_bin(); ok 461 - $x = Math::BigFloat->new("hexNaN"); $x->as_bin(); ok 462 - $x = Math::BigFloat->new("0"); $x->as_bin(); ok 463 - $x = Math::BigFloat->new("5"); $x->as_bin(); ok 464 - $x = Math::BigFloat->new("-5"); $x->as_bin(); ok 465 - $x = Math::BigFloat->new("0"); $x->numify(); ok 466 - $x = Math::BigFloat->new("+1"); $x->numify(); ok 467 - $x = Math::BigFloat->new("1234"); $x->numify(); ok 468 - $x = Math::BigFloat->new("-5"); $x->numify(); ok 469 - $x = Math::BigFloat->new("100"); $x->numify(); ok 470 - $x = Math::BigFloat->new("-100"); $x->numify(); ok 471 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 472 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 473 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 474 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 475 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 476 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 477 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 478 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 479 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 480 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 481 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 482 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 483 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 484 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 485 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 486 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 487 - $x = Math::BigFloat->new("0"); $x->bone(""); ok 488 - $x = Math::BigFloat->new("0"); $x->bone(""); ok 489 - $x = Math::BigFloat->new("-2"); $x->bone(""); ok 490 - $x = Math::BigFloat->new("-2"); $x->bone(""); ok 491 - $x = Math::BigFloat->new("abc"); $x->bone(""); ok 492 - $x = Math::BigFloat->new("abc"); $x->bone(""); ok 493 - $x = Math::BigFloat->new("2"); $x->bone("abc"); ok 494 - $x = Math::BigFloat->new("2"); $x->bone("abc"); ok 495 - $x = Math::BigFloat->new("+inf"); $x->bsstr(); ok 496 - $x = Math::BigFloat->new("-inf"); $x->bsstr(); ok 497 - $x = Math::BigFloat->new("abcfsstr"); $x->bsstr(); ok 498 - $x = Math::BigFloat->new("-abcfsstr"); $x->bsstr(); ok 499 - $x = Math::BigFloat->new("1234.567"); $x->bsstr(); ok 500 - $x = Math::BigFloat->new("123"); $x->bsstr(); ok 501 - $x = Math::BigFloat->new("-5"); $x->bsstr(); ok 502 - $x = Math::BigFloat->new("-100"); $x->bsstr(); ok 503 - $x = Math::BigFloat->new("+inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 504 - $x = Math::BigFloat->new("-inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 505 - $x = Math::BigFloat->new("abcfstr"); $x->accuracy(); $x->precision(); $x->bstr(); ok 506 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(9); $x->precision(); $x->bstr(); ok 507 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(); $x->precision(-6); $x->bstr(); ok 508 - $x = Math::BigFloat->new("12345"); $x->accuracy(5); $x->precision(); $x->bstr(); ok 509 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(6); $x->precision(); $x->bstr(); ok 510 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(); $x->precision(-8); $x->bstr(); ok 511 - $x = Math::BigFloat->new("0"); $x->accuracy(4); $x->precision(); $x->bstr(); ok 512 - $x = Math::BigFloat->new("0"); $x->accuracy(); $x->precision(-4); $x->bstr(); ok 513 - $x = Math::BigFloat->new("inf"); $x; ok 514 - $x = Math::BigFloat->new("inf"); $x; ok 515 - $x = Math::BigFloat->new("+inf"); $x; ok 516 - $x = Math::BigFloat->new("+inf"); $x; ok 517 - $x = Math::BigFloat->new("-inf"); $x; ok 518 - $x = Math::BigFloat->new("-inf"); $x; ok 519 - $x = Math::BigFloat->new("+infinity"); $x; ok 520 - $x = Math::BigFloat->new("+infinity"); $x; ok 521 - $x = Math::BigFloat->new("+-inf"); $x; ok 522 - $x = Math::BigFloat->new("+-inf"); $x; ok 523 - $x = Math::BigFloat->new("abc"); $x; ok 524 - $x = Math::BigFloat->new("abc"); $x; ok 525 - $x = Math::BigFloat->new(" 1 a"); $x; ok 526 - $x = Math::BigFloat->new(" 1 a"); $x; ok 527 - $x = Math::BigFloat->new("1bcd2"); $x; ok 528 - $x = Math::BigFloat->new("1bcd2"); $x; ok 529 - $x = Math::BigFloat->new("11111b"); $x; ok 530 - $x = Math::BigFloat->new("11111b"); $x; ok 531 - $x = Math::BigFloat->new("+1z"); $x; ok 532 - $x = Math::BigFloat->new("+1z"); $x; ok 533 - $x = Math::BigFloat->new("-1z"); $x; ok 534 - $x = Math::BigFloat->new("-1z"); $x; ok 535 - $x = Math::BigFloat->new("0e999"); $x; ok 536 - $x = Math::BigFloat->new("0e999"); $x; ok 537 - $x = Math::BigFloat->new("0e-999"); $x; ok 538 - $x = Math::BigFloat->new("0e-999"); $x; ok 539 - $x = Math::BigFloat->new("-0e999"); $x; ok 540 - $x = Math::BigFloat->new("-0e999"); $x; ok 541 - $x = Math::BigFloat->new("-0e-999"); $x; ok 542 - $x = Math::BigFloat->new("-0e-999"); $x; ok 543 - $x = Math::BigFloat->new("0"); $x; ok 544 - $x = Math::BigFloat->new("0"); $x; ok 545 - $x = Math::BigFloat->new("+0"); $x; ok 546 - $x = Math::BigFloat->new("+0"); $x; ok 547 - $x = Math::BigFloat->new("+00"); $x; ok 548 - $x = Math::BigFloat->new("+00"); $x; ok 549 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 550 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 551 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 552 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 553 - $x = Math::BigFloat->new("-0"); $x; ok 554 - $x = Math::BigFloat->new("-0"); $x; ok 555 - $x = Math::BigFloat->new("-0000"); $x; ok 556 - $x = Math::BigFloat->new("-0000"); $x; ok 557 - $x = Math::BigFloat->new("+1"); $x; ok 558 - $x = Math::BigFloat->new("+1"); $x; ok 559 - $x = Math::BigFloat->new("+01"); $x; ok 560 - $x = Math::BigFloat->new("+01"); $x; ok 561 - $x = Math::BigFloat->new("+001"); $x; ok 562 - $x = Math::BigFloat->new("+001"); $x; ok 563 - $x = Math::BigFloat->new("+00000100000"); $x; ok 564 - $x = Math::BigFloat->new("+00000100000"); $x; ok 565 - $x = Math::BigFloat->new("123456789"); $x; ok 566 - $x = Math::BigFloat->new("123456789"); $x; ok 567 - $x = Math::BigFloat->new("-1"); $x; ok 568 - $x = Math::BigFloat->new("-1"); $x; ok 569 - $x = Math::BigFloat->new("-01"); $x; ok 570 - $x = Math::BigFloat->new("-01"); $x; ok 571 - $x = Math::BigFloat->new("-001"); $x; ok 572 - $x = Math::BigFloat->new("-001"); $x; ok 573 - $x = Math::BigFloat->new("-123456789"); $x; ok 574 - $x = Math::BigFloat->new("-123456789"); $x; ok 575 - $x = Math::BigFloat->new("-00000100000"); $x; ok 576 - $x = Math::BigFloat->new("-00000100000"); $x; ok 577 - $x = Math::BigFloat->new("123.456a"); $x; ok 578 - $x = Math::BigFloat->new("123.456a"); $x; ok 579 - $x = Math::BigFloat->new("123.456"); $x; ok 580 - $x = Math::BigFloat->new("123.456"); $x; ok 581 - $x = Math::BigFloat->new("0.01"); $x; ok 582 - $x = Math::BigFloat->new("0.01"); $x; ok 583 - $x = Math::BigFloat->new(".002"); $x; ok 584 - $x = Math::BigFloat->new(".002"); $x; ok 585 - $x = Math::BigFloat->new("+.2"); $x; ok 586 - $x = Math::BigFloat->new("+.2"); $x; ok 587 - $x = Math::BigFloat->new("-0.0003"); $x; ok 588 - $x = Math::BigFloat->new("-0.0003"); $x; ok 589 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 590 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 591 - $x = Math::BigFloat->new("123456E2"); $x; ok 592 - $x = Math::BigFloat->new("123456E2"); $x; ok 593 - $x = Math::BigFloat->new("123456E-2"); $x; ok 594 - $x = Math::BigFloat->new("123456E-2"); $x; ok 595 - $x = Math::BigFloat->new("-123456E2"); $x; ok 596 - $x = Math::BigFloat->new("-123456E2"); $x; ok 597 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 598 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 599 - $x = Math::BigFloat->new("1e1"); $x; ok 600 - $x = Math::BigFloat->new("1e1"); $x; ok 601 - $x = Math::BigFloat->new("2e-11"); $x; ok 602 - $x = Math::BigFloat->new("2e-11"); $x; ok 603 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 604 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 605 - $x = Math::BigFloat->new(" 000001"); $x; ok 606 - $x = Math::BigFloat->new(" 000001"); $x; ok 607 - $x = Math::BigFloat->new(" -00001"); $x; ok 608 - $x = Math::BigFloat->new(" -00001"); $x; ok 609 - $x = Math::BigFloat->new(" -1"); $x; ok 610 - $x = Math::BigFloat->new(" -1"); $x; ok 611 - $x = Math::BigFloat->new(" 000.01"); $x; ok 612 - $x = Math::BigFloat->new(" 000.01"); $x; ok 613 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 614 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 615 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 616 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 617 - $x = Math::BigFloat->new("-3e111"); $x; ok 618 - $x = Math::BigFloat->new("-3e111"); $x; ok 619 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 620 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 621 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x ** $y; ok 622 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x ** $y; ok 623 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 624 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 625 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x ** $y; ok 626 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x ** $y; ok 627 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 628 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 629 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-21"); $x ** $y; ok 630 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-21"); $x ** $y; ok 631 - $x = Math::BigFloat->new("-21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 632 - $x = Math::BigFloat->new("-21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 633 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("21"); $x ** $y; ok 634 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("21"); $x ** $y; ok 635 - $x = Math::BigFloat->new("21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 636 - $x = Math::BigFloat->new("21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 637 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x ** $y; ok 638 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x ** $y; ok 639 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x ** $y; ok 640 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x ** $y; ok 641 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("9"); $x ** $y; ok 642 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("9"); $x ** $y; ok 643 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 644 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 645 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 646 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 647 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 648 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 649 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 650 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 651 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 652 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 653 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 654 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 655 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x ** $y; ok 656 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x ** $y; ok 657 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 658 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 659 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x ** $y; ok 660 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x ** $y; ok 661 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 662 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 663 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x ** $y; ok 664 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x ** $y; ok 665 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x ** $y; ok 666 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x ** $y; ok 667 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 668 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 669 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 670 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 671 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x ** $y; ok 672 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x ** $y; ok 673 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x ** $y; ok 674 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x ** $y; ok 675 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 676 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 677 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x ** $y; ok 678 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x ** $y; ok 679 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x ** $y; ok 680 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x ** $y; ok 681 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x ** $y; ok 682 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x ** $y; ok 683 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x ** $y; ok 684 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x ** $y; ok 685 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x ** $y; ok 686 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x ** $y; ok 687 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x ** $y; ok 688 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x ** $y; ok 689 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x ** $y; ok 690 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x ** $y; ok 691 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x ** $y; ok 692 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x ** $y; ok 693 - $x = Math::BigFloat->new("bnegNaN"); $x->bneg(); ok 694 - $x = Math::BigFloat->new("bnegNaN"); $x->bneg(); ok 695 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 696 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 697 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 698 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 699 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 700 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 701 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 702 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 703 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 704 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 705 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 706 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 707 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 708 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 709 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 710 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 711 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 712 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 713 - $x = Math::BigFloat->new("babsNaN"); $x->babs(); ok 714 - $x = Math::BigFloat->new("babsNaN"); $x->babs(); ok 715 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 716 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 717 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 718 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 719 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 720 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 721 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 722 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 723 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 724 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 725 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 726 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 727 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 728 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 729 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 730 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 731 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 732 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 733 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 734 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 735 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 736 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 737 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 738 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 739 - $x = Math::BigFloat->new("NaNfround"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 740 - $x = Math::BigFloat->new("NaNfround"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 741 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 742 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 743 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 744 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 745 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 746 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 747 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 748 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 749 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 750 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 751 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 752 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 753 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 754 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 755 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 756 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 757 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 758 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 759 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 760 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 761 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 762 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 763 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 764 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 765 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 766 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 767 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 768 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 769 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 770 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 771 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 772 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 773 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 774 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 775 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 776 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 777 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 778 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 779 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 780 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 781 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 782 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 783 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 784 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 785 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 786 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 787 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 788 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 789 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 790 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 791 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 792 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 793 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 794 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 795 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 796 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 797 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 798 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 799 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 800 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 801 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 802 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 803 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 804 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 805 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 806 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 807 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 808 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 809 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 810 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 811 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 812 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 813 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 814 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 815 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 816 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 817 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 818 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 819 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 820 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 821 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 822 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 823 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 824 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 825 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 826 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 827 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 828 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 829 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 830 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 831 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 832 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 833 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 834 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 835 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 836 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 837 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 838 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 839 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 840 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 841 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 842 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 843 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 844 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 845 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 846 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 847 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 848 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 849 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 850 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 851 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 852 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 853 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 854 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 855 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 856 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 857 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 858 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 859 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 860 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 861 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 862 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 863 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 864 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 865 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 866 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 867 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 868 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 869 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 870 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 871 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 872 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 873 - $x = Math::BigFloat->new("NaNffround"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 874 - $x = Math::BigFloat->new("NaNffround"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 875 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 876 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 877 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 878 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 879 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 880 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 881 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 882 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 883 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 884 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 885 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 886 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 887 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 888 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 889 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 890 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 891 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 892 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 893 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 894 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 895 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 896 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 897 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 898 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 899 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 900 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 901 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 902 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 903 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 904 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 905 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 906 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 907 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 908 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 909 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 910 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 911 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 912 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 913 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 914 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 915 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 916 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 917 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 918 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 919 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 920 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 921 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 922 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 923 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 924 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-4); ok 925 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-5); ok 926 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 927 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 928 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 929 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 930 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 931 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 932 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 933 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 934 - $x = Math::BigFloat->new("+2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 935 - $x = Math::BigFloat->new("-2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 936 - $x = Math::BigFloat->new("+2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 937 - $x = Math::BigFloat->new("-2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 938 - $x = Math::BigFloat->new("+2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 939 - $x = Math::BigFloat->new("-2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 940 - $x = Math::BigFloat->new("+2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 941 - $x = Math::BigFloat->new("-2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 942 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 943 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 944 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-2); ok 945 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-3); ok 946 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-4); ok 947 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-5); ok 948 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 949 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 950 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 951 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 952 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 953 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 954 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 955 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 956 - $x = Math::BigFloat->new("+3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 957 - $x = Math::BigFloat->new("-3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 958 - $x = Math::BigFloat->new("+3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 959 - $x = Math::BigFloat->new("-3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 960 - $x = Math::BigFloat->new("+3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 961 - $x = Math::BigFloat->new("-3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 962 - $x = Math::BigFloat->new("+3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 963 - $x = Math::BigFloat->new("-3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 964 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 965 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 966 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-2); ok 967 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-3); ok 968 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-4); ok 969 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-5); ok 970 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 971 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 972 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 973 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 974 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 975 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 976 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 977 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 978 - $x = Math::BigFloat->new("+4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 979 - $x = Math::BigFloat->new("-4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 980 - $x = Math::BigFloat->new("+4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 981 - $x = Math::BigFloat->new("-4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 982 - $x = Math::BigFloat->new("+4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 983 - $x = Math::BigFloat->new("-4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 984 - $x = Math::BigFloat->new("+4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 985 - $x = Math::BigFloat->new("-4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 986 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 987 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 988 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-2); ok 989 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-3); ok 990 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-4); ok 991 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-5); ok 992 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 993 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 994 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 995 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 996 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 997 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 998 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 999 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1000 - $x = Math::BigFloat->new("+5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1001 - $x = Math::BigFloat->new("-5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1002 - $x = Math::BigFloat->new("+5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1003 - $x = Math::BigFloat->new("-5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1004 - $x = Math::BigFloat->new("+5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1005 - $x = Math::BigFloat->new("-5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1006 - $x = Math::BigFloat->new("+5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1007 - $x = Math::BigFloat->new("-5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1008 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1009 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1010 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-2); ok 1011 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-3); ok 1012 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-4); ok 1013 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-5); ok 1014 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1015 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1016 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1017 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1018 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1019 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1020 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1021 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1022 - $x = Math::BigFloat->new("+6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1023 - $x = Math::BigFloat->new("-6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1024 - $x = Math::BigFloat->new("+6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1025 - $x = Math::BigFloat->new("-6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1026 - $x = Math::BigFloat->new("+6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1027 - $x = Math::BigFloat->new("-6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1028 - $x = Math::BigFloat->new("+6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1029 - $x = Math::BigFloat->new("-6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1030 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1031 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1032 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-2); ok 1033 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1034 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1035 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1036 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1037 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1038 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1039 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1040 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1041 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1042 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1043 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1044 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1045 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1046 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1047 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1048 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1049 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1050 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1051 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1052 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1053 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1054 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1055 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1056 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1057 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1058 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1059 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1060 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("bcmpNaN"); $x->bcmp($y); ok 1061 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1062 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("bcmpNaN"); $x->bcmp($y); ok 1063 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1064 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1065 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1066 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1067 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1068 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1069 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1070 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1071 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1072 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1073 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bcmp($y); ok 1074 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1075 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bcmp($y); ok 1076 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1077 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bcmp($y); ok 1078 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1079 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1080 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bcmp($y); ok 1081 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1082 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bcmp($y); ok 1083 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1084 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bcmp($y); ok 1085 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1086 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bcmp($y); ok 1087 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1088 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bcmp($y); ok 1089 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bcmp($y); ok 1090 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1091 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1092 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1093 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1094 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bcmp($y); ok 1095 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bcmp($y); ok 1096 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1097 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1098 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1099 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1100 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1101 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1102 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1103 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1104 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1105 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bcmp($y); ok 1106 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1107 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bcmp($y); ok 1108 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bcmp($y); ok 1109 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bcmp($y); ok 1110 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bcmp($y); ok 1111 - $x = Math::BigFloat->new("1e1234567890987654321"); $y = Math::BigFloat->new("1e1234567890987654320"); $x->bcmp($y); ok 1112 - $x = Math::BigFloat->new("1e-1234567890987654321"); $y = Math::BigFloat->new("1e-1234567890987654320"); $x->bcmp($y); ok 1113 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1114 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1115 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1116 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1117 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1118 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1119 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1120 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1121 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1122 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1123 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1124 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1125 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1126 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bcmp($y); ok 1127 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1128 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1129 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("bcmpNaN"); $x->bacmp($y); ok 1130 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1131 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("bcmpNaN"); $x->bacmp($y); ok 1132 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1133 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1134 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1135 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1136 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1137 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1138 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1139 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1140 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1141 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1142 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bacmp($y); ok 1143 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1144 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bacmp($y); ok 1145 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1146 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bacmp($y); ok 1147 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1148 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1149 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bacmp($y); ok 1150 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1151 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bacmp($y); ok 1152 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1153 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bacmp($y); ok 1154 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1155 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bacmp($y); ok 1156 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1157 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bacmp($y); ok 1158 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bacmp($y); ok 1159 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1160 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1161 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1162 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1163 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bacmp($y); ok 1164 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bacmp($y); ok 1165 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1166 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1167 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1168 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1169 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1170 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1171 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1172 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1173 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1174 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bacmp($y); ok 1175 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1176 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bacmp($y); ok 1177 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bacmp($y); ok 1178 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bacmp($y); ok 1179 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bacmp($y); ok 1180 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1181 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1182 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1183 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1184 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1185 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1186 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1187 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1188 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1189 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1190 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1191 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1192 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1193 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1194 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1195 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1196 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("bacmpNaN"); $x->bacmp($y); ok 1197 - $x = Math::BigFloat->new("bacmpNaN"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1198 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("bacmpNaN"); $x->bacmp($y); ok 1199 - $x = Math::BigFloat->new("bacmpNaN"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1200 - $x = Math::BigFloat->new("bdecNaN"); --$x; ok 1201 - $x = Math::BigFloat->new("bdecNaN"); --$x; ok 1202 - $x = Math::BigFloat->new("+inf"); --$x; ok 1203 - $x = Math::BigFloat->new("+inf"); --$x; ok 1204 - $x = Math::BigFloat->new("-inf"); --$x; ok 1205 - $x = Math::BigFloat->new("-inf"); --$x; ok 1206 - $x = Math::BigFloat->new("+0"); --$x; ok 1207 - $x = Math::BigFloat->new("+0"); --$x; ok 1208 - $x = Math::BigFloat->new("+1"); --$x; ok 1209 - $x = Math::BigFloat->new("+1"); --$x; ok 1210 - $x = Math::BigFloat->new("-1"); --$x; ok 1211 - $x = Math::BigFloat->new("-1"); --$x; ok 1212 - $x = Math::BigFloat->new("1.23"); --$x; ok 1213 - $x = Math::BigFloat->new("1.23"); --$x; ok 1214 - $x = Math::BigFloat->new("-1.23"); --$x; ok 1215 - $x = Math::BigFloat->new("-1.23"); --$x; ok 1216 - $x = Math::BigFloat->new("100"); --$x; ok 1217 - $x = Math::BigFloat->new("100"); --$x; ok 1218 - $x = Math::BigFloat->new("101"); --$x; ok 1219 - $x = Math::BigFloat->new("101"); --$x; ok 1220 - $x = Math::BigFloat->new("-100"); --$x; ok 1221 - $x = Math::BigFloat->new("-100"); --$x; ok 1222 - $x = Math::BigFloat->new("-99"); --$x; ok 1223 - $x = Math::BigFloat->new("-99"); --$x; ok 1224 - $x = Math::BigFloat->new("-98"); --$x; ok 1225 - $x = Math::BigFloat->new("-98"); --$x; ok 1226 - $x = Math::BigFloat->new("99"); --$x; ok 1227 - $x = Math::BigFloat->new("99"); --$x; ok 1228 - $x = Math::BigFloat->new("bincNaN"); ++$x; ok 1229 - $x = Math::BigFloat->new("bincNaN"); ++$x; ok 1230 - $x = Math::BigFloat->new("+inf"); ++$x; ok 1231 - $x = Math::BigFloat->new("+inf"); ++$x; ok 1232 - $x = Math::BigFloat->new("-inf"); ++$x; ok 1233 - $x = Math::BigFloat->new("-inf"); ++$x; ok 1234 - $x = Math::BigFloat->new("+0"); ++$x; ok 1235 - $x = Math::BigFloat->new("+0"); ++$x; ok 1236 - $x = Math::BigFloat->new("+1"); ++$x; ok 1237 - $x = Math::BigFloat->new("+1"); ++$x; ok 1238 - $x = Math::BigFloat->new("-1"); ++$x; ok 1239 - $x = Math::BigFloat->new("-1"); ++$x; ok 1240 - $x = Math::BigFloat->new("1.23"); ++$x; ok 1241 - $x = Math::BigFloat->new("1.23"); ++$x; ok 1242 - $x = Math::BigFloat->new("-1.23"); ++$x; ok 1243 - $x = Math::BigFloat->new("-1.23"); ++$x; ok 1244 - $x = Math::BigFloat->new("100"); ++$x; ok 1245 - $x = Math::BigFloat->new("100"); ++$x; ok 1246 - $x = Math::BigFloat->new("-100"); ++$x; ok 1247 - $x = Math::BigFloat->new("-100"); ++$x; ok 1248 - $x = Math::BigFloat->new("-99"); ++$x; ok 1249 - $x = Math::BigFloat->new("-99"); ++$x; ok 1250 - $x = Math::BigFloat->new("-101"); ++$x; ok 1251 - $x = Math::BigFloat->new("-101"); ++$x; ok 1252 - $x = Math::BigFloat->new("99"); ++$x; ok 1253 - $x = Math::BigFloat->new("99"); ++$x; ok 1254 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1255 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1256 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1257 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1258 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1259 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1260 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1261 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1262 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1263 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1264 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1265 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1266 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1267 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1268 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1269 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1270 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1271 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1272 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1273 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1274 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1275 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1276 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1277 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1278 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1279 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1280 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1281 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1282 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1283 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1284 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1285 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1286 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1287 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1288 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1289 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1290 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1291 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1292 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1293 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1294 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1295 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1296 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1297 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1298 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1299 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1300 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1301 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1302 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1303 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1304 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1305 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1306 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1307 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1308 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1309 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1310 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1311 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1312 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1313 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1314 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1315 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1316 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1317 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1318 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1319 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1320 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1321 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1322 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1323 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1324 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1325 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1326 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1327 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1328 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1329 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1330 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1331 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1332 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1333 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1334 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1335 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1336 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1337 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1338 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1339 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1340 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x + $y; ok 1341 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x + $y; ok 1342 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x + $y; ok 1343 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x + $y; ok 1344 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x + $y; ok 1345 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x + $y; ok 1346 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1347 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1348 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1349 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1350 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1351 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1352 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1353 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1354 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1355 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1356 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1357 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1358 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1359 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1360 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1361 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1362 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1363 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1364 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1365 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1366 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1367 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1368 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1369 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1370 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1371 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1372 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1373 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1374 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1375 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1376 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1377 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1378 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1379 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1380 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1381 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1382 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1383 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1384 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1385 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1386 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1387 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1388 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1389 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1390 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1391 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1392 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1393 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1394 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1395 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1396 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1397 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1398 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1399 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1400 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1401 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1402 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1403 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1404 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1405 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1406 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1407 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1408 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1409 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1410 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1411 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1412 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1413 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1414 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1415 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1416 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1417 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1418 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1419 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1420 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1421 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1422 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1423 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1424 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1425 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1426 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1427 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1428 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1429 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1430 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1431 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1432 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x - $y; ok 1433 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x - $y; ok 1434 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x - $y; ok 1435 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x - $y; ok 1436 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1437 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1438 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1439 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1440 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1441 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1442 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1443 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1444 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1445 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1446 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1447 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1448 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1449 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1450 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1451 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1452 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1453 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1454 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1455 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1456 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1457 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1458 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1459 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1460 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1461 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1462 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1463 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1464 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1465 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1466 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1467 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1468 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1469 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1470 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1471 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1472 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1473 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1474 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1475 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1476 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1477 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1478 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1479 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1480 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1481 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1482 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1483 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1484 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1485 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1486 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1487 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1488 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1489 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1490 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1491 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1492 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1493 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1494 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1495 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1496 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1497 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1498 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1499 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1500 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1501 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1502 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1503 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1504 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1505 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1506 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1507 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1508 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1509 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1510 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1511 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1512 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1513 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1514 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1515 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1516 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1517 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1518 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1519 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1520 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1521 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1522 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1523 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1524 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1525 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1526 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1527 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1528 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1529 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1530 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1531 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1532 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1533 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1534 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1535 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1536 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1537 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1538 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1539 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1540 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1541 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1542 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1543 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1544 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1545 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1546 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1547 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1548 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1549 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1550 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1551 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1552 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1553 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1554 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1555 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1556 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1557 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1558 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1559 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1560 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1561 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1562 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1563 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1564 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1565 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1566 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1567 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1568 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1569 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1570 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1571 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1572 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1573 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1574 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1575 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1576 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1577 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1578 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1579 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1580 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1581 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1582 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1583 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1584 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1585 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1586 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1587 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1588 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1589 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1590 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1591 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1592 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1593 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1594 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1595 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1596 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1597 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1598 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1599 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1600 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1601 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1602 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1603 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1604 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1605 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1606 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1607 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1608 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1609 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1610 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1611 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1612 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1613 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1614 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1615 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1616 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x * $y; ok 1617 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x * $y; ok 1618 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1619 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1620 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1621 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1622 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1623 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1624 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1625 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1626 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1627 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1628 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1629 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1630 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x * $y; ok 1631 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x * $y; ok 1632 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x * $y; ok 1633 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x * $y; ok 1634 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x * $y; ok 1635 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x * $y; ok 1636 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x * $y; ok 1637 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x * $y; ok 1638 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x * $y; ok 1639 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x * $y; ok 1640 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x * $y; ok 1641 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x * $y; ok 1642 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x * $y; ok 1643 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x * $y; ok 1644 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1645 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1646 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1647 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1648 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1649 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1650 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1651 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1652 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1653 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1654 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1655 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1656 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1657 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1658 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1659 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1660 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1661 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1662 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x * $y; ok 1663 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x * $y; ok 1664 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x * $y; ok 1665 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x * $y; ok 1666 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1667 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1668 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1669 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1670 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1671 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1672 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1673 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1674 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1675 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1676 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1677 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1678 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1679 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1680 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1681 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1682 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1683 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1684 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1685 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1686 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1687 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1688 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1689 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1690 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1691 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1692 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1693 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1694 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1695 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1696 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1697 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1698 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1699 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1700 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1701 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1702 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1703 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1704 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1705 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1706 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1707 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1708 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1709 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1710 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1711 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1712 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1713 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1714 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1715 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1716 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1717 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1718 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1719 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1720 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1721 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1722 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1723 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1724 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1725 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1726 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1727 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1728 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1729 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1730 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1731 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1732 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1733 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1734 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1735 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1736 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1737 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1738 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1739 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1740 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1741 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1742 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1743 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1744 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1745 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1746 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1747 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1748 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1749 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1750 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1751 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1752 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1753 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1754 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1755 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1756 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1757 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1758 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1759 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1760 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1761 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1762 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1763 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1764 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1765 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1766 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1767 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1768 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1769 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1770 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1771 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1772 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1773 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1774 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1775 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1776 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1777 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1778 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1779 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1780 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1781 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1782 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1783 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1784 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1785 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1786 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1787 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1788 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1789 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1790 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1791 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1792 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1793 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1794 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1795 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1796 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1797 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1798 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1799 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1800 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1801 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1802 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1803 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1804 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1805 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1806 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1807 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1808 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x % $y; ok 1809 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x % $y; ok 1810 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x % $y; ok 1811 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x % $y; ok 1812 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x % $y; ok 1813 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x % $y; ok 1814 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x % $y; ok 1815 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x % $y; ok 1816 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1817 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1818 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1819 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1820 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1821 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1822 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1823 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1824 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1825 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1826 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1827 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1828 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1829 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1830 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1831 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1832 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1833 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1834 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1835 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1836 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x % $y; ok 1837 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x % $y; ok 1838 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1839 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1840 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1841 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1842 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1843 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1844 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1845 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1846 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1847 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1848 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1849 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1850 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1851 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1852 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1853 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1854 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1855 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1856 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x % $y; ok 1857 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x % $y; ok 1858 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1859 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1860 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x % $y; ok 1861 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x % $y; ok 1862 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1863 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1864 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x % $y; ok 1865 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x % $y; ok 1866 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1867 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1868 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1869 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1870 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1871 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1872 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1873 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1874 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1875 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1876 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1877 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1878 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1879 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1880 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x % $y; ok 1881 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x % $y; ok 1882 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x % $y; ok 1883 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x % $y; ok 1884 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1885 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1886 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1887 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1888 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1889 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1890 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1891 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1892 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1893 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1894 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1895 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1896 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1897 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1898 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1899 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1900 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1901 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1902 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x % $y; ok 1903 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x % $y; ok 1904 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x % $y; ok 1905 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x % $y; ok 1906 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x % $y; ok 1907 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x % $y; ok 1908 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x % $y; ok 1909 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x % $y; ok 1910 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x % $y; ok 1911 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x % $y; ok 1912 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x % $y; ok 1913 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x % $y; ok 1914 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x % $y; ok 1915 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x % $y; ok 1916 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x % $y; ok 1917 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x % $y; ok 1918 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x % $y; ok 1919 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x % $y; ok 1920 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x % $y; ok 1921 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x % $y; ok 1922 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x % $y; ok 1923 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x % $y; ok 1924 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x % $y; ok 1925 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x % $y; ok 1926 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x % $y; ok 1927 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x % $y; ok 1928 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x % $y; ok 1929 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x % $y; ok 1930 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1931 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1932 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1933 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1934 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x % $y; ok 1935 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x % $y; ok 1936 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x % $y; ok 1937 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x % $y; ok 1938 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x % $y; ok 1939 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x % $y; ok 1940 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x % $y; ok 1941 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x % $y; ok 1942 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1943 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1944 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1945 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1946 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1947 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1948 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1949 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1950 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x % $y; ok 1951 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x % $y; ok 1952 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x % $y; ok 1953 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x % $y; ok 1954 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x % $y; ok 1955 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x % $y; ok 1956 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x % $y; ok 1957 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x % $y; ok 1958 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1959 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1960 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1961 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1962 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1963 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1964 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x % $y; ok 1965 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x % $y; ok 1966 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1967 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1968 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1969 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1970 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1971 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1972 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1973 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1974 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1975 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1976 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1977 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1978 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1979 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1980 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1981 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1982 - $x = Math::BigFloat->new("Nanfac"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1983 - $x = Math::BigFloat->new("Nanfac"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1984 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1985 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1986 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1987 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1988 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1989 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1990 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1991 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1992 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1993 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1994 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1995 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1996 - $x = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1997 - $x = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1998 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1999 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2000 - $x = Math::BigFloat->new("5"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2001 - $x = Math::BigFloat->new("5"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2002 - $x = Math::BigFloat->new("6"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2003 - $x = Math::BigFloat->new("6"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2004 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2005 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2006 - $x = Math::BigFloat->new("11"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2007 - $x = Math::BigFloat->new("11"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2008 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2009 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2010 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2011 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2012 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2013 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2014 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2015 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2016 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2017 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2018 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2019 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2020 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2021 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2022 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2023 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2024 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2025 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2026 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2027 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2028 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2029 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2030 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2031 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2032 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2033 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2034 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2035 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2036 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2037 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2038 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2039 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2040 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2041 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2042 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2043 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2044 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2045 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2046 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2047 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2048 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2049 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2050 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2051 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2052 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2053 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2054 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2055 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2056 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2057 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2058 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2059 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2060 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2061 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2062 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2063 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2064 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2065 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2066 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2067 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2068 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2069 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2070 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2071 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2072 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2073 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2074 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2075 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2076 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2077 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2078 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2079 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2080 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2081 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2082 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2083 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2084 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2085 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2086 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2087 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2088 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2089 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2090 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2091 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2092 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2093 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2094 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2095 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2096 - $x = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2097 - $x = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2098 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2099 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2100 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2101 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2102 - $x = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2103 - $x = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2104 - $x = Math::BigFloat->new("-123.45"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2105 - $x = Math::BigFloat->new("-123.45"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2106 - $x = Math::BigFloat->new("nanbsqrt"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2107 - $x = Math::BigFloat->new("nanbsqrt"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2108 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2109 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2110 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2111 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2112 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2113 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2114 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2115 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2116 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2117 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2118 - $x = Math::BigFloat->new("9"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2119 - $x = Math::BigFloat->new("9"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2120 - $x = Math::BigFloat->new("16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2121 - $x = Math::BigFloat->new("16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2122 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2123 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2124 - $x = Math::BigFloat->new("123.456"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2125 - $x = Math::BigFloat->new("123.456"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2126 - $x = Math::BigFloat->new("15241.38393"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2127 - $x = Math::BigFloat->new("15241.38393"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2128 - $x = Math::BigFloat->new("1.44"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2129 - $x = Math::BigFloat->new("1.44"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2130 - $x = Math::BigFloat->new("1.44E10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2131 - $x = Math::BigFloat->new("1.44E10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2132 - $x = Math::BigFloat->new("2e10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2133 - $x = Math::BigFloat->new("2e10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2134 - $x = Math::BigFloat->new("144e20"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2135 - $x = Math::BigFloat->new("144e20"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2136 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2137 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2138 - $x = Math::BigFloat->new("0.49"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2139 - $x = Math::BigFloat->new("0.49"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2140 - $x = Math::BigFloat->new("0.0049"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2141 - $x = Math::BigFloat->new("0.0049"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2142 - $x = Math::BigFloat->new("123"); $x->is_nan(); ok 2143 - $x = Math::BigFloat->new("abc"); $x->is_nan(); ok 2144 - $x = Math::BigFloat->new("NaN"); $x->is_nan(); ok 2145 - $x = Math::BigFloat->new("-123"); $x->is_nan(); ok 2146 - $x = Math::BigFloat->new("+inf"); $x->is_inf(""); ok 2147 - $x = Math::BigFloat->new("-inf"); $x->is_inf(""); ok 2148 - $x = Math::BigFloat->new("abc"); $x->is_inf(""); ok 2149 - $x = Math::BigFloat->new("1"); $x->is_inf(""); ok 2150 - $x = Math::BigFloat->new("NaN"); $x->is_inf(""); ok 2151 - $x = Math::BigFloat->new("-1"); $x->is_inf(""); ok 2152 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-"); ok 2153 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+"); ok 2154 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-"); ok 2155 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+"); ok 2156 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-inf"); ok 2157 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+inf"); ok 2158 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-inf"); ok 2159 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+inf"); ok 2160 - $x = Math::BigFloat->new("+iNfInItY"); $x->is_inf(""); ok 2161 - $x = Math::BigFloat->new("-InFiNiTy"); $x->is_inf(""); ok 2162 - $x = Math::BigFloat->new("abc"); $x->is_odd(); ok 2163 - $x = Math::BigFloat->new("0"); $x->is_odd(); ok 2164 - $x = Math::BigFloat->new("-1"); $x->is_odd(); ok 2165 - $x = Math::BigFloat->new("-3"); $x->is_odd(); ok 2166 - $x = Math::BigFloat->new("1"); $x->is_odd(); ok 2167 - $x = Math::BigFloat->new("3"); $x->is_odd(); ok 2168 - $x = Math::BigFloat->new("1000001"); $x->is_odd(); ok 2169 - $x = Math::BigFloat->new("1000002"); $x->is_odd(); ok 2170 - $x = Math::BigFloat->new("+inf"); $x->is_odd(); ok 2171 - $x = Math::BigFloat->new("-inf"); $x->is_odd(); ok 2172 - $x = Math::BigFloat->new("123.45"); $x->is_odd(); ok 2173 - $x = Math::BigFloat->new("-123.45"); $x->is_odd(); ok 2174 - $x = Math::BigFloat->new("2"); $x->is_odd(); ok 2175 - $x = Math::BigFloat->new("NaNis_int"); $x->is_int(); ok 2176 - $x = Math::BigFloat->new("0"); $x->is_int(); ok 2177 - $x = Math::BigFloat->new("1"); $x->is_int(); ok 2178 - $x = Math::BigFloat->new("2"); $x->is_int(); ok 2179 - $x = Math::BigFloat->new("-2"); $x->is_int(); ok 2180 - $x = Math::BigFloat->new("-1"); $x->is_int(); ok 2181 - $x = Math::BigFloat->new("-inf"); $x->is_int(); ok 2182 - $x = Math::BigFloat->new("+inf"); $x->is_int(); ok 2183 - $x = Math::BigFloat->new("123.4567"); $x->is_int(); ok 2184 - $x = Math::BigFloat->new("-0.1"); $x->is_int(); ok 2185 - $x = Math::BigFloat->new("-0.002"); $x->is_int(); ok 2186 - $x = Math::BigFloat->new("abc"); $x->is_even(); ok 2187 - $x = Math::BigFloat->new("0"); $x->is_even(); ok 2188 - $x = Math::BigFloat->new("-1"); $x->is_even(); ok 2189 - $x = Math::BigFloat->new("-3"); $x->is_even(); ok 2190 - $x = Math::BigFloat->new("1"); $x->is_even(); ok 2191 - $x = Math::BigFloat->new("3"); $x->is_even(); ok 2192 - $x = Math::BigFloat->new("1000001"); $x->is_even(); ok 2193 - $x = Math::BigFloat->new("1000002"); $x->is_even(); ok 2194 - $x = Math::BigFloat->new("2"); $x->is_even(); ok 2195 - $x = Math::BigFloat->new("+inf"); $x->is_even(); ok 2196 - $x = Math::BigFloat->new("-inf"); $x->is_even(); ok 2197 - $x = Math::BigFloat->new("123.456"); $x->is_even(); ok 2198 - $x = Math::BigFloat->new("-123.456"); $x->is_even(); ok 2199 - $x = Math::BigFloat->new("0.01"); $x->is_even(); ok 2200 - $x = Math::BigFloat->new("-0.01"); $x->is_even(); ok 2201 - $x = Math::BigFloat->new("120"); $x->is_even(); ok 2202 - $x = Math::BigFloat->new("1200"); $x->is_even(); ok 2203 - $x = Math::BigFloat->new("-1200"); $x->is_even(); ok 2204 - $x = Math::BigFloat->new("0"); $x->is_positive(); ok 2205 - $x = Math::BigFloat->new("1"); $x->is_positive(); ok 2206 - $x = Math::BigFloat->new("-1"); $x->is_positive(); ok 2207 - $x = Math::BigFloat->new("-123"); $x->is_positive(); ok 2208 - $x = Math::BigFloat->new("NaN"); $x->is_positive(); ok 2209 - $x = Math::BigFloat->new("-inf"); $x->is_positive(); ok 2210 - $x = Math::BigFloat->new("+inf"); $x->is_positive(); ok 2211 - $x = Math::BigFloat->new("0"); $x->is_negative(); ok 2212 - $x = Math::BigFloat->new("1"); $x->is_negative(); ok 2213 - $x = Math::BigFloat->new("-1"); $x->is_negative(); ok 2214 - $x = Math::BigFloat->new("-123"); $x->is_negative(); ok 2215 - $x = Math::BigFloat->new("NaN"); $x->is_negative(); ok 2216 - $x = Math::BigFloat->new("-inf"); $x->is_negative(); ok 2217 - $x = Math::BigFloat->new("+inf"); $x->is_negative(); ok 2218 - $x = Math::BigFloat->new("0"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2219 - $x = Math::BigFloat->new("1"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2220 - $x = Math::BigFloat->new("123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2221 - $x = Math::BigFloat->new("-123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2222 - $x = Math::BigFloat->new("-1200"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2223 - $x = Math::BigFloat->new("NaNparts"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2224 - $x = Math::BigFloat->new("+inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2225 - $x = Math::BigFloat->new("-inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2226 - $x = Math::BigFloat->new("0"); $x->exponent()->bstr(); ok 2227 - $x = Math::BigFloat->new("1"); $x->exponent()->bstr(); ok 2228 - $x = Math::BigFloat->new("123"); $x->exponent()->bstr(); ok 2229 - $x = Math::BigFloat->new("-123"); $x->exponent()->bstr(); ok 2230 - $x = Math::BigFloat->new("-1200"); $x->exponent()->bstr(); ok 2231 - $x = Math::BigFloat->new("+inf"); $x->exponent()->bstr(); ok 2232 - $x = Math::BigFloat->new("-inf"); $x->exponent()->bstr(); ok 2233 - $x = Math::BigFloat->new("NaNexponent"); $x->exponent()->bstr(); ok 2234 - $x = Math::BigFloat->new("0"); $x->mantissa()->bstr(); ok 2235 - $x = Math::BigFloat->new("1"); $x->mantissa()->bstr(); ok 2236 - $x = Math::BigFloat->new("123"); $x->mantissa()->bstr(); ok 2237 - $x = Math::BigFloat->new("-123"); $x->mantissa()->bstr(); ok 2238 - $x = Math::BigFloat->new("-1200"); $x->mantissa()->bstr(); ok 2239 - $x = Math::BigFloat->new("+inf"); $x->mantissa()->bstr(); ok 2240 - $x = Math::BigFloat->new("-inf"); $x->mantissa()->bstr(); ok 2241 - $x = Math::BigFloat->new("NaNmantissa"); $x->mantissa()->bstr(); ok 2242 - $x = Math::BigFloat->new("123"); $x->length(); ok 2243 - $x = Math::BigFloat->new("-123"); $x->length(); ok 2244 - $x = Math::BigFloat->new("0"); $x->length(); ok 2245 - $x = Math::BigFloat->new("1"); $x->length(); ok 2246 - $x = Math::BigFloat->new("12345678901234567890"); $x->length(); ok 2247 - $x = Math::BigFloat->new("NaNzero"); $x->is_zero(); ok 2248 - $x = Math::BigFloat->new("+inf"); $x->is_zero(); ok 2249 - $x = Math::BigFloat->new("-inf"); $x->is_zero(); ok 2250 - $x = Math::BigFloat->new("0"); $x->is_zero(); ok 2251 - $x = Math::BigFloat->new("-1"); $x->is_zero(); ok 2252 - $x = Math::BigFloat->new("1"); $x->is_zero(); ok 2253 - $x = Math::BigFloat->new("NaNone"); $x->is_one(); ok 2254 - $x = Math::BigFloat->new("+inf"); $x->is_one(); ok 2255 - $x = Math::BigFloat->new("-inf"); $x->is_one(); ok 2256 - $x = Math::BigFloat->new("0"); $x->is_one(); ok 2257 - $x = Math::BigFloat->new("2"); $x->is_one(); ok 2258 - $x = Math::BigFloat->new("1"); $x->is_one(); ok 2259 - $x = Math::BigFloat->new("-1"); $x->is_one(); ok 2260 - $x = Math::BigFloat->new("-2"); $x->is_one(); ok 2261 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2262 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2263 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2264 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2265 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2266 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2267 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2268 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2269 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2270 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2271 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2272 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2273 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2274 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2275 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2276 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2277 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2278 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2279 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2280 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2281 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2282 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2283 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2284 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2285 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2286 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2287 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2288 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2289 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2290 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2291 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2292 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2293 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2294 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2295 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2296 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2297 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2298 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2299 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2300 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2301 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2302 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2303 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2304 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2305 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2306 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2307 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2308 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2309 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2310 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2311 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2312 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2313 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2314 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2315 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2316 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2317 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2318 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2319 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2320 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2321 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2322 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2323 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2324 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2325 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2326 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2327 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2328 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2329 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2330 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2331 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2332 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2333 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2334 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2335 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 2336 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 2337 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 2338 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 2339 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 2340 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 2341 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 2342 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 2343 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $y ok 2344 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $x ok 2345 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsstr() ok 2346 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->exponent() ok 2347 - Math::BigFloat->new("1e1234567890123456789012345678901234567890") > 0 ok 2348 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsub("1e1234567890123456789012345678901234567890") ok 2349 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bmul(2)->bsstr() ok 2350 - Math::BigFloat->new("1234567890123456789012345678901234567890e2")->mantissa() ok 2351 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_a} ok 2352 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_p} ok 2353 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_a} ok 2354 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_p} ok 2355 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_a} ok 2356 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_p} ok 2357 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_a} ok 2358 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_p} ok 2359 - Math::BigFloat->bzero() ok 2360 - Math::BigFloat->bone() ok 2361 - Math::BigFloat->bone("+") ok 2362 - Math::BigFloat->bone("-") ok 2363 - Math::BigFloat->bnan() ok 2364 - Math::BigFloat->binf() ok 2365 - Math::BigFloat->binf("+") ok 2366 - Math::BigFloat->binf("-") ok 2367 - Math::BigFloat->binf("-inf") ok 2368 - $x = Math::BigFloat->new(12); Math::BigFloat->precision(-2); $x->bsqrt(); ok 2369 - Math::BigFloat->precision(undef); $x = Math::BigFloat->new(12); Math::BigFloat->precision(0); $x->bsqrt(); ok 2370 - Math::BigFloat->precision(-3); $x = Math::BigFloat->new(12); $x->bsqrt(); ok 2371 - A and P set => NaN ok 2372 - supplied arg overrides set global ok 2373 - @args = Math::BigFloat::objectify(2, Math::BigFloat, 4, 5); join(" ", @args); ok 2374 - Math::BigFloat->new(-1)->is_one() ok 2375 - Math::BigFloat->new(-1)->is_one("-") ok 2376 - Math::BigFloat->new(1)->bdiv("0.5")->bsstr() ok 2377 - $x = Math::BigFloat->new(3); $x -= $x; ok 2378 - $x = Math::BigFloat->new(-3); $x -= $x; ok 2379 - $x = Math::BigFloat->new(3); $x += $x; ok 2380 - $x = Math::BigFloat->new(-3); $x += $x; ok 2381 - $x = Math::BigFloat->new("NaN"); $x -= $x; ok 2382 - $x = Math::BigFloat->new("inf"); $x -= $x; ok 2383 - $x = Math::BigFloat->new("-inf"); $x -= $x; ok 2384 - $x = Math::BigFloat->new("NaN"); $x += $x; ok 2385 - $x = Math::BigFloat->new("inf"); $x += $x; ok 2386 - $x = Math::BigFloat->new("-inf"); $x += $x; ok 2387 - $x = Math::BigFloat->new("3.14"); $x -= $x; ok 2388 - $x = Math::BigFloat->new("-3.14"); $x -= $x; ok 2389 - 6.28 = Math::BigFloat->new("3.14"); 6.28 += 6.28; ok 2390 - -6.28 = Math::BigFloat->new("-3.14"); -6.28 += -6.28; ok 2391 - 9.8596 = Math::BigFloat->new("3.14"); 9.8596 *= 9.8596; ok 2392 - 9.8596 = Math::BigFloat->new("-3.14"); 9.8596 *= 9.8596; ok 2393 - 1 = Math::BigFloat->new("3.14"); 1 /= 1; ok 2394 - 1 = Math::BigFloat->new("-3.14"); 1 /= 1; ok 2395 - 0 = Math::BigFloat->new("3.14"); 0 %= 0; ok 2396 - 0 = Math::BigFloat->new("-3.14"); 0 %= 0; ok 2397 - $x = Math::BigFloat->new(0); $y = Math::BigFloat->new("0.1"); $x ** $y ok 2398 - 1 = Math::BigFloat->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 2399 - value of ((2**148)+1)/17 ok 2400 - number of digits in ((2**148)+1)/17 ok 2401 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y ok 2402 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x ok 2403 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y ok 2404 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y; $x ok 2405 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); ok 2406 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 2407 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y; $x ok t/bigintg.t .............. 1..356 # Running under perl version 5.018000 for linux # Current time local: Sat Apr 23 08:22:56 2016 # Current time GMT: Sat Apr 23 15:22:56 2016 # Using Test.pm version 1.26 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 ok 27 ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 ok 38 ok 39 ok 40 ok 41 ok 42 ok 43 ok 44 ok 45 ok 46 ok 47 ok 48 ok 49 ok 50 ok 51 ok 52 ok 53 ok 54 ok 55 ok 56 ok 57 ok 58 ok 59 ok 60 ok 61 ok 62 ok 63 ok 64 ok 65 ok 66 ok 67 ok 68 ok 69 ok 70 ok 71 ok 72 ok 73 ok 74 ok 75 ok 76 ok 77 ok 78 ok 79 ok 80 ok 81 ok 82 ok 83 ok 84 ok 85 ok 86 ok 87 ok 88 ok 89 ok 90 ok 91 ok 92 ok 93 ok 94 ok 95 ok 96 ok 97 ok 98 ok 99 ok 100 ok 101 ok 102 ok 103 ok 104 ok 105 ok 106 ok 107 ok 108 ok 109 ok 110 ok 111 ok 112 ok 113 ok 114 ok 115 ok 116 ok 117 ok 118 ok 119 ok 120 ok 121 ok 122 ok 123 ok 124 ok 125 ok 126 ok 127 ok 128 ok 129 ok 130 ok 131 ok 132 ok 133 ok 134 ok 135 ok 136 ok 137 ok 138 ok 139 ok 140 ok 141 ok 142 ok 143 ok 144 ok 145 ok 146 ok 147 ok 148 ok 149 ok 150 ok 151 ok 152 ok 153 ok 154 ok 155 ok 156 ok 157 ok 158 ok 159 ok 160 ok 161 ok 162 ok 163 ok 164 ok 165 ok 166 ok 167 ok 168 ok 169 ok 170 ok 171 ok 172 ok 173 ok 174 ok 175 ok 176 ok 177 ok 178 ok 179 ok 180 ok 181 ok 182 ok 183 ok 184 ok 185 ok 186 ok 187 ok 188 ok 189 ok 190 ok 191 ok 192 ok 193 ok 194 ok 195 ok 196 ok 197 ok 198 ok 199 ok 200 ok 201 ok 202 ok 203 ok 204 ok 205 ok 206 ok 207 ok 208 ok 209 ok 210 ok 211 ok 212 ok 213 ok 214 ok 215 ok 216 ok 217 ok 218 ok 219 ok 220 ok 221 ok 222 ok 223 ok 224 ok 225 ok 226 ok 227 ok 228 ok 229 ok 230 ok 231 ok 232 ok 233 ok 234 ok 235 ok 236 ok 237 ok 238 ok 239 ok 240 ok 241 ok 242 ok 243 ok 244 ok 245 ok 246 ok 247 ok 248 ok 249 ok 250 ok 251 ok 252 ok 253 ok 254 ok 255 ok 256 ok 257 ok 258 ok 259 ok 260 ok 261 ok 262 ok 263 ok 264 ok 265 ok 266 ok 267 ok 268 ok 269 ok 270 ok 271 ok 272 ok 273 ok 274 ok 275 ok 276 ok 277 ok 278 ok 279 ok 280 ok 281 ok 282 ok 283 ok 284 ok 285 ok 286 ok 287 ok 288 ok 289 ok 290 ok 291 ok 292 ok 293 ok 294 ok 295 ok 296 ok 297 ok 298 ok 299 ok 300 ok 301 ok 302 ok 303 ok 304 ok 305 ok 306 ok 307 ok 308 ok 309 ok 310 ok 311 ok 312 ok 313 ok 314 ok 315 ok 316 ok 317 ok 318 ok 319 ok 320 ok 321 ok 322 ok 323 ok 324 ok 325 ok 326 ok 327 ok 328 ok 329 ok 330 ok 331 ok 332 ok 333 ok 334 ok 335 ok 336 ok 337 ok 338 ok 339 ok 340 ok 341 ok 342 ok 343 ok 344 ok 345 ok 346 ok 347 ok 348 ok 349 ok 350 ok 351 ok 352 ok 353 ok 354 ok 355 ok 356 ok t/bigintpm.t ............. 1..3919 ok 1 - Math::BigInt->from_hex("0xcafe") ok 2 - Math::BigInt->from_hex("0xcafebabedead") ok 3 - Math::BigInt->from_bin("0b1001") ok 4 - Math::BigInt->from_bin("0b1001100110011001100110011001"); ok 5 - Math::BigInt->from_oct("0775"); ok 6 - Math::BigInt->from_oct("07777777777777711111111222222222"); ok 7 - Math::BigInt->config()->{lib} ok 8 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("-345"); $x .= $y; ok 9 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x += $y; ok 10 - is a valid object ok 11 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x += $y; ok 12 - is a valid object ok 13 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x -= $y; ok 14 - is a valid object ok 15 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x -= $y; ok 16 - is a valid object ok 17 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x *= $y; ok 18 - is a valid object ok 19 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x *= $y; ok 20 - is a valid object ok 21 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x %= $y; ok 22 - is a valid object ok 23 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("9"); $x %= $y; ok 24 - is a valid object ok 25 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x %= $y; ok 26 - is a valid object ok 27 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x /= $y; ok 28 - is a valid object ok 29 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("2"); $x /= $y; ok 30 - is a valid object ok 31 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x |= $y; ok 32 - is a valid object ok 33 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x &= $y; ok 34 - is a valid object ok 35 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x ^= $y; ok 36 - is a valid object ok 37 - $x = Math::BigInt->new("NaNlog"); $y = Math::BigInt->new("2"); $x->blog($y); ok 38 - is a valid object ok 39 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("NaNlog"); $x->blog($y); ok 40 - is a valid object ok 41 - $x = Math::BigInt->new("NaNlog1"); $y = Math::BigInt->new("NaNlog"); $x->blog($y); ok 42 - is a valid object ok 43 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 44 - is a valid object ok 45 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 46 - is a valid object ok 47 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 48 - is a valid object ok 49 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 50 - is a valid object ok 51 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 52 - is a valid object ok 53 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->blog($y); ok 54 - is a valid object ok 55 - $x = Math::BigInt->new("-21"); $y = Math::BigInt->new("4"); $x->blog($y); ok 56 - is a valid object ok 57 - $x = Math::BigInt->new("21"); $y = Math::BigInt->new("-21"); $x->blog($y); ok 58 - is a valid object ok 59 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 60 - is a valid object ok 61 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 62 - is a valid object ok 63 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->blog($y); ok 64 - is a valid object ok 65 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->blog($y); ok 66 - is a valid object ok 67 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 68 - is a valid object ok 69 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 70 - is a valid object ok 71 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 72 - is a valid object ok 73 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->blog($y); ok 74 - is a valid object ok 75 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->blog($y); ok 76 - is a valid object ok 77 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->blog($y); ok 78 - is a valid object ok 79 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 80 - is a valid object ok 81 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 82 - is a valid object ok 83 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 84 - is a valid object ok 85 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->blog($y); ok 86 - is a valid object ok 87 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->blog($y); ok 88 - is a valid object ok 89 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("4"); $x->blog($y); ok 90 - is a valid object ok 91 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 92 - is a valid object ok 93 - $x = Math::BigInt->new("1024"); $y = Math::BigInt->new("2"); $x->blog($y); ok 94 - is a valid object ok 95 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("3"); $x->blog($y); ok 96 - is a valid object ok 97 - $x = Math::BigInt->new("82"); $y = Math::BigInt->new("3"); $x->blog($y); ok 98 - is a valid object ok 99 - $x = Math::BigInt->new("80"); $y = Math::BigInt->new("3"); $x->blog($y); ok 100 - is a valid object ok 101 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("2"); $x->blog($y); ok 102 - is a valid object ok 103 - $x = Math::BigInt->new("15625"); $y = Math::BigInt->new("5"); $x->blog($y); ok 104 - is a valid object ok 105 - $x = Math::BigInt->new("15626"); $y = Math::BigInt->new("5"); $x->blog($y); ok 106 - is a valid object ok 107 - $x = Math::BigInt->new("15624"); $y = Math::BigInt->new("5"); $x->blog($y); ok 108 - is a valid object ok 109 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 110 - is a valid object ok 111 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 112 - is a valid object ok 113 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 114 - is a valid object ok 115 - $x = Math::BigInt->new("1000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 116 - is a valid object ok 117 - $x = Math::BigInt->new("10000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 118 - is a valid object ok 119 - $x = Math::BigInt->new("100000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 120 - is a valid object ok 121 - $x = Math::BigInt->new("8916100448256"); $y = Math::BigInt->new("12"); $x->blog($y); ok 122 - is a valid object ok 123 - $x = Math::BigInt->new("8916100448257"); $y = Math::BigInt->new("12"); $x->blog($y); ok 124 - is a valid object ok 125 - $x = Math::BigInt->new("8916100448255"); $y = Math::BigInt->new("12"); $x->blog($y); ok 126 - is a valid object ok 127 - $x = Math::BigInt->new("2251799813685248"); $y = Math::BigInt->new("8"); $x->blog($y); ok 128 - is a valid object ok 129 - $x = Math::BigInt->new("72057594037927936"); $y = Math::BigInt->new("2"); $x->blog($y); ok 130 - is a valid object ok 131 - $x = Math::BigInt->new("144115188075855872"); $y = Math::BigInt->new("2"); $x->blog($y); ok 132 - is a valid object ok 133 - $x = Math::BigInt->new("288230376151711744"); $y = Math::BigInt->new("2"); $x->blog($y); ok 134 - is a valid object ok 135 - $x = Math::BigInt->new("576460752303423488"); $y = Math::BigInt->new("2"); $x->blog($y); ok 136 - is a valid object ok 137 - $x = Math::BigInt->new("1329227995784915872903807060280344576"); $y = Math::BigInt->new("2"); $x->blog($y); ok 138 - is a valid object ok 139 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->blog($y); ok 140 - is a valid object ok 141 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->blog($y); ok 142 - is a valid object ok 143 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->blog($y); ok 144 - is a valid object ok 145 - $x = Math::BigInt->new("0"); $x->is_negative() || 0; ok 146 - $x = Math::BigInt->new("-1"); $x->is_negative() || 0; ok 147 - $x = Math::BigInt->new("1"); $x->is_negative() || 0; ok 148 - $x = Math::BigInt->new("+inf"); $x->is_negative() || 0; ok 149 - $x = Math::BigInt->new("-inf"); $x->is_negative() || 0; ok 150 - $x = Math::BigInt->new("NaNneg"); $x->is_negative() || 0; ok 151 - $x = Math::BigInt->new("0"); $x->is_positive() || 0; ok 152 - $x = Math::BigInt->new("-1"); $x->is_positive() || 0; ok 153 - $x = Math::BigInt->new("1"); $x->is_positive() || 0; ok 154 - $x = Math::BigInt->new("+inf"); $x->is_positive() || 0; ok 155 - $x = Math::BigInt->new("-inf"); $x->is_positive() || 0; ok 156 - $x = Math::BigInt->new("NaNneg"); $x->is_positive() || 0; ok 157 - $x = Math::BigInt->new("-inf"); $x->is_int() || 0; ok 158 - $x = Math::BigInt->new("+inf"); $x->is_int() || 0; ok 159 - $x = Math::BigInt->new("NaNis_int"); $x->is_int() || 0; ok 160 - $x = Math::BigInt->new("1"); $x->is_int() || 0; ok 161 - $x = Math::BigInt->new("0"); $x->is_int() || 0; ok 162 - $x = Math::BigInt->new("123e12"); $x->is_int() || 0; ok 163 - $x = Math::BigInt->new("abc"); $x->is_odd() || 0; ok 164 - $x = Math::BigInt->new("0"); $x->is_odd() || 0; ok 165 - $x = Math::BigInt->new("1"); $x->is_odd() || 0; ok 166 - $x = Math::BigInt->new("3"); $x->is_odd() || 0; ok 167 - $x = Math::BigInt->new("-1"); $x->is_odd() || 0; ok 168 - $x = Math::BigInt->new("-3"); $x->is_odd() || 0; ok 169 - $x = Math::BigInt->new("10000001"); $x->is_odd() || 0; ok 170 - $x = Math::BigInt->new("10000002"); $x->is_odd() || 0; ok 171 - $x = Math::BigInt->new("2"); $x->is_odd() || 0; ok 172 - $x = Math::BigInt->new("120"); $x->is_odd() || 0; ok 173 - $x = Math::BigInt->new("121"); $x->is_odd() || 0; ok 174 - $x = Math::BigInt->new("abc"); $x->is_even() || 0; ok 175 - $x = Math::BigInt->new("0"); $x->is_even() || 0; ok 176 - $x = Math::BigInt->new("1"); $x->is_even() || 0; ok 177 - $x = Math::BigInt->new("3"); $x->is_even() || 0; ok 178 - $x = Math::BigInt->new("-1"); $x->is_even() || 0; ok 179 - $x = Math::BigInt->new("-3"); $x->is_even() || 0; ok 180 - $x = Math::BigInt->new("10000001"); $x->is_even() || 0; ok 181 - $x = Math::BigInt->new("10000002"); $x->is_even() || 0; ok 182 - $x = Math::BigInt->new("2"); $x->is_even() || 0; ok 183 - $x = Math::BigInt->new("120"); $x->is_even() || 0; ok 184 - $x = Math::BigInt->new("121"); $x->is_even() || 0; ok 185 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-0"); $x->bacmp($y); ok 186 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 187 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 188 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 189 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+2"); $x->bacmp($y); ok 190 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 191 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bacmp($y); ok 192 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bacmp($y); ok 193 - $x = Math::BigInt->new("+987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 194 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 195 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("+4567889"); $x->bacmp($y); ok 196 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 197 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 198 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 199 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 200 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 201 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 202 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 203 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 204 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 205 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 206 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 207 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 208 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 209 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 210 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 211 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 212 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 213 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 214 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 215 - $x = Math::BigInt->bnorm("0e999"); ok 216 - is a valid object ok 217 - $x = Math::BigInt->bnorm("0e-999"); ok 218 - is a valid object ok 219 - $x = Math::BigInt->bnorm("-0e999"); ok 220 - is a valid object ok 221 - $x = Math::BigInt->bnorm("-0e-999"); ok 222 - is a valid object ok 223 - $x = Math::BigInt->bnorm("123"); ok 224 - is a valid object ok 225 - $x = Math::BigInt->bnorm("123.000"); ok 226 - is a valid object ok 227 - $x = Math::BigInt->bnorm("123e0"); ok 228 - is a valid object ok 229 - $x = Math::BigInt->bnorm("123e+0"); ok 230 - is a valid object ok 231 - $x = Math::BigInt->bnorm("123e-0"); ok 232 - is a valid object ok 233 - $x = Math::BigInt->bnorm("123.000e0"); ok 234 - is a valid object ok 235 - $x = Math::BigInt->bnorm("123.000e+0"); ok 236 - is a valid object ok 237 - $x = Math::BigInt->bnorm("123.000e-0"); ok 238 - is a valid object ok 239 - $x = Math::BigInt->bnorm("0babc"); ok 240 - is a valid object ok 241 - $x = Math::BigInt->bnorm("0b123"); ok 242 - is a valid object ok 243 - $x = Math::BigInt->bnorm("0b0"); ok 244 - is a valid object ok 245 - $x = Math::BigInt->bnorm("-0b0"); ok 246 - is a valid object ok 247 - $x = Math::BigInt->bnorm("-0b1"); ok 248 - is a valid object ok 249 - $x = Math::BigInt->bnorm("0b0001"); ok 250 - is a valid object ok 251 - $x = Math::BigInt->bnorm("0b001"); ok 252 - is a valid object ok 253 - $x = Math::BigInt->bnorm("0b011"); ok 254 - is a valid object ok 255 - $x = Math::BigInt->bnorm("0b101"); ok 256 - is a valid object ok 257 - $x = Math::BigInt->bnorm("0b1001"); ok 258 - is a valid object ok 259 - $x = Math::BigInt->bnorm("0b10001"); ok 260 - is a valid object ok 261 - $x = Math::BigInt->bnorm("0b100001"); ok 262 - is a valid object ok 263 - $x = Math::BigInt->bnorm("0b1000001"); ok 264 - is a valid object ok 265 - $x = Math::BigInt->bnorm("0b10000001"); ok 266 - is a valid object ok 267 - $x = Math::BigInt->bnorm("0b100000001"); ok 268 - is a valid object ok 269 - $x = Math::BigInt->bnorm("0b1000000001"); ok 270 - is a valid object ok 271 - $x = Math::BigInt->bnorm("0b10000000001"); ok 272 - is a valid object ok 273 - $x = Math::BigInt->bnorm("0b100000000001"); ok 274 - is a valid object ok 275 - $x = Math::BigInt->bnorm("0b1000000000001"); ok 276 - is a valid object ok 277 - $x = Math::BigInt->bnorm("0b10000000000001"); ok 278 - is a valid object ok 279 - $x = Math::BigInt->bnorm("0b100000000000001"); ok 280 - is a valid object ok 281 - $x = Math::BigInt->bnorm("0b1000000000000001"); ok 282 - is a valid object ok 283 - $x = Math::BigInt->bnorm("0b10000000000000001"); ok 284 - is a valid object ok 285 - $x = Math::BigInt->bnorm("0b100000000000000001"); ok 286 - is a valid object ok 287 - $x = Math::BigInt->bnorm("0b1000000000000000001"); ok 288 - is a valid object ok 289 - $x = Math::BigInt->bnorm("0b10000000000000000001"); ok 290 - is a valid object ok 291 - $x = Math::BigInt->bnorm("0b100000000000000000001"); ok 292 - is a valid object ok 293 - $x = Math::BigInt->bnorm("0b1000000000000000000001"); ok 294 - is a valid object ok 295 - $x = Math::BigInt->bnorm("0b10000000000000000000001"); ok 296 - is a valid object ok 297 - $x = Math::BigInt->bnorm("0b100000000000000000000001"); ok 298 - is a valid object ok 299 - $x = Math::BigInt->bnorm("0b1000000000000000000000001"); ok 300 - is a valid object ok 301 - $x = Math::BigInt->bnorm("0b10000000000000000000000001"); ok 302 - is a valid object ok 303 - $x = Math::BigInt->bnorm("0b100000000000000000000000001"); ok 304 - is a valid object ok 305 - $x = Math::BigInt->bnorm("0b1000000000000000000000000001"); ok 306 - is a valid object ok 307 - $x = Math::BigInt->bnorm("0b10000000000000000000000000001"); ok 308 - is a valid object ok 309 - $x = Math::BigInt->bnorm("0b100000000000000000000000000001"); ok 310 - is a valid object ok 311 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000001"); ok 312 - is a valid object ok 313 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000001"); ok 314 - is a valid object ok 315 - $x = Math::BigInt->bnorm("0b100000000000000000000000000000001"); ok 316 - is a valid object ok 317 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000000001"); ok 318 - is a valid object ok 319 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000000001"); ok 320 - is a valid object ok 321 - $x = Math::BigInt->bnorm("0b__101"); ok 322 - is a valid object ok 323 - $x = Math::BigInt->bnorm("0b1_0_1"); ok 324 - is a valid object ok 325 - $x = Math::BigInt->bnorm("0b0_0_0_1"); ok 326 - is a valid object ok 327 - $x = Math::BigInt->bnorm("-0x0"); ok 328 - is a valid object ok 329 - $x = Math::BigInt->bnorm("0xabcdefgh"); ok 330 - is a valid object ok 331 - $x = Math::BigInt->bnorm("0x1234"); ok 332 - is a valid object ok 333 - $x = Math::BigInt->bnorm("0xabcdef"); ok 334 - is a valid object ok 335 - $x = Math::BigInt->bnorm("-0xABCDEF"); ok 336 - is a valid object ok 337 - $x = Math::BigInt->bnorm("-0x1234"); ok 338 - is a valid object ok 339 - $x = Math::BigInt->bnorm("0x12345678"); ok 340 - is a valid object ok 341 - $x = Math::BigInt->bnorm("0x1_2_3_4_56_78"); ok 342 - is a valid object ok 343 - $x = Math::BigInt->bnorm("0xa_b_c_d_e_f"); ok 344 - is a valid object ok 345 - $x = Math::BigInt->bnorm("0x__123"); ok 346 - is a valid object ok 347 - $x = Math::BigInt->bnorm("0x9"); ok 348 - is a valid object ok 349 - $x = Math::BigInt->bnorm("0x11"); ok 350 - is a valid object ok 351 - $x = Math::BigInt->bnorm("0x21"); ok 352 - is a valid object ok 353 - $x = Math::BigInt->bnorm("0x41"); ok 354 - is a valid object ok 355 - $x = Math::BigInt->bnorm("0x81"); ok 356 - is a valid object ok 357 - $x = Math::BigInt->bnorm("0x101"); ok 358 - is a valid object ok 359 - $x = Math::BigInt->bnorm("0x201"); ok 360 - is a valid object ok 361 - $x = Math::BigInt->bnorm("0x401"); ok 362 - is a valid object ok 363 - $x = Math::BigInt->bnorm("0x801"); ok 364 - is a valid object ok 365 - $x = Math::BigInt->bnorm("0x1001"); ok 366 - is a valid object ok 367 - $x = Math::BigInt->bnorm("0x2001"); ok 368 - is a valid object ok 369 - $x = Math::BigInt->bnorm("0x4001"); ok 370 - is a valid object ok 371 - $x = Math::BigInt->bnorm("0x8001"); ok 372 - is a valid object ok 373 - $x = Math::BigInt->bnorm("0x10001"); ok 374 - is a valid object ok 375 - $x = Math::BigInt->bnorm("0x20001"); ok 376 - is a valid object ok 377 - $x = Math::BigInt->bnorm("0x40001"); ok 378 - is a valid object ok 379 - $x = Math::BigInt->bnorm("0x80001"); ok 380 - is a valid object ok 381 - $x = Math::BigInt->bnorm("0x100001"); ok 382 - is a valid object ok 383 - $x = Math::BigInt->bnorm("0x200001"); ok 384 - is a valid object ok 385 - $x = Math::BigInt->bnorm("0x400001"); ok 386 - is a valid object ok 387 - $x = Math::BigInt->bnorm("0x800001"); ok 388 - is a valid object ok 389 - $x = Math::BigInt->bnorm("0x1000001"); ok 390 - is a valid object ok 391 - $x = Math::BigInt->bnorm("0x2000001"); ok 392 - is a valid object ok 393 - $x = Math::BigInt->bnorm("0x4000001"); ok 394 - is a valid object ok 395 - $x = Math::BigInt->bnorm("0x8000001"); ok 396 - is a valid object ok 397 - $x = Math::BigInt->bnorm("0x10000001"); ok 398 - is a valid object ok 399 - $x = Math::BigInt->bnorm("0x20000001"); ok 400 - is a valid object ok 401 - $x = Math::BigInt->bnorm("0x40000001"); ok 402 - is a valid object ok 403 - $x = Math::BigInt->bnorm("0x80000001"); ok 404 - is a valid object ok 405 - $x = Math::BigInt->bnorm("0x100000001"); ok 406 - is a valid object ok 407 - $x = Math::BigInt->bnorm("0x200000001"); ok 408 - is a valid object ok 409 - $x = Math::BigInt->bnorm("0x400000001"); ok 410 - is a valid object ok 411 - $x = Math::BigInt->bnorm("0x800000001"); ok 412 - is a valid object ok 413 - $x = Math::BigInt->bnorm("0x2dd59e18a125dbed30a6ab1d93e9c855569f44f75806f0645dc9a2e98b808c3"); ok 414 - is a valid object ok 415 - $x = Math::BigInt->bnorm("inf"); ok 416 - is a valid object ok 417 - $x = Math::BigInt->bnorm("+inf"); ok 418 - is a valid object ok 419 - $x = Math::BigInt->bnorm("-inf"); ok 420 - is a valid object ok 421 - $x = Math::BigInt->bnorm("0inf"); ok 422 - is a valid object ok 423 - $x = Math::BigInt->bnorm(""); ok 424 - is a valid object ok 425 - $x = Math::BigInt->bnorm("abc"); ok 426 - is a valid object ok 427 - $x = Math::BigInt->bnorm(" 1 a"); ok 428 - is a valid object ok 429 - $x = Math::BigInt->bnorm("1bcd2"); ok 430 - is a valid object ok 431 - $x = Math::BigInt->bnorm("11111b"); ok 432 - is a valid object ok 433 - $x = Math::BigInt->bnorm("+1z"); ok 434 - is a valid object ok 435 - $x = Math::BigInt->bnorm("-1z"); ok 436 - is a valid object ok 437 - $x = Math::BigInt->bnorm("_123"); ok 438 - is a valid object ok 439 - $x = Math::BigInt->bnorm("_123_"); ok 440 - is a valid object ok 441 - $x = Math::BigInt->bnorm("123_"); ok 442 - is a valid object ok 443 - $x = Math::BigInt->bnorm("1__23"); ok 444 - is a valid object ok 445 - $x = Math::BigInt->bnorm("1E1__2"); ok 446 - is a valid object ok 447 - $x = Math::BigInt->bnorm("1_E12"); ok 448 - is a valid object ok 449 - $x = Math::BigInt->bnorm("1E_12"); ok 450 - is a valid object ok 451 - $x = Math::BigInt->bnorm("1_E_12"); ok 452 - is a valid object ok 453 - $x = Math::BigInt->bnorm("+_1E12"); ok 454 - is a valid object ok 455 - $x = Math::BigInt->bnorm("+0_1E2"); ok 456 - is a valid object ok 457 - $x = Math::BigInt->bnorm("+0_0_1E2"); ok 458 - is a valid object ok 459 - $x = Math::BigInt->bnorm("-0_0_1E2"); ok 460 - is a valid object ok 461 - $x = Math::BigInt->bnorm("-0_0_1E+0_0_2"); ok 462 - is a valid object ok 463 - $x = Math::BigInt->bnorm("E1"); ok 464 - is a valid object ok 465 - $x = Math::BigInt->bnorm("E23"); ok 466 - is a valid object ok 467 - $x = Math::BigInt->bnorm("1.23E1"); ok 468 - is a valid object ok 469 - $x = Math::BigInt->bnorm("1.23E-1"); ok 470 - is a valid object ok 471 - $x = Math::BigInt->bnorm("1e2e3"); ok 472 - is a valid object ok 473 - $x = Math::BigInt->bnorm("1e2r"); ok 474 - is a valid object ok 475 - $x = Math::BigInt->bnorm("1e2.0"); ok 476 - is a valid object ok 477 - $x = Math::BigInt->bnorm("1.2.2"); ok 478 - is a valid object ok 479 - $x = Math::BigInt->bnorm("1.2.3e1"); ok 480 - is a valid object ok 481 - $x = Math::BigInt->bnorm("-1.2.3"); ok 482 - is a valid object ok 483 - $x = Math::BigInt->bnorm("-1.2.3e-4"); ok 484 - is a valid object ok 485 - $x = Math::BigInt->bnorm("1.2e3.4"); ok 486 - is a valid object ok 487 - $x = Math::BigInt->bnorm("1.2e-3.4"); ok 488 - is a valid object ok 489 - $x = Math::BigInt->bnorm("1.2.3.4"); ok 490 - is a valid object ok 491 - $x = Math::BigInt->bnorm("1.2.t"); ok 492 - is a valid object ok 493 - $x = Math::BigInt->bnorm("1..2"); ok 494 - is a valid object ok 495 - $x = Math::BigInt->bnorm("1..2e1"); ok 496 - is a valid object ok 497 - $x = Math::BigInt->bnorm("1..2e1..1"); ok 498 - is a valid object ok 499 - $x = Math::BigInt->bnorm("12e1..1"); ok 500 - is a valid object ok 501 - $x = Math::BigInt->bnorm("..2"); ok 502 - is a valid object ok 503 - $x = Math::BigInt->bnorm(".-2"); ok 504 - is a valid object ok 505 - $x = Math::BigInt->bnorm("012"); ok 506 - is a valid object ok 507 - $x = Math::BigInt->bnorm("0123"); ok 508 - is a valid object ok 509 - $x = Math::BigInt->bnorm("01234"); ok 510 - is a valid object ok 511 - $x = Math::BigInt->bnorm("012345"); ok 512 - is a valid object ok 513 - $x = Math::BigInt->bnorm("0123456"); ok 514 - is a valid object ok 515 - $x = Math::BigInt->bnorm("01234567"); ok 516 - is a valid object ok 517 - $x = Math::BigInt->bnorm("012345678"); ok 518 - is a valid object ok 519 - $x = Math::BigInt->bnorm("0123456789"); ok 520 - is a valid object ok 521 - $x = Math::BigInt->bnorm("01234567891"); ok 522 - is a valid object ok 523 - $x = Math::BigInt->bnorm("012345678912"); ok 524 - is a valid object ok 525 - $x = Math::BigInt->bnorm("0123456789123"); ok 526 - is a valid object ok 527 - $x = Math::BigInt->bnorm("01234567891234"); ok 528 - is a valid object ok 529 - $x = Math::BigInt->bnorm("0e0"); ok 530 - is a valid object ok 531 - $x = Math::BigInt->bnorm("+0e0"); ok 532 - is a valid object ok 533 - $x = Math::BigInt->bnorm("+0e+0"); ok 534 - is a valid object ok 535 - $x = Math::BigInt->bnorm("-0e+0"); ok 536 - is a valid object ok 537 - $x = Math::BigInt->bnorm("0e-0"); ok 538 - is a valid object ok 539 - $x = Math::BigInt->bnorm("-0e-0"); ok 540 - is a valid object ok 541 - $x = Math::BigInt->bnorm("+0e-0"); ok 542 - is a valid object ok 543 - $x = Math::BigInt->bnorm("000"); ok 544 - is a valid object ok 545 - $x = Math::BigInt->bnorm("00e2"); ok 546 - is a valid object ok 547 - $x = Math::BigInt->bnorm("00e02"); ok 548 - is a valid object ok 549 - $x = Math::BigInt->bnorm("000e002"); ok 550 - is a valid object ok 551 - $x = Math::BigInt->bnorm("000e1230"); ok 552 - is a valid object ok 553 - $x = Math::BigInt->bnorm("00e-3"); ok 554 - is a valid object ok 555 - $x = Math::BigInt->bnorm("00e+3"); ok 556 - is a valid object ok 557 - $x = Math::BigInt->bnorm("00e-03"); ok 558 - is a valid object ok 559 - $x = Math::BigInt->bnorm("00e+03"); ok 560 - is a valid object ok 561 - $x = Math::BigInt->bnorm("-000"); ok 562 - is a valid object ok 563 - $x = Math::BigInt->bnorm("-00e2"); ok 564 - is a valid object ok 565 - $x = Math::BigInt->bnorm("-00e02"); ok 566 - is a valid object ok 567 - $x = Math::BigInt->bnorm("-000e002"); ok 568 - is a valid object ok 569 - $x = Math::BigInt->bnorm("-000e1230"); ok 570 - is a valid object ok 571 - $x = Math::BigInt->bnorm("-00e-3"); ok 572 - is a valid object ok 573 - $x = Math::BigInt->bnorm("-00e+3"); ok 574 - is a valid object ok 575 - $x = Math::BigInt->bnorm("-00e-03"); ok 576 - is a valid object ok 577 - $x = Math::BigInt->bnorm("-00e+03"); ok 578 - is a valid object ok 579 - $x = Math::BigInt->bnorm("0"); ok 580 - is a valid object ok 581 - $x = Math::BigInt->bnorm("+0"); ok 582 - is a valid object ok 583 - $x = Math::BigInt->bnorm("+00"); ok 584 - is a valid object ok 585 - $x = Math::BigInt->bnorm("+000"); ok 586 - is a valid object ok 587 - $x = Math::BigInt->bnorm("000000000000000000"); ok 588 - is a valid object ok 589 - $x = Math::BigInt->bnorm("-0"); ok 590 - is a valid object ok 591 - $x = Math::BigInt->bnorm("-0000"); ok 592 - is a valid object ok 593 - $x = Math::BigInt->bnorm("+1"); ok 594 - is a valid object ok 595 - $x = Math::BigInt->bnorm("+01"); ok 596 - is a valid object ok 597 - $x = Math::BigInt->bnorm("+001"); ok 598 - is a valid object ok 599 - $x = Math::BigInt->bnorm("+00000100000"); ok 600 - is a valid object ok 601 - $x = Math::BigInt->bnorm("123456789"); ok 602 - is a valid object ok 603 - $x = Math::BigInt->bnorm("-1"); ok 604 - is a valid object ok 605 - $x = Math::BigInt->bnorm("-01"); ok 606 - is a valid object ok 607 - $x = Math::BigInt->bnorm("-001"); ok 608 - is a valid object ok 609 - $x = Math::BigInt->bnorm("-123456789"); ok 610 - is a valid object ok 611 - $x = Math::BigInt->bnorm("-00000100000"); ok 612 - is a valid object ok 613 - $x = Math::BigInt->bnorm("1_2_3"); ok 614 - is a valid object ok 615 - $x = Math::BigInt->bnorm("10000000000E-1_0"); ok 616 - is a valid object ok 617 - $x = Math::BigInt->bnorm("1E2"); ok 618 - is a valid object ok 619 - $x = Math::BigInt->bnorm("1E1"); ok 620 - is a valid object ok 621 - $x = Math::BigInt->bnorm("1E0"); ok 622 - is a valid object ok 623 - $x = Math::BigInt->bnorm("1.23E2"); ok 624 - is a valid object ok 625 - $x = Math::BigInt->bnorm("100E-1"); ok 626 - is a valid object ok 627 - $x = Math::BigInt->bnorm("1.E3"); ok 628 - is a valid object ok 629 - $x = Math::BigInt->bnorm("1.01E2"); ok 630 - is a valid object ok 631 - $x = Math::BigInt->bnorm("1010E-1"); ok 632 - is a valid object ok 633 - $x = Math::BigInt->bnorm("-1010E0"); ok 634 - is a valid object ok 635 - $x = Math::BigInt->bnorm("-1010E1"); ok 636 - is a valid object ok 637 - $x = Math::BigInt->bnorm("1234.00"); ok 638 - is a valid object ok 639 - $x = Math::BigInt->bnorm("-1010E-2"); ok 640 - is a valid object ok 641 - $x = Math::BigInt->bnorm("-1.01E+1"); ok 642 - is a valid object ok 643 - $x = Math::BigInt->bnorm("-1.01E-1"); ok 644 - is a valid object ok 645 - $x = Math::BigInt->bnorm("1E-999999"); ok 646 - is a valid object ok 647 - $x = Math::BigInt->bnorm("0.5"); ok 648 - is a valid object ok 649 - $x = Math::BigInt->new("1"); $x->bnan(); ok 650 - is a valid object ok 651 - $x = Math::BigInt->new("2"); $x->bnan(); ok 652 - is a valid object ok 653 - $x = Math::BigInt->new("abc"); $x->bnan(); ok 654 - is a valid object ok 655 - $x = Math::BigInt->new("2"); $x->bone("+"); ok 656 - is a valid object ok 657 - $x = Math::BigInt->new("2"); $x->bone("-"); ok 658 - is a valid object ok 659 - $x = Math::BigInt->new("boneNaN"); $x->bone("-"); ok 660 - is a valid object ok 661 - $x = Math::BigInt->new("boneNaN"); $x->bone("+"); ok 662 - is a valid object ok 663 - $x = Math::BigInt->new("2"); $x->bone("abc"); ok 664 - is a valid object ok 665 - $x = Math::BigInt->new("3"); $x->bone(""); ok 666 - is a valid object ok 667 - $x = Math::BigInt->new("1"); $x->binf("+"); ok 668 - is a valid object ok 669 - $x = Math::BigInt->new("2"); $x->binf("-"); ok 670 - is a valid object ok 671 - $x = Math::BigInt->new("3"); $x->binf("abc"); ok 672 - is a valid object ok 673 - $x = Math::BigInt->new("123"); $x->is_nan() || 0; ok 674 - $x = Math::BigInt->new("abc"); $x->is_nan() || 0; ok 675 - $x = Math::BigInt->new("NaN"); $x->is_nan() || 0; ok 676 - $x = Math::BigInt->new("-123"); $x->is_nan() || 0; ok 677 - $x = Math::BigInt->new("+inf"); $x->is_inf(""); ok 678 - $x = Math::BigInt->new("-inf"); $x->is_inf(""); ok 679 - $x = Math::BigInt->new("abc"); $x->is_inf(""); ok 680 - $x = Math::BigInt->new("1"); $x->is_inf(""); ok 681 - $x = Math::BigInt->new("NaN"); $x->is_inf(""); ok 682 - $x = Math::BigInt->new("-1"); $x->is_inf(""); ok 683 - $x = Math::BigInt->new("+inf"); $x->is_inf("-"); ok 684 - $x = Math::BigInt->new("+inf"); $x->is_inf("+"); ok 685 - $x = Math::BigInt->new("-inf"); $x->is_inf("-"); ok 686 - $x = Math::BigInt->new("-inf"); $x->is_inf("+"); ok 687 - $x = Math::BigInt->new("-inf"); $x->is_inf("-inf"); ok 688 - $x = Math::BigInt->new("-inf"); $x->is_inf("+inf"); ok 689 - $x = Math::BigInt->new("+inf"); $x->is_inf("-inf"); ok 690 - $x = Math::BigInt->new("+inf"); $x->is_inf("+inf"); ok 691 - $x = Math::BigInt->new("+iNfInItY"); $x->is_inf(""); ok 692 - $x = Math::BigInt->new("-InFiNiTy"); $x->is_inf(""); ok 693 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x << $y; ok 694 - is a valid object ok 695 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+2"); $x << $y; ok 696 - is a valid object ok 697 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+32"); $x << $y; ok 698 - is a valid object ok 699 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+48"); $x << $y; ok 700 - is a valid object ok 701 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("-2"); $x << $y; ok 702 - is a valid object ok 703 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("4"); $x->blsft($y, 10); ok 704 - is a valid object ok 705 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 706 - is a valid object ok 707 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 708 - is a valid object ok 709 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 710 - is a valid object ok 711 - $x = Math::BigInt->new("+12"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 712 - is a valid object ok 713 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->blsft($y, 10); ok 714 - is a valid object ok 715 - $x = Math::BigInt->new("1234567890123"); $y = Math::BigInt->new("12"); $x->blsft($y, 10); ok 716 - is a valid object ok 717 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 718 - is a valid object ok 719 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 720 - is a valid object ok 721 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 722 - is a valid object ok 723 - $x = Math::BigInt->new("-102533203"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 724 - is a valid object ok 725 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x >> $y; ok 726 - is a valid object ok 727 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x >> $y; ok 728 - is a valid object ok 729 - $x = Math::BigInt->new("+4294967296"); $y = Math::BigInt->new("+32"); $x >> $y; ok 730 - is a valid object ok 731 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+48"); $x >> $y; ok 732 - is a valid object ok 733 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-2"); $x >> $y; ok 734 - is a valid object ok 735 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 736 - is a valid object ok 737 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 738 - is a valid object ok 739 - $x = Math::BigInt->new("+200"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 740 - is a valid object ok 741 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("3"); $x->brsft($y, 10); ok 742 - is a valid object ok 743 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 744 - is a valid object ok 745 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->brsft($y, 10); ok 746 - is a valid object ok 747 - $x = Math::BigInt->new("310000"); $y = Math::BigInt->new("4"); $x->brsft($y, 10); ok 748 - is a valid object ok 749 - $x = Math::BigInt->new("12300000"); $y = Math::BigInt->new("5"); $x->brsft($y, 10); ok 750 - is a valid object ok 751 - $x = Math::BigInt->new("1230000000000"); $y = Math::BigInt->new("10"); $x->brsft($y, 10); ok 752 - is a valid object ok 753 - $x = Math::BigInt->new("09876123456789067890"); $y = Math::BigInt->new("12"); $x->brsft($y, 10); ok 754 - is a valid object ok 755 - $x = Math::BigInt->new("1234561234567890123"); $y = Math::BigInt->new("13"); $x->brsft($y, 10); ok 756 - is a valid object ok 757 - $x = Math::BigInt->new("820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 758 - is a valid object ok 759 - $x = Math::BigInt->new("-15"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 760 - is a valid object ok 761 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 762 - is a valid object ok 763 - $x = Math::BigInt->new("-13"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 764 - is a valid object ok 765 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 766 - is a valid object ok 767 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 768 - is a valid object ok 769 - $x = Math::BigInt->new("-10"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 770 - is a valid object ok 771 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 772 - is a valid object ok 773 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 774 - is a valid object ok 775 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 776 - is a valid object ok 777 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 778 - is a valid object ok 779 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 780 - is a valid object ok 781 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 782 - is a valid object ok 783 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 784 - is a valid object ok 785 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 786 - is a valid object ok 787 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 788 - is a valid object ok 789 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("2"); $x->brsft($y, 2); ok 790 - is a valid object ok 791 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 792 - is a valid object ok 793 - $x = Math::BigInt->new("-820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 794 - is a valid object ok 795 - $x = Math::BigInt->new("-205066405"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 796 - is a valid object ok 797 - $x = Math::BigInt->new("+inf"); $x->bsstr(); ok 798 - $x = Math::BigInt->new("-inf"); $x->bsstr(); ok 799 - $x = Math::BigInt->new("1e+34"); $x->bsstr(); ok 800 - $x = Math::BigInt->new("123.456E3"); $x->bsstr(); ok 801 - $x = Math::BigInt->new("100"); $x->bsstr(); ok 802 - $x = Math::BigInt->new("bsstrabc"); $x->bsstr(); ok 803 - $x = Math::BigInt->new("-5"); $x->bsstr(); ok 804 - $x = Math::BigInt->new("-100"); $x->bsstr(); ok 805 - $x = Math::BigInt->new("5"); $x->numify(); ok 806 - $x = Math::BigInt->new("-5"); $x->numify(); ok 807 - $x = Math::BigInt->new("100"); $x->numify(); ok 808 - $x = Math::BigInt->new("-100"); $x->numify(); ok 809 - $x = Math::BigInt->new("bnegNaN"); $x->bneg(); ok 810 - is a valid object ok 811 - $x = Math::BigInt->new("+inf"); $x->bneg(); ok 812 - is a valid object ok 813 - $x = Math::BigInt->new("-inf"); $x->bneg(); ok 814 - is a valid object ok 815 - $x = Math::BigInt->new("abd"); $x->bneg(); ok 816 - is a valid object ok 817 - $x = Math::BigInt->new("0"); $x->bneg(); ok 818 - is a valid object ok 819 - $x = Math::BigInt->new("1"); $x->bneg(); ok 820 - is a valid object ok 821 - $x = Math::BigInt->new("-1"); $x->bneg(); ok 822 - is a valid object ok 823 - $x = Math::BigInt->new("+123456789"); $x->bneg(); ok 824 - is a valid object ok 825 - $x = Math::BigInt->new("-123456789"); $x->bneg(); ok 826 - is a valid object ok 827 - $x = Math::BigInt->new("babsNaN"); $x->babs(); ok 828 - is a valid object ok 829 - $x = Math::BigInt->new("+inf"); $x->babs(); ok 830 - is a valid object ok 831 - $x = Math::BigInt->new("-inf"); $x->babs(); ok 832 - is a valid object ok 833 - $x = Math::BigInt->new("0"); $x->babs(); ok 834 - is a valid object ok 835 - $x = Math::BigInt->new("1"); $x->babs(); ok 836 - is a valid object ok 837 - $x = Math::BigInt->new("-1"); $x->babs(); ok 838 - is a valid object ok 839 - $x = Math::BigInt->new("+123456789"); $x->babs(); ok 840 - is a valid object ok 841 - $x = Math::BigInt->new("-123456789"); $x->babs(); ok 842 - is a valid object ok 843 - $x = Math::BigInt->new("NaN"); $x->bsgn(); ok 844 - is a valid object ok 845 - $x = Math::BigInt->new("+inf"); $x->bsgn(); ok 846 - is a valid object ok 847 - $x = Math::BigInt->new("-inf"); $x->bsgn(); ok 848 - is a valid object ok 849 - $x = Math::BigInt->new("0"); $x->bsgn(); ok 850 - is a valid object ok 851 - $x = Math::BigInt->new("+123456789"); $x->bsgn(); ok 852 - is a valid object ok 853 - $x = Math::BigInt->new("-123456789"); $x->bsgn(); ok 854 - is a valid object ok 855 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 856 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 857 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 858 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 859 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 860 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 861 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 862 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 863 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 864 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 865 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 866 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 867 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 868 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("12"); $x->bcmp($y); ok 869 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 870 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 871 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-12"); $x->bcmp($y); ok 872 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 873 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("124"); $x->bcmp($y); ok 874 - $x = Math::BigInt->new("124"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 875 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-124"); $x->bcmp($y); ok 876 - $x = Math::BigInt->new("-124"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 877 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("5"); $x->bcmp($y); ok 878 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->bcmp($y); ok 879 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bcmp($y); ok 880 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("123456789"); $x->bcmp($y); ok 881 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 882 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 883 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 884 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 885 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 886 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 887 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 888 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 889 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 890 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 891 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 892 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 893 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 894 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 895 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 896 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 897 - $x = Math::BigInt->new("abc"); $x->binc(); ok 898 - is a valid object ok 899 - $x = Math::BigInt->new("+inf"); $x->binc(); ok 900 - is a valid object ok 901 - $x = Math::BigInt->new("-inf"); $x->binc(); ok 902 - is a valid object ok 903 - $x = Math::BigInt->new("+0"); $x->binc(); ok 904 - is a valid object ok 905 - $x = Math::BigInt->new("+1"); $x->binc(); ok 906 - is a valid object ok 907 - $x = Math::BigInt->new("-1"); $x->binc(); ok 908 - is a valid object ok 909 - $x = Math::BigInt->new("abc"); $x->bdec(); ok 910 - is a valid object ok 911 - $x = Math::BigInt->new("+inf"); $x->bdec(); ok 912 - is a valid object ok 913 - $x = Math::BigInt->new("-inf"); $x->bdec(); ok 914 - is a valid object ok 915 - $x = Math::BigInt->new("+0"); $x->bdec(); ok 916 - is a valid object ok 917 - $x = Math::BigInt->new("+1"); $x->bdec(); ok 918 - is a valid object ok 919 - $x = Math::BigInt->new("-1"); $x->bdec(); ok 920 - is a valid object ok 921 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->badd($y); ok 922 - is a valid object ok 923 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x->badd($y); ok 924 - is a valid object ok 925 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->badd($y); ok 926 - is a valid object ok 927 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->badd($y); ok 928 - is a valid object ok 929 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 930 - is a valid object ok 931 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 932 - is a valid object ok 933 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->badd($y); ok 934 - is a valid object ok 935 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 936 - is a valid object ok 937 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 938 - is a valid object ok 939 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("baddNaN"); $x->badd($y); ok 940 - is a valid object ok 941 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("baddNaN"); $x->badd($y); ok 942 - is a valid object ok 943 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->badd($y); ok 944 - is a valid object ok 945 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->badd($y); ok 946 - is a valid object ok 947 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->badd($y); ok 948 - is a valid object ok 949 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->badd($y); ok 950 - is a valid object ok 951 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->badd($y); ok 952 - is a valid object ok 953 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 954 - is a valid object ok 955 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 956 - is a valid object ok 957 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 958 - is a valid object ok 959 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 960 - is a valid object ok 961 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 962 - is a valid object ok 963 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 964 - is a valid object ok 965 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 966 - is a valid object ok 967 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 968 - is a valid object ok 969 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 970 - is a valid object ok 971 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 972 - is a valid object ok 973 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 974 - is a valid object ok 975 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 976 - is a valid object ok 977 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 978 - is a valid object ok 979 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 980 - is a valid object ok 981 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 982 - is a valid object ok 983 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 984 - is a valid object ok 985 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 986 - is a valid object ok 987 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 988 - is a valid object ok 989 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 990 - is a valid object ok 991 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 992 - is a valid object ok 993 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 994 - is a valid object ok 995 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 996 - is a valid object ok 997 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 998 - is a valid object ok 999 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1000 - is a valid object ok 1001 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1002 - is a valid object ok 1003 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("987654321"); $x->badd($y); ok 1004 - is a valid object ok 1005 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->badd($y); ok 1006 - is a valid object ok 1007 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x->badd($y); ok 1008 - is a valid object ok 1009 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->badd($y); ok 1010 - is a valid object ok 1011 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10001"); $x->badd($y); ok 1012 - is a valid object ok 1013 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100001"); $x->badd($y); ok 1014 - is a valid object ok 1015 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000001"); $x->badd($y); ok 1016 - is a valid object ok 1017 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000001"); $x->badd($y); ok 1018 - is a valid object ok 1019 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000001"); $x->badd($y); ok 1020 - is a valid object ok 1021 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000001"); $x->badd($y); ok 1022 - is a valid object ok 1023 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000001"); $x->badd($y); ok 1024 - is a valid object ok 1025 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000000001"); $x->badd($y); ok 1026 - is a valid object ok 1027 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000000001"); $x->badd($y); ok 1028 - is a valid object ok 1029 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000000001"); $x->badd($y); ok 1030 - is a valid object ok 1031 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10001"); $x->badd($y); ok 1032 - is a valid object ok 1033 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100001"); $x->badd($y); ok 1034 - is a valid object ok 1035 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000001"); $x->badd($y); ok 1036 - is a valid object ok 1037 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000001"); $x->badd($y); ok 1038 - is a valid object ok 1039 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000001"); $x->badd($y); ok 1040 - is a valid object ok 1041 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000001"); $x->badd($y); ok 1042 - is a valid object ok 1043 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000001"); $x->badd($y); ok 1044 - is a valid object ok 1045 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000000001"); $x->badd($y); ok 1046 - is a valid object ok 1047 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000000001"); $x->badd($y); ok 1048 - is a valid object ok 1049 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000000001"); $x->badd($y); ok 1050 - is a valid object ok 1051 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bsub($y); ok 1052 - is a valid object ok 1053 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1054 - is a valid object ok 1055 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->bsub($y); ok 1056 - is a valid object ok 1057 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bsub($y); ok 1058 - is a valid object ok 1059 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bsub($y); ok 1060 - is a valid object ok 1061 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bsub($y); ok 1062 - is a valid object ok 1063 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bsub($y); ok 1064 - is a valid object ok 1065 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1066 - is a valid object ok 1067 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1068 - is a valid object ok 1069 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1070 - is a valid object ok 1071 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1072 - is a valid object ok 1073 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1074 - is a valid object ok 1075 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1076 - is a valid object ok 1077 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1078 - is a valid object ok 1079 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1080 - is a valid object ok 1081 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1082 - is a valid object ok 1083 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1084 - is a valid object ok 1085 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1086 - is a valid object ok 1087 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1088 - is a valid object ok 1089 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1090 - is a valid object ok 1091 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1092 - is a valid object ok 1093 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1094 - is a valid object ok 1095 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1096 - is a valid object ok 1097 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1098 - is a valid object ok 1099 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1100 - is a valid object ok 1101 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1102 - is a valid object ok 1103 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1104 - is a valid object ok 1105 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1106 - is a valid object ok 1107 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1108 - is a valid object ok 1109 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1110 - is a valid object ok 1111 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1112 - is a valid object ok 1113 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1114 - is a valid object ok 1115 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1116 - is a valid object ok 1117 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1118 - is a valid object ok 1119 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1120 - is a valid object ok 1121 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1122 - is a valid object ok 1123 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1124 - is a valid object ok 1125 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("+987654321"); $x->bsub($y); ok 1126 - is a valid object ok 1127 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bsub($y); ok 1128 - is a valid object ok 1129 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x->bsub($y); ok 1130 - is a valid object ok 1131 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bsub($y); ok 1132 - is a valid object ok 1133 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1134 - is a valid object ok 1135 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1136 - is a valid object ok 1137 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1138 - is a valid object ok 1139 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1140 - is a valid object ok 1141 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1142 - is a valid object ok 1143 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1144 - is a valid object ok 1145 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1146 - is a valid object ok 1147 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1148 - is a valid object ok 1149 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1150 - is a valid object ok 1151 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1152 - is a valid object ok 1153 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1154 - is a valid object ok 1155 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1156 - is a valid object ok 1157 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1158 - is a valid object ok 1159 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1160 - is a valid object ok 1161 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1162 - is a valid object ok 1163 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1164 - is a valid object ok 1165 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1166 - is a valid object ok 1167 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1168 - is a valid object ok 1169 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1170 - is a valid object ok 1171 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1172 - is a valid object ok 1173 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1174 - is a valid object ok 1175 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1176 - is a valid object ok 1177 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1178 - is a valid object ok 1179 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("abc"); $x->bmuladd($y, $z); ok 1180 - is a valid object ok 1181 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1182 - is a valid object ok 1183 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1184 - is a valid object ok 1185 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaNmul"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1186 - is a valid object ok 1187 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaNmul"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1188 - is a valid object ok 1189 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1190 - is a valid object ok 1191 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1192 - is a valid object ok 1193 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1194 - is a valid object ok 1195 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1196 - is a valid object ok 1197 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1198 - is a valid object ok 1199 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1200 - is a valid object ok 1201 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1202 - is a valid object ok 1203 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1204 - is a valid object ok 1205 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1206 - is a valid object ok 1207 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1208 - is a valid object ok 1209 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1210 - is a valid object ok 1211 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1212 - is a valid object ok 1213 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1214 - is a valid object ok 1215 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1216 - is a valid object ok 1217 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1218 - is a valid object ok 1219 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1220 - is a valid object ok 1221 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1222 - is a valid object ok 1223 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1224 - is a valid object ok 1225 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1226 - is a valid object ok 1227 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1228 - is a valid object ok 1229 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1230 - is a valid object ok 1231 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1232 - is a valid object ok 1233 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1234 - is a valid object ok 1235 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1236 - is a valid object ok 1237 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1238 - is a valid object ok 1239 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1240 - is a valid object ok 1241 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1242 - is a valid object ok 1243 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1244 - is a valid object ok 1245 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1246 - is a valid object ok 1247 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1248 - is a valid object ok 1249 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1250 - is a valid object ok 1251 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1252 - is a valid object ok 1253 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1254 - is a valid object ok 1255 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1256 - is a valid object ok 1257 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1258 - is a valid object ok 1259 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1260 - is a valid object ok 1261 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1262 - is a valid object ok 1263 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1264 - is a valid object ok 1265 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1266 - is a valid object ok 1267 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1268 - is a valid object ok 1269 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1270 - is a valid object ok 1271 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1272 - is a valid object ok 1273 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1274 - is a valid object ok 1275 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1276 - is a valid object ok 1277 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1278 - is a valid object ok 1279 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1280 - is a valid object ok 1281 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1282 - is a valid object ok 1283 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("5"); $x->bmuladd($y, $z); ok 1284 - is a valid object ok 1285 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("5"); $x->bmuladd($y, $z); ok 1286 - is a valid object ok 1287 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $z = Math::BigInt->new("1234567890"); $x->bmuladd($y, $z); ok 1288 - is a valid object ok 1289 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("12345678901234567890"); $x->bmuladd($y, $z); ok 1290 - is a valid object ok 1291 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmul($y); ok 1292 - is a valid object ok 1293 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1294 - is a valid object ok 1295 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->bmul($y); ok 1296 - is a valid object ok 1297 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1298 - is a valid object ok 1299 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1300 - is a valid object ok 1301 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaNmul"); $x->bmul($y); ok 1302 - is a valid object ok 1303 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaNmul"); $x->bmul($y); ok 1304 - is a valid object ok 1305 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1306 - is a valid object ok 1307 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1308 - is a valid object ok 1309 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1310 - is a valid object ok 1311 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1312 - is a valid object ok 1313 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1314 - is a valid object ok 1315 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1316 - is a valid object ok 1317 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1318 - is a valid object ok 1319 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1320 - is a valid object ok 1321 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1322 - is a valid object ok 1323 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $x->bmul($y); ok 1324 - is a valid object ok 1325 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $x->bmul($y); ok 1326 - is a valid object ok 1327 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1328 - is a valid object ok 1329 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1330 - is a valid object ok 1331 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1332 - is a valid object ok 1333 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1334 - is a valid object ok 1335 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $x->bmul($y); ok 1336 - is a valid object ok 1337 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $x->bmul($y); ok 1338 - is a valid object ok 1339 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $x->bmul($y); ok 1340 - is a valid object ok 1341 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x->bmul($y); ok 1342 - is a valid object ok 1343 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $x->bmul($y); ok 1344 - is a valid object ok 1345 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $x->bmul($y); ok 1346 - is a valid object ok 1347 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $x->bmul($y); ok 1348 - is a valid object ok 1349 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $x->bmul($y); ok 1350 - is a valid object ok 1351 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $x->bmul($y); ok 1352 - is a valid object ok 1353 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1354 - is a valid object ok 1355 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1356 - is a valid object ok 1357 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1358 - is a valid object ok 1359 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1360 - is a valid object ok 1361 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1362 - is a valid object ok 1363 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1364 - is a valid object ok 1365 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1366 - is a valid object ok 1367 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1368 - is a valid object ok 1369 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1370 - is a valid object ok 1371 - $x = Math::BigInt->new("+25"); $y = Math::BigInt->new("+25"); $x->bmul($y); ok 1372 - is a valid object ok 1373 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("+12345"); $x->bmul($y); ok 1374 - is a valid object ok 1375 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+11111"); $x->bmul($y); ok 1376 - is a valid object ok 1377 - $x = Math::BigInt->new("9999"); $y = Math::BigInt->new("10000"); $x->bmul($y); ok 1378 - is a valid object ok 1379 - $x = Math::BigInt->new("99999"); $y = Math::BigInt->new("100000"); $x->bmul($y); ok 1380 - is a valid object ok 1381 - $x = Math::BigInt->new("999999"); $y = Math::BigInt->new("1000000"); $x->bmul($y); ok 1382 - is a valid object ok 1383 - $x = Math::BigInt->new("9999999"); $y = Math::BigInt->new("10000000"); $x->bmul($y); ok 1384 - is a valid object ok 1385 - $x = Math::BigInt->new("99999999"); $y = Math::BigInt->new("100000000"); $x->bmul($y); ok 1386 - is a valid object ok 1387 - $x = Math::BigInt->new("999999999"); $y = Math::BigInt->new("1000000000"); $x->bmul($y); ok 1388 - is a valid object ok 1389 - $x = Math::BigInt->new("9999999999"); $y = Math::BigInt->new("10000000000"); $x->bmul($y); ok 1390 - is a valid object ok 1391 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("100000000000"); $x->bmul($y); ok 1392 - is a valid object ok 1393 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("1000000000000"); $x->bmul($y); ok 1394 - is a valid object ok 1395 - $x = Math::BigInt->new("9999999999999"); $y = Math::BigInt->new("10000000000000"); $x->bmul($y); ok 1396 - is a valid object ok 1397 - $x = Math::BigInt->new("99999999999999"); $y = Math::BigInt->new("100000000000000"); $x->bmul($y); ok 1398 - is a valid object ok 1399 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("1000000000000000"); $x->bmul($y); ok 1400 - is a valid object ok 1401 - $x = Math::BigInt->new("9999999999999999"); $y = Math::BigInt->new("10000000000000000"); $x->bmul($y); ok 1402 - is a valid object ok 1403 - $x = Math::BigInt->new("99999999999999999"); $y = Math::BigInt->new("100000000000000000"); $x->bmul($y); ok 1404 - is a valid object ok 1405 - $x = Math::BigInt->new("999999999999999999"); $y = Math::BigInt->new("1000000000000000000"); $x->bmul($y); ok 1406 - is a valid object ok 1407 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $x->bmul($y); ok 1408 - is a valid object ok 1409 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1410 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1411 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1412 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1413 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1414 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1415 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1416 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1417 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1418 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1419 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1420 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1421 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1422 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1423 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1424 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1425 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1426 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1427 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1428 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1429 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1430 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1431 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1432 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1433 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1434 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1435 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1436 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1437 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1438 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1439 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1440 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1441 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1442 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1443 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1444 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1445 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1446 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1447 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1448 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1449 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1450 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1451 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1452 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1453 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1454 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1455 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1456 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1457 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1458 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1459 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1460 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1461 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1462 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1463 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1464 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1465 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1466 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1467 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1468 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1469 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1470 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); join (",", $x->bdiv($y)); ok 1471 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); join (",", $x->bdiv($y)); ok 1472 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); join (",", $x->bdiv($y)); ok 1473 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); join (",", $x->bdiv($y)); ok 1474 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); join (",", $x->bdiv($y)); ok 1475 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); join (",", $x->bdiv($y)); ok 1476 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); join (",", $x->bdiv($y)); ok 1477 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); join (",", $x->bdiv($y)); ok 1478 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); join (",", $x->bdiv($y)); ok 1479 - $x = Math::BigInt->new("1267650600228229401496703205375"); $y = Math::BigInt->new("1267650600228229401496703205376"); join (",", $x->bdiv($y)); ok 1480 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); join (",", $x->bdiv($y)); ok 1481 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); join (",", $x->bdiv($y)); ok 1482 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); join (",", $x->bdiv($y)); ok 1483 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); join (",", $x->bdiv($y)); ok 1484 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); join (",", $x->bdiv($y)); ok 1485 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); join (",", $x->bdiv($y)); ok 1486 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); join (",", $x->bdiv($y)); ok 1487 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); join (",", $x->bdiv($y)); ok 1488 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); join (",", $x->bdiv($y)); ok 1489 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); join (",", $x->bdiv($y)); ok 1490 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1491 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1492 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1493 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1494 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1495 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1496 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1497 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1498 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1499 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1500 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1501 - is a valid object ok 1502 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1503 - is a valid object ok 1504 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1505 - is a valid object ok 1506 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1507 - is a valid object ok 1508 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1509 - is a valid object ok 1510 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1511 - is a valid object ok 1512 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1513 - is a valid object ok 1514 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1515 - is a valid object ok 1516 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1517 - is a valid object ok 1518 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1519 - is a valid object ok 1520 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1521 - is a valid object ok 1522 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1523 - is a valid object ok 1524 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1525 - is a valid object ok 1526 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1527 - is a valid object ok 1528 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1529 - is a valid object ok 1530 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1531 - is a valid object ok 1532 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1533 - is a valid object ok 1534 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1535 - is a valid object ok 1536 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1537 - is a valid object ok 1538 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1539 - is a valid object ok 1540 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1541 - is a valid object ok 1542 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1543 - is a valid object ok 1544 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("-2"); $x->bdiv($y); ok 1545 - is a valid object ok 1546 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1547 - is a valid object ok 1548 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); $x->bdiv($y); ok 1549 - is a valid object ok 1550 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1551 - is a valid object ok 1552 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1553 - is a valid object ok 1554 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1555 - is a valid object ok 1556 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1557 - is a valid object ok 1558 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1559 - is a valid object ok 1560 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1561 - is a valid object ok 1562 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1563 - is a valid object ok 1564 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1565 - is a valid object ok 1566 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("26"); $x->bdiv($y); ok 1567 - is a valid object ok 1568 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1569 - is a valid object ok 1570 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1571 - is a valid object ok 1572 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1573 - is a valid object ok 1574 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1575 - is a valid object ok 1576 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1577 - is a valid object ok 1578 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1579 - is a valid object ok 1580 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1581 - is a valid object ok 1582 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1583 - is a valid object ok 1584 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1585 - is a valid object ok 1586 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x->bdiv($y); ok 1587 - is a valid object ok 1588 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x->bdiv($y); ok 1589 - is a valid object ok 1590 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x->bdiv($y); ok 1591 - is a valid object ok 1592 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1593 - is a valid object ok 1594 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("+5"); $x->bdiv($y); ok 1595 - is a valid object ok 1596 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("+4"); $x->bdiv($y); ok 1597 - is a valid object ok 1598 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("+8"); $x->bdiv($y); ok 1599 - is a valid object ok 1600 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("+16"); $x->bdiv($y); ok 1601 - is a valid object ok 1602 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1603 - is a valid object ok 1604 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x->bdiv($y); ok 1605 - is a valid object ok 1606 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x->bdiv($y); ok 1607 - is a valid object ok 1608 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x->bdiv($y); ok 1609 - is a valid object ok 1610 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x->bdiv($y); ok 1611 - is a valid object ok 1612 - $x = Math::BigInt->new("+1111088889"); $y = Math::BigInt->new("99999"); $x->bdiv($y); ok 1613 - is a valid object ok 1614 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1615 - is a valid object ok 1616 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1617 - is a valid object ok 1618 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1619 - is a valid object ok 1620 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1621 - is a valid object ok 1622 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1623 - is a valid object ok 1624 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1625 - is a valid object ok 1626 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1627 - is a valid object ok 1628 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1629 - is a valid object ok 1630 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1631 - is a valid object ok 1632 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1633 - is a valid object ok 1634 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1635 - is a valid object ok 1636 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1637 - is a valid object ok 1638 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1639 - is a valid object ok 1640 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1641 - is a valid object ok 1642 - $x = Math::BigInt->new("10000000000000000000000000000000000000000000000000000000000000000000000000000000000"); $y = Math::BigInt->new("10000000375084540248994272022843165711074"); $x->bdiv($y); ok 1643 - is a valid object ok 1644 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); $x->bdiv($y); ok 1645 - is a valid object ok 1646 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); $x->bdiv($y); ok 1647 - is a valid object ok 1648 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); $x->bdiv($y); ok 1649 - is a valid object ok 1650 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); $x->bdiv($y); ok 1651 - is a valid object ok 1652 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); $x->bdiv($y); ok 1653 - is a valid object ok 1654 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); $x->bdiv($y); ok 1655 - is a valid object ok 1656 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); $x->bdiv($y); ok 1657 - is a valid object ok 1658 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); $x->bdiv($y); ok 1659 - is a valid object ok 1660 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); $x->bdiv($y); ok 1661 - is a valid object ok 1662 - $x = Math::BigInt->new("84696969696969696956565656566184292929292929292847474747436308080808080808086765396464646464646465"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1663 - is a valid object ok 1664 - $x = Math::BigInt->new("84696969696969696943434343434871161616161616161452525252486813131313131313143230042929292929292930"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1665 - is a valid object ok 1666 - $x = Math::BigInt->new("84696969696969696969696969697497424242424242424242424242385803030303030303030300750000000000000000"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1667 - is a valid object ok 1668 - $x = Math::BigInt->new("84696969696969696930303030303558030303030303030057575757537318181818181818199694689393939393939395"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1669 - is a valid object ok 1670 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); $x->bdiv($y); ok 1671 - is a valid object ok 1672 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); $x->bdiv($y); ok 1673 - is a valid object ok 1674 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); $x->bdiv($y); ok 1675 - is a valid object ok 1676 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); $x->bdiv($y); ok 1677 - is a valid object ok 1678 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); $x->bdiv($y); ok 1679 - is a valid object ok 1680 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); $x->bdiv($y); ok 1681 - is a valid object ok 1682 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); $x->bdiv($y); ok 1683 - is a valid object ok 1684 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); $x->bdiv($y); ok 1685 - is a valid object ok 1686 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); $x->bdiv($y); ok 1687 - is a valid object ok 1688 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); $x->bdiv($y); ok 1689 - is a valid object ok 1690 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); $x->bdiv($y); ok 1691 - is a valid object ok 1692 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1693 - is a valid object ok 1694 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1695 - is a valid object ok 1696 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1697 - is a valid object ok 1698 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); $x->bdiv($y); ok 1699 - is a valid object ok 1700 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); $x->bdiv($y); ok 1701 - is a valid object ok 1702 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); $x->bdiv($y); ok 1703 - is a valid object ok 1704 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); $x->bdiv($y); ok 1705 - is a valid object ok 1706 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); $x->bdiv($y); ok 1707 - is a valid object ok 1708 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); $x->bdiv($y); ok 1709 - is a valid object ok 1710 - $x = Math::BigInt->new("949418181818187070707070707070707070"); $y = Math::BigInt->new("181818181853535353535353535353535353"); $x->bdiv($y); ok 1711 - is a valid object ok 1712 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1713 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1714 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1715 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1716 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1717 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1718 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1719 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1720 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1721 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1722 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1723 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1724 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1725 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1726 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1727 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1728 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1729 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1730 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1731 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1732 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1733 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1734 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1735 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1736 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1737 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1738 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1739 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1740 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1741 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1742 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1743 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1744 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1745 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1746 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1747 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1748 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1749 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1750 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1751 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1752 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1753 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1754 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1755 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1756 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1757 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1758 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1759 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1760 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1761 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1762 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1763 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1764 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1765 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1766 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1767 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1768 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1769 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1770 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1771 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1772 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1773 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1774 - is a valid object ok 1775 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1776 - is a valid object ok 1777 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1778 - is a valid object ok 1779 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1780 - is a valid object ok 1781 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1782 - is a valid object ok 1783 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1784 - is a valid object ok 1785 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1786 - is a valid object ok 1787 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1788 - is a valid object ok 1789 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1790 - is a valid object ok 1791 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1792 - is a valid object ok 1793 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1794 - is a valid object ok 1795 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1796 - is a valid object ok 1797 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1798 - is a valid object ok 1799 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1800 - is a valid object ok 1801 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1802 - is a valid object ok 1803 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1804 - is a valid object ok 1805 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1806 - is a valid object ok 1807 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1808 - is a valid object ok 1809 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1810 - is a valid object ok 1811 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1812 - is a valid object ok 1813 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1814 - is a valid object ok 1815 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1816 - is a valid object ok 1817 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1818 - is a valid object ok 1819 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1820 - is a valid object ok 1821 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1822 - is a valid object ok 1823 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1824 - is a valid object ok 1825 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1826 - is a valid object ok 1827 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1828 - is a valid object ok 1829 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1830 - is a valid object ok 1831 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1832 - is a valid object ok 1833 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1834 - is a valid object ok 1835 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1836 - is a valid object ok 1837 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1838 - is a valid object ok 1839 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1840 - is a valid object ok 1841 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1842 - is a valid object ok 1843 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1844 - is a valid object ok 1845 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1846 - is a valid object ok 1847 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1848 - is a valid object ok 1849 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1850 - is a valid object ok 1851 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1852 - is a valid object ok 1853 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1854 - is a valid object ok 1855 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1856 - is a valid object ok 1857 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1858 - is a valid object ok 1859 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1860 - is a valid object ok 1861 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1862 - is a valid object ok 1863 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1864 - is a valid object ok 1865 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1866 - is a valid object ok 1867 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1868 - is a valid object ok 1869 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1870 - is a valid object ok 1871 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1872 - is a valid object ok 1873 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1874 - is a valid object ok 1875 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1876 - is a valid object ok 1877 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1878 - is a valid object ok 1879 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1880 - is a valid object ok 1881 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1882 - is a valid object ok 1883 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1884 - is a valid object ok 1885 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1886 - is a valid object ok 1887 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1888 - is a valid object ok 1889 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1890 - is a valid object ok 1891 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1892 - is a valid object ok 1893 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1894 - is a valid object ok 1895 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1896 - is a valid object ok 1897 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1898 - is a valid object ok 1899 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1900 - is a valid object ok 1901 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1902 - is a valid object ok 1903 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1904 - is a valid object ok 1905 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-5"); $x->bmodinv($y); ok 1906 - is a valid object ok 1907 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1908 - is a valid object ok 1909 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5033"); $x->bmodinv($y); ok 1910 - is a valid object ok 1911 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1912 - is a valid object ok 1913 - $x = Math::BigInt->new("-1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1914 - is a valid object ok 1915 - $x = Math::BigInt->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigInt->new("2348249874968739"); $x->bmodinv($y); ok 1916 - is a valid object ok 1917 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1918 - is a valid object ok 1919 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1920 - is a valid object ok 1921 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1922 - is a valid object ok 1923 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1924 - is a valid object ok 1925 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1926 - is a valid object ok 1927 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1928 - is a valid object ok 1929 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1930 - is a valid object ok 1931 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1932 - is a valid object ok 1933 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1934 - is a valid object ok 1935 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1936 - is a valid object ok 1937 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1938 - is a valid object ok 1939 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1940 - is a valid object ok 1941 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1942 - is a valid object ok 1943 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1944 - is a valid object ok 1945 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1946 - is a valid object ok 1947 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1948 - is a valid object ok 1949 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1950 - is a valid object ok 1951 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1952 - is a valid object ok 1953 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1954 - is a valid object ok 1955 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1956 - is a valid object ok 1957 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1958 - is a valid object ok 1959 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1960 - is a valid object ok 1961 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bmodinv($y); ok 1962 - is a valid object ok 1963 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1964 - is a valid object ok 1965 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->bmodinv($y); ok 1966 - is a valid object ok 1967 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1968 - is a valid object ok 1969 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1970 - is a valid object ok 1971 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1972 - is a valid object ok 1973 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1974 - is a valid object ok 1975 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1976 - is a valid object ok 1977 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1978 - is a valid object ok 1979 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1980 - is a valid object ok 1981 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("0"); $x->bmodpow($y, $z); ok 1982 - is a valid object ok 1983 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1984 - is a valid object ok 1985 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1986 - is a valid object ok 1987 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1988 - is a valid object ok 1989 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1990 - is a valid object ok 1991 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1992 - is a valid object ok 1993 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1994 - is a valid object ok 1995 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1996 - is a valid object ok 1997 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1998 - is a valid object ok 1999 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2000 - is a valid object ok 2001 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2002 - is a valid object ok 2003 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2004 - is a valid object ok 2005 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2006 - is a valid object ok 2007 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2008 - is a valid object ok 2009 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2010 - is a valid object ok 2011 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2012 - is a valid object ok 2013 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2014 - is a valid object ok 2015 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2016 - is a valid object ok 2017 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2018 - is a valid object ok 2019 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2020 - is a valid object ok 2021 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2022 - is a valid object ok 2023 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2024 - is a valid object ok 2025 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2026 - is a valid object ok 2027 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2028 - is a valid object ok 2029 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2030 - is a valid object ok 2031 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2032 - is a valid object ok 2033 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2034 - is a valid object ok 2035 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2036 - is a valid object ok 2037 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2044 - is a valid object ok 2045 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2046 - is a valid object ok 2047 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2048 - is a valid object ok 2049 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2050 - is a valid object ok 2051 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2058 - is a valid object ok 2059 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2072 - is a valid object ok 2073 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2086 - is a valid object ok 2087 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2088 - is a valid object ok 2089 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2090 - is a valid object ok 2091 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2092 - is a valid object ok 2093 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2094 - is a valid object ok 2095 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2096 - is a valid object ok 2097 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2098 - is a valid object ok 2099 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2100 - is a valid object ok 2101 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2102 - is a valid object ok 2103 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2104 - is a valid object ok 2105 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2106 - is a valid object ok 2107 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2108 - is a valid object ok 2109 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2110 - is a valid object ok 2111 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2112 - is a valid object ok 2113 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2114 - is a valid object ok 2115 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2116 - is a valid object ok 2117 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2118 - is a valid object ok 2119 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2120 - is a valid object ok 2121 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2122 - is a valid object ok 2123 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2124 - is a valid object ok 2125 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2126 - is a valid object ok 2127 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2128 - is a valid object ok 2129 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2130 - is a valid object ok 2131 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2132 - is a valid object ok 2133 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2134 - is a valid object ok 2135 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2136 - is a valid object ok 2137 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2138 - is a valid object ok 2139 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2140 - is a valid object ok 2141 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2142 - is a valid object ok 2143 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2144 - is a valid object ok 2145 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2146 - is a valid object ok 2147 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2148 - is a valid object ok 2149 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2150 - is a valid object ok 2151 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2152 - is a valid object ok 2153 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2154 - is a valid object ok 2155 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2156 - is a valid object ok 2157 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2158 - is a valid object ok 2159 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2160 - is a valid object ok 2161 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2162 - is a valid object ok 2163 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2164 - is a valid object ok 2165 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2166 - is a valid object ok 2167 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2168 - is a valid object ok 2169 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2170 - is a valid object ok 2171 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2172 - is a valid object ok 2173 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2174 - is a valid object ok 2175 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2176 - is a valid object ok 2177 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2178 - is a valid object ok 2179 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2180 - is a valid object ok 2181 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2182 - is a valid object ok 2183 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2184 - is a valid object ok 2185 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2186 - is a valid object ok 2187 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2188 - is a valid object ok 2189 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2190 - is a valid object ok 2191 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2192 - is a valid object ok 2193 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2194 - is a valid object ok 2195 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2196 - is a valid object ok 2197 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2198 - is a valid object ok 2199 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2200 - is a valid object ok 2201 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2202 - is a valid object ok 2203 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2204 - is a valid object ok 2205 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2206 - is a valid object ok 2207 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2208 - is a valid object ok 2209 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2210 - is a valid object ok 2211 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2212 - is a valid object ok 2213 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2214 - is a valid object ok 2215 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2216 - is a valid object ok 2217 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2218 - is a valid object ok 2219 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2220 - is a valid object ok 2221 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2222 - is a valid object ok 2223 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2224 - is a valid object ok 2225 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2226 - is a valid object ok 2227 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2228 - is a valid object ok 2229 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2230 - is a valid object ok 2231 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2232 - is a valid object ok 2233 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2234 - is a valid object ok 2235 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2236 - is a valid object ok 2237 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2238 - is a valid object ok 2239 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2240 - is a valid object ok 2241 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2242 - is a valid object ok 2243 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2244 - is a valid object ok 2245 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2246 - is a valid object ok 2247 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2248 - is a valid object ok 2249 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2250 - is a valid object ok 2251 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2252 - is a valid object ok 2253 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2254 - is a valid object ok 2255 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2256 - is a valid object ok 2257 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2258 - is a valid object ok 2259 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2260 - is a valid object ok 2261 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2262 - is a valid object ok 2263 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2264 - is a valid object ok 2265 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2266 - is a valid object ok 2267 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2268 - is a valid object ok 2269 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2270 - is a valid object ok 2271 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2272 - is a valid object ok 2273 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2274 - is a valid object ok 2275 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2276 - is a valid object ok 2277 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2278 - is a valid object ok 2279 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2280 - is a valid object ok 2281 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2282 - is a valid object ok 2283 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("16"); $x->bmodpow($y, $z); ok 2284 - is a valid object ok 2285 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("5033"); $x->bmodpow($y, $z); ok 2286 - is a valid object ok 2287 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("7"); $z = Math::BigInt->new("5032"); $x->bmodpow($y, $z); ok 2288 - is a valid object ok 2289 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("8"); $z = Math::BigInt->new("-5"); $x->bmodpow($y, $z); ok 2290 - is a valid object ok 2291 - $x = Math::BigInt->new("1e50"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2292 - is a valid object ok 2293 - $x = Math::BigInt->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigInt->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigInt->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 2294 - is a valid object ok 2295 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2296 - is a valid object ok 2297 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2298 - is a valid object ok 2299 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2300 - is a valid object ok 2301 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x % $y; ok 2302 - is a valid object ok 2303 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x % $y; ok 2304 - is a valid object ok 2305 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x % $y; ok 2306 - is a valid object ok 2307 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2308 - is a valid object ok 2309 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2310 - is a valid object ok 2311 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2312 - is a valid object ok 2313 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2314 - is a valid object ok 2315 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2316 - is a valid object ok 2317 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2318 - is a valid object ok 2319 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2320 - is a valid object ok 2321 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2322 - is a valid object ok 2323 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2324 - is a valid object ok 2325 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2326 - is a valid object ok 2327 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x % $y; ok 2328 - is a valid object ok 2329 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2330 - is a valid object ok 2331 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2332 - is a valid object ok 2333 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2334 - is a valid object ok 2335 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2336 - is a valid object ok 2337 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x % $y; ok 2338 - is a valid object ok 2339 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x % $y; ok 2340 - is a valid object ok 2341 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x % $y; ok 2342 - is a valid object ok 2343 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x % $y; ok 2344 - is a valid object ok 2345 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x % $y; ok 2346 - is a valid object ok 2347 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2348 - is a valid object ok 2349 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2350 - is a valid object ok 2351 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x % $y; ok 2352 - is a valid object ok 2353 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x % $y; ok 2354 - is a valid object ok 2355 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x % $y; ok 2356 - is a valid object ok 2357 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2358 - is a valid object ok 2359 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2360 - is a valid object ok 2361 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2362 - is a valid object ok 2363 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2364 - is a valid object ok 2365 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2366 - is a valid object ok 2367 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2368 - is a valid object ok 2369 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2370 - is a valid object ok 2371 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2372 - is a valid object ok 2373 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2374 - is a valid object ok 2375 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x % $y; ok 2376 - is a valid object ok 2377 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x % $y; ok 2378 - is a valid object ok 2379 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x % $y; ok 2380 - is a valid object ok 2381 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x % $y; ok 2382 - is a valid object ok 2383 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x % $y; ok 2384 - is a valid object ok 2385 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("4"); $x % $y; ok 2386 - is a valid object ok 2387 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("8"); $x % $y; ok 2388 - is a valid object ok 2389 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("16"); $x % $y; ok 2390 - is a valid object ok 2391 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x % $y; ok 2392 - is a valid object ok 2393 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x % $y; ok 2394 - is a valid object ok 2395 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x % $y; ok 2396 - is a valid object ok 2397 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x % $y; ok 2398 - is a valid object ok 2399 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x % $y; ok 2400 - is a valid object ok 2401 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("+5"); $x % $y; ok 2402 - is a valid object ok 2403 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2404 - is a valid object ok 2405 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2406 - is a valid object ok 2407 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x % $y; ok 2408 - is a valid object ok 2409 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x % $y; ok 2410 - is a valid object ok 2411 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x % $y; ok 2412 - is a valid object ok 2413 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x % $y; ok 2414 - is a valid object ok 2415 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x % $y; ok 2416 - is a valid object ok 2417 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x % $y; ok 2418 - is a valid object ok 2419 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x % $y; ok 2420 - is a valid object ok 2421 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x % $y; ok 2422 - is a valid object ok 2423 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); $x % $y; ok 2424 - is a valid object ok 2425 - $x = Math::BigInt->new("100041000510123"); $y = Math::BigInt->new("3"); $x % $y; ok 2426 - is a valid object ok 2427 - $x = Math::BigInt->new("152403346"); $y = Math::BigInt->new("12345"); $x % $y; ok 2428 - is a valid object ok 2429 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x % $y; ok 2430 - is a valid object ok 2431 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("9"); $x % $y; ok 2432 - is a valid object ok 2433 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("9"); $x % $y; ok 2434 - is a valid object ok 2435 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("9"); $x % $y; ok 2436 - is a valid object ok 2437 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("9"); $x % $y; ok 2438 - is a valid object ok 2439 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("9"); $x % $y; ok 2440 - is a valid object ok 2441 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("9"); $x % $y; ok 2442 - is a valid object ok 2443 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("9"); $x % $y; ok 2444 - is a valid object ok 2445 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("9"); $x % $y; ok 2446 - is a valid object ok 2447 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("10"); $x % $y; ok 2448 - is a valid object ok 2449 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("10"); $x % $y; ok 2450 - is a valid object ok 2451 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("10"); $x % $y; ok 2452 - is a valid object ok 2453 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("10"); $x % $y; ok 2454 - is a valid object ok 2455 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("10"); $x % $y; ok 2456 - is a valid object ok 2457 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("10"); $x % $y; ok 2458 - is a valid object ok 2459 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("10"); $x % $y; ok 2460 - is a valid object ok 2461 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("10"); $x % $y; ok 2462 - is a valid object ok 2463 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("113"); $x % $y; ok 2464 - is a valid object ok 2465 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("113"); $x % $y; ok 2466 - is a valid object ok 2467 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("113"); $x % $y; ok 2468 - is a valid object ok 2469 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("113"); $x % $y; ok 2470 - is a valid object ok 2471 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("113"); $x % $y; ok 2472 - is a valid object ok 2473 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("113"); $x % $y; ok 2474 - is a valid object ok 2475 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("113"); $x % $y; ok 2476 - is a valid object ok 2477 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("113"); $x % $y; ok 2478 - is a valid object ok 2479 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x % $y; ok 2480 - is a valid object ok 2481 - $x = Math::BigInt->new("111111111111111111111111111111"); $y = Math::BigInt->new("111111111111111111111111111111"); $x % $y; ok 2482 - is a valid object ok 2483 - $x = Math::BigInt->new("12345678901234567890"); $y = Math::BigInt->new("12345678901234567890"); $x % $y; ok 2484 - is a valid object ok 2485 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("12"); Math::BigInt::bgcd($x, $y); ok 2486 - is a valid object ok 2487 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt::bgcd($x, $y); ok 2488 - is a valid object ok 2489 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); Math::BigInt::bgcd($x, $y); ok 2490 - is a valid object ok 2491 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2492 - is a valid object ok 2493 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); Math::BigInt::bgcd($x, $y); ok 2494 - is a valid object ok 2495 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2496 - is a valid object ok 2497 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2498 - is a valid object ok 2499 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 2500 - is a valid object ok 2501 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2502 - is a valid object ok 2503 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 2504 - is a valid object ok 2505 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2506 - is a valid object ok 2507 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 2508 - is a valid object ok 2509 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2510 - is a valid object ok 2511 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 2512 - is a valid object ok 2513 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); Math::BigInt::bgcd($x, $y); ok 2514 - is a valid object ok 2515 - $x = Math::BigInt->new("+3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 2516 - is a valid object ok 2517 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 2518 - is a valid object ok 2519 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-2"); Math::BigInt::bgcd($x, $y); ok 2520 - is a valid object ok 2521 - $x = Math::BigInt->new("-144"); $y = Math::BigInt->new("-60"); Math::BigInt::bgcd($x, $y); ok 2522 - is a valid object ok 2523 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("-60"); Math::BigInt::bgcd($x, $y); ok 2524 - is a valid object ok 2525 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("60"); Math::BigInt::bgcd($x, $y); ok 2526 - is a valid object ok 2527 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("625"); Math::BigInt::bgcd($x, $y); ok 2528 - is a valid object ok 2529 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("81"); Math::BigInt::bgcd($x, $y); ok 2530 - is a valid object ok 2531 - $x = Math::BigInt->new("1034"); $y = Math::BigInt->new("804"); Math::BigInt::bgcd($x, $y); ok 2532 - is a valid object ok 2533 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("56"); Math::BigInt::bgcd($x, $y, $z); ok 2534 - is a valid object ok 2535 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("54"); Math::BigInt::bgcd($x, $y, $z); ok 2536 - is a valid object ok 2537 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 2538 - is a valid object ok 2539 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2540 - is a valid object ok 2541 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 2542 - is a valid object ok 2543 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2544 - is a valid object ok 2545 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2546 - is a valid object ok 2547 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::blcm($x, $y); ok 2548 - is a valid object ok 2549 - $x = Math::BigInt->new("+27"); $y = Math::BigInt->new("+90"); Math::BigInt::blcm($x, $y); ok 2550 - is a valid object ok 2551 - $x = Math::BigInt->new("+1034"); $y = Math::BigInt->new("+804"); Math::BigInt::blcm($x, $y); ok 2552 - is a valid object ok 2553 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x & $y; ok 2554 - is a valid object ok 2555 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x & $y; ok 2556 - is a valid object ok 2557 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x & $y; ok 2558 - is a valid object ok 2559 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x & $y; ok 2560 - is a valid object ok 2561 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x & $y; ok 2562 - is a valid object ok 2563 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x & $y; ok 2564 - is a valid object ok 2565 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x & $y; ok 2566 - is a valid object ok 2567 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x & $y; ok 2568 - is a valid object ok 2569 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+281474976710656"); $x & $y; ok 2570 - is a valid object ok 2571 - $x = Math::BigInt->new("281474976710656"); $y = Math::BigInt->new("-1"); $x & $y; ok 2572 - is a valid object ok 2573 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x & $y; ok 2574 - is a valid object ok 2575 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x & $y; ok 2576 - is a valid object ok 2577 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x & $y; ok 2578 - is a valid object ok 2579 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("-4"); $x & $y; ok 2580 - is a valid object ok 2581 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x & $y; ok 2582 - is a valid object ok 2583 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x & $y; ok 2584 - is a valid object ok 2585 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x & $y; ok 2586 - is a valid object ok 2587 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x & $y; ok 2588 - is a valid object ok 2589 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x & $y; ok 2590 - is a valid object ok 2591 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x & $y; ok 2592 - is a valid object ok 2593 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x & $y; ok 2594 - is a valid object ok 2595 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x & $y; ok 2596 - is a valid object ok 2597 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x & $y; ok 2598 - is a valid object ok 2599 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x & $y; ok 2600 - is a valid object ok 2601 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x & $y; ok 2602 - is a valid object ok 2603 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x & $y; ok 2604 - is a valid object ok 2605 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x & $y; ok 2606 - is a valid object ok 2607 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x & $y; ok 2608 - is a valid object ok 2609 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x & $y; ok 2610 - is a valid object ok 2611 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x & $y; ok 2612 - is a valid object ok 2613 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x & $y; ok 2614 - is a valid object ok 2615 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x & $y; ok 2616 - is a valid object ok 2617 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x & $y; ok 2618 - is a valid object ok 2619 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0x3F0F0F0F0F0F"); $x & $y; ok 2620 - is a valid object ok 2621 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x | $y; ok 2622 - is a valid object ok 2623 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x | $y; ok 2624 - is a valid object ok 2625 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x | $y; ok 2626 - is a valid object ok 2627 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x | $y; ok 2628 - is a valid object ok 2629 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x | $y; ok 2630 - is a valid object ok 2631 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x | $y; ok 2632 - is a valid object ok 2633 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x | $y; ok 2634 - is a valid object ok 2635 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x | $y; ok 2636 - is a valid object ok 2637 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x | $y; ok 2638 - is a valid object ok 2639 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x | $y; ok 2640 - is a valid object ok 2641 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x | $y; ok 2642 - is a valid object ok 2643 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x | $y; ok 2644 - is a valid object ok 2645 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x | $y; ok 2646 - is a valid object ok 2647 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("-1"); $x | $y; ok 2648 - is a valid object ok 2649 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x | $y; ok 2650 - is a valid object ok 2651 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x | $y; ok 2652 - is a valid object ok 2653 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x | $y; ok 2654 - is a valid object ok 2655 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x | $y; ok 2656 - is a valid object ok 2657 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2658 - is a valid object ok 2659 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2660 - is a valid object ok 2661 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2662 - is a valid object ok 2663 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2664 - is a valid object ok 2665 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2666 - is a valid object ok 2667 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2668 - is a valid object ok 2669 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2670 - is a valid object ok 2671 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2672 - is a valid object ok 2673 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2674 - is a valid object ok 2675 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2676 - is a valid object ok 2677 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2678 - is a valid object ok 2679 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2680 - is a valid object ok 2681 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2682 - is a valid object ok 2683 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2684 - is a valid object ok 2685 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2686 - is a valid object ok 2687 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x | $y; ok 2688 - is a valid object ok 2689 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2690 - is a valid object ok 2691 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2692 - is a valid object ok 2693 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2694 - is a valid object ok 2695 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x | $y; ok 2696 - is a valid object ok 2697 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2698 - is a valid object ok 2699 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2700 - is a valid object ok 2701 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x | $y; ok 2702 - is a valid object ok 2703 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2704 - is a valid object ok 2705 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2706 - is a valid object ok 2707 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x | $y; ok 2708 - is a valid object ok 2709 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2710 - is a valid object ok 2711 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2712 - is a valid object ok 2713 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x | $y; ok 2714 - is a valid object ok 2715 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2716 - is a valid object ok 2717 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2718 - is a valid object ok 2719 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2720 - is a valid object ok 2721 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2722 - is a valid object ok 2723 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2724 - is a valid object ok 2725 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ^ $y; ok 2726 - is a valid object ok 2727 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x ^ $y; ok 2728 - is a valid object ok 2729 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2730 - is a valid object ok 2731 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x ^ $y; ok 2732 - is a valid object ok 2733 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x ^ $y; ok 2734 - is a valid object ok 2735 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2736 - is a valid object ok 2737 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ^ $y; ok 2738 - is a valid object ok 2739 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x ^ $y; ok 2740 - is a valid object ok 2741 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x ^ $y; ok 2742 - is a valid object ok 2743 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x ^ $y; ok 2744 - is a valid object ok 2745 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2746 - is a valid object ok 2747 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2748 - is a valid object ok 2749 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2750 - is a valid object ok 2751 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x ^ $y; ok 2752 - is a valid object ok 2753 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x ^ $y; ok 2754 - is a valid object ok 2755 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x ^ $y; ok 2756 - is a valid object ok 2757 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2758 - is a valid object ok 2759 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2760 - is a valid object ok 2761 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2762 - is a valid object ok 2763 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2764 - is a valid object ok 2765 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2766 - is a valid object ok 2767 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2768 - is a valid object ok 2769 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2770 - is a valid object ok 2771 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2772 - is a valid object ok 2773 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2774 - is a valid object ok 2775 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2776 - is a valid object ok 2777 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2778 - is a valid object ok 2779 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2780 - is a valid object ok 2781 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2782 - is a valid object ok 2783 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2784 - is a valid object ok 2785 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2786 - is a valid object ok 2787 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x ^ $y; ok 2788 - is a valid object ok 2789 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2790 - is a valid object ok 2791 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2792 - is a valid object ok 2793 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2794 - is a valid object ok 2795 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x ^ $y; ok 2796 - is a valid object ok 2797 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2798 - is a valid object ok 2799 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2800 - is a valid object ok 2801 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x ^ $y; ok 2802 - is a valid object ok 2803 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2804 - is a valid object ok 2805 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2806 - is a valid object ok 2807 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x ^ $y; ok 2808 - is a valid object ok 2809 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2810 - is a valid object ok 2811 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2812 - is a valid object ok 2813 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 2814 - is a valid object ok 2815 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2816 - is a valid object ok 2817 - $x = Math::BigInt->new("abc"); $x->bnot(); ok 2818 - is a valid object ok 2819 - $x = Math::BigInt->new("+0"); $x->bnot(); ok 2820 - is a valid object ok 2821 - $x = Math::BigInt->new("+8"); $x->bnot(); ok 2822 - is a valid object ok 2823 - $x = Math::BigInt->new("+281474976710656"); $x->bnot(); ok 2824 - is a valid object ok 2825 - $x = Math::BigInt->new("-1"); $x->bnot(); ok 2826 - is a valid object ok 2827 - $x = Math::BigInt->new("-2"); $x->bnot(); ok 2828 - is a valid object ok 2829 - $x = Math::BigInt->new("-12"); $x->bnot(); ok 2830 - is a valid object ok 2831 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2832 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2833 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2834 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2835 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2836 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2837 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2838 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2839 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2840 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2841 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2842 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2843 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("3"); $x->digit($y); ok 2844 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); $x->digit($y); ok 2845 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); $x->digit($y); ok 2846 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2847 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2848 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2849 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2850 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2851 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2852 - $x = Math::BigInt->new("abc"); $x = $x->mantissa()->bstr(); ok 2853 - $x = Math::BigInt->new("1e4"); $x = $x->mantissa()->bstr(); ok 2854 - $x = Math::BigInt->new("2e0"); $x = $x->mantissa()->bstr(); ok 2855 - $x = Math::BigInt->new("123"); $x = $x->mantissa()->bstr(); ok 2856 - $x = Math::BigInt->new("-1"); $x = $x->mantissa()->bstr(); ok 2857 - $x = Math::BigInt->new("-2"); $x = $x->mantissa()->bstr(); ok 2858 - $x = Math::BigInt->new("+inf"); $x = $x->mantissa()->bstr(); ok 2859 - $x = Math::BigInt->new("-inf"); $x = $x->mantissa()->bstr(); ok 2860 - $x = Math::BigInt->new("abc"); $x = $x->exponent()->bstr(); ok 2861 - $x = Math::BigInt->new("1e4"); $x = $x->exponent()->bstr(); ok 2862 - $x = Math::BigInt->new("2e0"); $x = $x->exponent()->bstr(); ok 2863 - $x = Math::BigInt->new("123"); $x = $x->exponent()->bstr(); ok 2864 - $x = Math::BigInt->new("-1"); $x = $x->exponent()->bstr(); ok 2865 - $x = Math::BigInt->new("-2"); $x = $x->exponent()->bstr(); ok 2866 - $x = Math::BigInt->new("0"); $x = $x->exponent()->bstr(); ok 2867 - $x = Math::BigInt->new("+inf"); $x = $x->exponent()->bstr(); ok 2868 - $x = Math::BigInt->new("-inf"); $x = $x->exponent()->bstr(); ok 2869 - $x = Math::BigInt->new("abc"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2870 - $x = Math::BigInt->new("1e4"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2871 - $x = Math::BigInt->new("2e0"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2872 - $x = Math::BigInt->new("123"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2873 - $x = Math::BigInt->new("-1"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2874 - $x = Math::BigInt->new("-2"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2875 - $x = Math::BigInt->new("0"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2876 - $x = Math::BigInt->new("+inf"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2877 - $x = Math::BigInt->new("-inf"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2878 - $x = Math::BigInt->new("-1"); $x->bfac(); ok 2879 - is a valid object ok 2880 - $x = Math::BigInt->new("NaNfac"); $x->bfac(); ok 2881 - is a valid object ok 2882 - $x = Math::BigInt->new("+inf"); $x->bfac(); ok 2883 - is a valid object ok 2884 - $x = Math::BigInt->new("-inf"); $x->bfac(); ok 2885 - is a valid object ok 2886 - $x = Math::BigInt->new("0"); $x->bfac(); ok 2887 - is a valid object ok 2888 - $x = Math::BigInt->new("1"); $x->bfac(); ok 2889 - is a valid object ok 2890 - $x = Math::BigInt->new("2"); $x->bfac(); ok 2891 - is a valid object ok 2892 - $x = Math::BigInt->new("3"); $x->bfac(); ok 2893 - is a valid object ok 2894 - $x = Math::BigInt->new("4"); $x->bfac(); ok 2895 - is a valid object ok 2896 - $x = Math::BigInt->new("5"); $x->bfac(); ok 2897 - is a valid object ok 2898 - $x = Math::BigInt->new("6"); $x->bfac(); ok 2899 - is a valid object ok 2900 - $x = Math::BigInt->new("7"); $x->bfac(); ok 2901 - is a valid object ok 2902 - $x = Math::BigInt->new("8"); $x->bfac(); ok 2903 - is a valid object ok 2904 - $x = Math::BigInt->new("9"); $x->bfac(); ok 2905 - is a valid object ok 2906 - $x = Math::BigInt->new("10"); $x->bfac(); ok 2907 - is a valid object ok 2908 - $x = Math::BigInt->new("11"); $x->bfac(); ok 2909 - is a valid object ok 2910 - $x = Math::BigInt->new("12"); $x->bfac(); ok 2911 - is a valid object ok 2912 - $x = Math::BigInt->new("20"); $x->bfac(); ok 2913 - is a valid object ok 2914 - $x = Math::BigInt->new("22"); $x->bfac(); ok 2915 - is a valid object ok 2916 - $x = Math::BigInt->new("69"); $x->bfac(); ok 2917 - is a valid object ok 2918 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("12"); $x ** $y; ok 2919 - is a valid object ok 2920 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("abc"); $x ** $y; ok 2921 - is a valid object ok 2922 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x ** $y; ok 2923 - is a valid object ok 2924 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x ** $y; ok 2925 - is a valid object ok 2926 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x ** $y; ok 2927 - is a valid object ok 2928 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2929 - is a valid object ok 2930 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2931 - is a valid object ok 2932 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x ** $y; ok 2933 - is a valid object ok 2934 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x ** $y; ok 2935 - is a valid object ok 2936 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ** $y; ok 2937 - is a valid object ok 2938 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x ** $y; ok 2939 - is a valid object ok 2940 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2941 - is a valid object ok 2942 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2943 - is a valid object ok 2944 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 2945 - is a valid object ok 2946 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x ** $y; ok 2947 - is a valid object ok 2948 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x ** $y; ok 2949 - is a valid object ok 2950 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2951 - is a valid object ok 2952 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2953 - is a valid object ok 2954 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x ** $y; ok 2955 - is a valid object ok 2956 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2957 - is a valid object ok 2958 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2959 - is a valid object ok 2960 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 2961 - is a valid object ok 2962 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 2963 - is a valid object ok 2964 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2965 - is a valid object ok 2966 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2967 - is a valid object ok 2968 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2969 - is a valid object ok 2970 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2971 - is a valid object ok 2972 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 2973 - is a valid object ok 2974 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 2975 - is a valid object ok 2976 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500013"); $x ** $y; ok 2977 - is a valid object ok 2978 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 2979 - is a valid object ok 2980 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 2981 - is a valid object ok 2982 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x ** $y; ok 2983 - is a valid object ok 2984 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x ** $y; ok 2985 - is a valid object ok 2986 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2987 - is a valid object ok 2988 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2989 - is a valid object ok 2990 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2991 - is a valid object ok 2992 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2993 - is a valid object ok 2994 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2995 - is a valid object ok 2996 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2997 - is a valid object ok 2998 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2999 - is a valid object ok 3000 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3001 - is a valid object ok 3002 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3003 - is a valid object ok 3004 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3005 - is a valid object ok 3006 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3007 - is a valid object ok 3008 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3009 - is a valid object ok 3010 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3011 - is a valid object ok 3012 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3013 - is a valid object ok 3014 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3015 - is a valid object ok 3016 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3017 - is a valid object ok 3018 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3019 - is a valid object ok 3020 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x ** $y; ok 3021 - is a valid object ok 3022 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x ** $y; ok 3023 - is a valid object ok 3024 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x ** $y; ok 3025 - is a valid object ok 3026 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x ** $y; ok 3027 - is a valid object ok 3028 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x ** $y; ok 3029 - is a valid object ok 3030 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x ** $y; ok 3031 - is a valid object ok 3032 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x ** $y; ok 3033 - is a valid object ok 3034 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3035 - is a valid object ok 3036 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3037 - is a valid object ok 3038 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3039 - is a valid object ok 3040 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-4"); $x ** $y; ok 3041 - is a valid object ok 3042 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x ** $y; ok 3043 - is a valid object ok 3044 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x ** $y; ok 3045 - is a valid object ok 3046 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x ** $y; ok 3047 - is a valid object ok 3048 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x ** $y; ok 3049 - is a valid object ok 3050 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("6"); $x ** $y; ok 3051 - is a valid object ok 3052 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("7"); $x ** $y; ok 3053 - is a valid object ok 3054 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("8"); $x ** $y; ok 3055 - is a valid object ok 3056 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("9"); $x ** $y; ok 3057 - is a valid object ok 3058 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("20"); $x ** $y; ok 3059 - is a valid object ok 3060 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x ** $y; ok 3061 - is a valid object ok 3062 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 3063 - is a valid object ok 3064 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 3065 - is a valid object ok 3066 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 3067 - is a valid object ok 3068 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 3069 - is a valid object ok 3070 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("2"); $x ** $y; ok 3071 - is a valid object ok 3072 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 3073 - is a valid object ok 3074 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x ** $y; ok 3075 - is a valid object ok 3076 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x ** $y; ok 3077 - is a valid object ok 3078 - $x = Math::BigInt->new("100"); $x->length(); ok 3079 - $x = Math::BigInt->new("10"); $x->length(); ok 3080 - $x = Math::BigInt->new("1"); $x->length(); ok 3081 - $x = Math::BigInt->new("0"); $x->length(); ok 3082 - $x = Math::BigInt->new("12345"); $x->length(); ok 3083 - $x = Math::BigInt->new("10000000000000000"); $x->length(); ok 3084 - $x = Math::BigInt->new("-123"); $x->length(); ok 3085 - $x = Math::BigInt->new("215960156869840440586892398248"); $x->length(); ok 3086 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3087 - is a valid object ok 3088 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3089 - is a valid object ok 3090 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3091 - is a valid object ok 3092 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3093 - is a valid object ok 3094 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3095 - is a valid object ok 3096 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3097 - is a valid object ok 3098 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3099 - is a valid object ok 3100 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3101 - is a valid object ok 3102 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3103 - is a valid object ok 3104 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3105 - is a valid object ok 3106 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3107 - is a valid object ok 3108 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3109 - is a valid object ok 3110 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3111 - is a valid object ok 3112 - $x = Math::BigInt->new("15241"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3113 - is a valid object ok 3114 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3115 - is a valid object ok 3116 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3117 - is a valid object ok 3118 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3119 - is a valid object ok 3120 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3121 - is a valid object ok 3122 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3123 - is a valid object ok 3124 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3125 - is a valid object ok 3126 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3127 - is a valid object ok 3128 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3129 - is a valid object ok 3130 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3131 - is a valid object ok 3132 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3133 - is a valid object ok 3134 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3135 - is a valid object ok 3136 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); $x->broot($y); ok 3137 - is a valid object ok 3138 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3139 - is a valid object ok 3140 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3141 - is a valid object ok 3142 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3143 - is a valid object ok 3144 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3145 - is a valid object ok 3146 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3147 - is a valid object ok 3148 - $x = Math::BigInt->new("-123.45"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3149 - is a valid object ok 3150 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3151 - is a valid object ok 3152 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 3153 - is a valid object ok 3154 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 3155 - is a valid object ok 3156 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 3157 - is a valid object ok 3158 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 3159 - is a valid object ok 3160 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 3161 - is a valid object ok 3162 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 3163 - is a valid object ok 3164 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3165 - is a valid object ok 3166 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3167 - is a valid object ok 3168 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3169 - is a valid object ok 3170 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("8"); $x->broot($y); ok 3171 - is a valid object ok 3172 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("16"); $x->broot($y); ok 3173 - is a valid object ok 3174 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("32"); $x->broot($y); ok 3175 - is a valid object ok 3176 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("64"); $x->broot($y); ok 3177 - is a valid object ok 3178 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("128"); $x->broot($y); ok 3179 - is a valid object ok 3180 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $y = Math::BigInt->new("15"); $x->broot($y); ok 3181 - is a valid object ok 3182 - $x = Math::BigInt->new("145"); $x->bsqrt(); ok 3183 - is a valid object ok 3184 - $x = Math::BigInt->new("144"); $x->bsqrt(); ok 3185 - is a valid object ok 3186 - $x = Math::BigInt->new("143"); $x->bsqrt(); ok 3187 - is a valid object ok 3188 - $x = Math::BigInt->new("16"); $x->bsqrt(); ok 3189 - is a valid object ok 3190 - $x = Math::BigInt->new("170"); $x->bsqrt(); ok 3191 - is a valid object ok 3192 - $x = Math::BigInt->new("169"); $x->bsqrt(); ok 3193 - is a valid object ok 3194 - $x = Math::BigInt->new("168"); $x->bsqrt(); ok 3195 - is a valid object ok 3196 - $x = Math::BigInt->new("4"); $x->bsqrt(); ok 3197 - is a valid object ok 3198 - $x = Math::BigInt->new("3"); $x->bsqrt(); ok 3199 - is a valid object ok 3200 - $x = Math::BigInt->new("2"); $x->bsqrt(); ok 3201 - is a valid object ok 3202 - $x = Math::BigInt->new("9"); $x->bsqrt(); ok 3203 - is a valid object ok 3204 - $x = Math::BigInt->new("12"); $x->bsqrt(); ok 3205 - is a valid object ok 3206 - $x = Math::BigInt->new("256"); $x->bsqrt(); ok 3207 - is a valid object ok 3208 - $x = Math::BigInt->new("100000000"); $x->bsqrt(); ok 3209 - is a valid object ok 3210 - $x = Math::BigInt->new("4000000000000"); $x->bsqrt(); ok 3211 - is a valid object ok 3212 - $x = Math::BigInt->new("152399026"); $x->bsqrt(); ok 3213 - is a valid object ok 3214 - $x = Math::BigInt->new("152399025"); $x->bsqrt(); ok 3215 - is a valid object ok 3216 - $x = Math::BigInt->new("152399024"); $x->bsqrt(); ok 3217 - is a valid object ok 3218 - $x = Math::BigInt->new("18446744073709551616"); $x->bsqrt(); ok 3219 - is a valid object ok 3220 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $x->bsqrt(); ok 3221 - is a valid object ok 3222 - $x = Math::BigInt->new("1"); $x->bsqrt(); ok 3223 - is a valid object ok 3224 - $x = Math::BigInt->new("0"); $x->bsqrt(); ok 3225 - is a valid object ok 3226 - $x = Math::BigInt->new("-2"); $x->bsqrt(); ok 3227 - is a valid object ok 3228 - $x = Math::BigInt->new("-123"); $x->bsqrt(); ok 3229 - is a valid object ok 3230 - $x = Math::BigInt->new("Nan"); $x->bsqrt(); ok 3231 - is a valid object ok 3232 - $x = Math::BigInt->new("+inf"); $x->bsqrt(); ok 3233 - is a valid object ok 3234 - $x = Math::BigInt->new("-inf"); $x->bsqrt(); ok 3235 - is a valid object ok 3236 - $x = Math::BigInt->new("NaN"); $x->bexp(); ok 3237 - is a valid object ok 3238 - $x = Math::BigInt->new("inf"); $x->bexp(); ok 3239 - is a valid object ok 3240 - $x = Math::BigInt->new("1"); $x->bexp(); ok 3241 - is a valid object ok 3242 - $x = Math::BigInt->new("2"); $x->bexp(); ok 3243 - is a valid object ok 3244 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3245 - is a valid object ok 3246 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3247 - is a valid object ok 3248 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3249 - is a valid object ok 3250 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3251 - is a valid object ok 3252 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3253 - is a valid object ok 3254 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3255 - is a valid object ok 3256 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3257 - is a valid object ok 3258 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3259 - is a valid object ok 3260 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->batan2($y); ok 3261 - is a valid object ok 3262 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3263 - is a valid object ok 3264 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3265 - is a valid object ok 3266 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3267 - is a valid object ok 3268 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3269 - is a valid object ok 3270 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3271 - is a valid object ok 3272 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3273 - is a valid object ok 3274 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3275 - is a valid object ok 3276 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3277 - is a valid object ok 3278 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->batan2($y); ok 3279 - is a valid object ok 3280 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3281 - is a valid object ok 3282 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3283 - is a valid object ok 3284 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3285 - is a valid object ok 3286 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3287 - is a valid object ok 3288 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3289 - is a valid object ok 3290 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3291 - is a valid object ok 3292 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3293 - is a valid object ok 3294 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3295 - is a valid object ok 3296 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3297 - is a valid object ok 3298 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3299 - is a valid object ok 3300 - $x = Math::BigInt->new("77"); Math::BigInt->bpi($x); ok 3301 - is a valid object ok 3302 - $x = Math::BigInt->new("+0"); Math::BigInt->bpi($x); ok 3303 - is a valid object ok 3304 - $x = Math::BigInt->new("11"); Math::BigInt->bpi($x); ok 3305 - is a valid object ok 3306 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("10"); $x->bnok($y); ok 3307 - is a valid object ok 3308 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3309 - is a valid object ok 3310 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3311 - is a valid object ok 3312 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3313 - is a valid object ok 3314 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3315 - is a valid object ok 3316 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bnok($y); ok 3317 - is a valid object ok 3318 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3319 - is a valid object ok 3320 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->bnok($y); ok 3321 - is a valid object ok 3322 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3323 - is a valid object ok 3324 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("6"); $x->bnok($y); ok 3325 - is a valid object ok 3326 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("90"); $x->bnok($y); ok 3327 - is a valid object ok 3328 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("95"); $x->bnok($y); ok 3329 - is a valid object ok 3330 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3331 - is a valid object ok 3332 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3333 - is a valid object ok 3334 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3335 - is a valid object ok 3336 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3337 - is a valid object ok 3338 - $x = Math::BigInt->new("NaNbround"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3339 - is a valid object ok 3340 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3341 - is a valid object ok 3342 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3343 - is a valid object ok 3344 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3345 - is a valid object ok 3346 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("2"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3347 - is a valid object ok 3348 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3349 - is a valid object ok 3350 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3351 - is a valid object ok 3352 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3353 - is a valid object ok 3354 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3355 - is a valid object ok 3356 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3357 - is a valid object ok 3358 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3359 - is a valid object ok 3360 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3361 - is a valid object ok 3362 - $x = Math::BigInt->new("+101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3363 - is a valid object ok 3364 - $x = Math::BigInt->new("-101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3365 - is a valid object ok 3366 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3367 - is a valid object ok 3368 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3369 - is a valid object ok 3370 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3371 - is a valid object ok 3372 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3373 - is a valid object ok 3374 - $x = Math::BigInt->new("+201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3375 - is a valid object ok 3376 - $x = Math::BigInt->new("-201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3377 - is a valid object ok 3378 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3379 - is a valid object ok 3380 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3381 - is a valid object ok 3382 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3383 - is a valid object ok 3384 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3385 - is a valid object ok 3386 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3387 - is a valid object ok 3388 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3389 - is a valid object ok 3390 - $x = Math::BigInt->new("+301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3391 - is a valid object ok 3392 - $x = Math::BigInt->new("-301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3393 - is a valid object ok 3394 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3395 - is a valid object ok 3396 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3397 - is a valid object ok 3398 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3399 - is a valid object ok 3400 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3401 - is a valid object ok 3402 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3403 - is a valid object ok 3404 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3405 - is a valid object ok 3406 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3407 - is a valid object ok 3408 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3409 - is a valid object ok 3410 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3411 - is a valid object ok 3412 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3413 - is a valid object ok 3414 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3415 - is a valid object ok 3416 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3417 - is a valid object ok 3418 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3419 - is a valid object ok 3420 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3421 - is a valid object ok 3422 - $x = Math::BigInt->new("+501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3423 - is a valid object ok 3424 - $x = Math::BigInt->new("-501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3425 - is a valid object ok 3426 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3427 - is a valid object ok 3428 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3429 - is a valid object ok 3430 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3431 - is a valid object ok 3432 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3433 - is a valid object ok 3434 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3435 - is a valid object ok 3436 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3437 - is a valid object ok 3438 - $x = Math::BigInt->new("+601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3439 - is a valid object ok 3440 - $x = Math::BigInt->new("-601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3441 - is a valid object ok 3442 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("7"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3443 - is a valid object ok 3444 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3445 - is a valid object ok 3446 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3447 - is a valid object ok 3448 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3449 - is a valid object ok 3450 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3451 - is a valid object ok 3452 - $x = Math::BigInt->new("+60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3453 - is a valid object ok 3454 - $x = Math::BigInt->new("+60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3455 - is a valid object ok 3456 - $x = Math::BigInt->new("+60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3457 - is a valid object ok 3458 - $x = Math::BigInt->new("+60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3459 - is a valid object ok 3460 - $x = Math::BigInt->new("+60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3461 - is a valid object ok 3462 - $x = Math::BigInt->new("+60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3463 - is a valid object ok 3464 - $x = Math::BigInt->new("+60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3465 - is a valid object ok 3466 - $x = Math::BigInt->new("+60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3467 - is a valid object ok 3468 - $x = Math::BigInt->new("+60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3469 - is a valid object ok 3470 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3471 - is a valid object ok 3472 - $x = Math::BigInt->new("-60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3473 - is a valid object ok 3474 - $x = Math::BigInt->new("-60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3475 - is a valid object ok 3476 - $x = Math::BigInt->new("-60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3477 - is a valid object ok 3478 - $x = Math::BigInt->new("-60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3479 - is a valid object ok 3480 - $x = Math::BigInt->new("-60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3481 - is a valid object ok 3482 - $x = Math::BigInt->new("-60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3483 - is a valid object ok 3484 - $x = Math::BigInt->new("-60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3485 - is a valid object ok 3486 - $x = Math::BigInt->new("-60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3487 - is a valid object ok 3488 - $x = Math::BigInt->new("-60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3489 - is a valid object ok 3490 - $x = Math::BigInt->new("0"); $x->is_zero() || 0; ok 3491 - $x = Math::BigInt->new("NaNzero"); $x->is_zero() || 0; ok 3492 - $x = Math::BigInt->new("+inf"); $x->is_zero() || 0; ok 3493 - $x = Math::BigInt->new("-inf"); $x->is_zero() || 0; ok 3494 - $x = Math::BigInt->new("123"); $x->is_zero() || 0; ok 3495 - $x = Math::BigInt->new("-1"); $x->is_zero() || 0; ok 3496 - $x = Math::BigInt->new("1"); $x->is_zero() || 0; ok 3497 - $x = Math::BigInt->new("0"); $x->is_one() || 0; ok 3498 - $x = Math::BigInt->new("NaNone"); $x->is_one() || 0; ok 3499 - $x = Math::BigInt->new("+inf"); $x->is_one() || 0; ok 3500 - $x = Math::BigInt->new("-inf"); $x->is_one() || 0; ok 3501 - $x = Math::BigInt->new("1"); $x->is_one() || 0; ok 3502 - $x = Math::BigInt->new("2"); $x->is_one() || 0; ok 3503 - $x = Math::BigInt->new("-1"); $x->is_one() || 0; ok 3504 - $x = Math::BigInt->new("-2"); $x->is_one() || 0; ok 3505 - $x = Math::BigInt->new("0"); $x->bfloor(); ok 3506 - is a valid object ok 3507 - $x = Math::BigInt->new("NaNfloor"); $x->bfloor(); ok 3508 - is a valid object ok 3509 - $x = Math::BigInt->new("+inf"); $x->bfloor(); ok 3510 - is a valid object ok 3511 - $x = Math::BigInt->new("-inf"); $x->bfloor(); ok 3512 - is a valid object ok 3513 - $x = Math::BigInt->new("-1"); $x->bfloor(); ok 3514 - is a valid object ok 3515 - $x = Math::BigInt->new("-2"); $x->bfloor(); ok 3516 - is a valid object ok 3517 - $x = Math::BigInt->new("2"); $x->bfloor(); ok 3518 - is a valid object ok 3519 - $x = Math::BigInt->new("3"); $x->bfloor(); ok 3520 - is a valid object ok 3521 - $x = Math::BigInt->new("abc"); $x->bfloor(); ok 3522 - is a valid object ok 3523 - $x = Math::BigInt->new("NaNceil"); $x->bceil(); ok 3524 - is a valid object ok 3525 - $x = Math::BigInt->new("+inf"); $x->bceil(); ok 3526 - is a valid object ok 3527 - $x = Math::BigInt->new("-inf"); $x->bceil(); ok 3528 - is a valid object ok 3529 - $x = Math::BigInt->new("0"); $x->bceil(); ok 3530 - is a valid object ok 3531 - $x = Math::BigInt->new("-1"); $x->bceil(); ok 3532 - is a valid object ok 3533 - $x = Math::BigInt->new("-2"); $x->bceil(); ok 3534 - is a valid object ok 3535 - $x = Math::BigInt->new("2"); $x->bceil(); ok 3536 - is a valid object ok 3537 - $x = Math::BigInt->new("3"); $x->bceil(); ok 3538 - is a valid object ok 3539 - $x = Math::BigInt->new("abc"); $x->bceil(); ok 3540 - is a valid object ok 3541 - $x = Math::BigInt->new("NaN"); $x->bint(); ok 3542 - is a valid object ok 3543 - $x = Math::BigInt->new("+inf"); $x->bint(); ok 3544 - is a valid object ok 3545 - $x = Math::BigInt->new("-inf"); $x->bint(); ok 3546 - is a valid object ok 3547 - $x = Math::BigInt->new("0"); $x->bint(); ok 3548 - is a valid object ok 3549 - $x = Math::BigInt->new("-1"); $x->bint(); ok 3550 - is a valid object ok 3551 - $x = Math::BigInt->new("-2"); $x->bint(); ok 3552 - is a valid object ok 3553 - $x = Math::BigInt->new("2"); $x->bint(); ok 3554 - is a valid object ok 3555 - $x = Math::BigInt->new("3"); $x->bint(); ok 3556 - is a valid object ok 3557 - $x = Math::BigInt->new("128"); $x->as_hex(); ok 3558 - $x = Math::BigInt->new("-128"); $x->as_hex(); ok 3559 - $x = Math::BigInt->new("0"); $x->as_hex(); ok 3560 - $x = Math::BigInt->new("-0"); $x->as_hex(); ok 3561 - $x = Math::BigInt->new("1"); $x->as_hex(); ok 3562 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_hex(); ok 3563 - $x = Math::BigInt->new("+inf"); $x->as_hex(); ok 3564 - $x = Math::BigInt->new("-inf"); $x->as_hex(); ok 3565 - $x = Math::BigInt->new("NaNas_hex"); $x->as_hex(); ok 3566 - $x = Math::BigInt->new("128"); $x->as_bin(); ok 3567 - $x = Math::BigInt->new("-128"); $x->as_bin(); ok 3568 - $x = Math::BigInt->new("0"); $x->as_bin(); ok 3569 - $x = Math::BigInt->new("-0"); $x->as_bin(); ok 3570 - $x = Math::BigInt->new("1"); $x->as_bin(); ok 3571 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 3572 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_bin(); ok 3573 - $x = Math::BigInt->new("+inf"); $x->as_bin(); ok 3574 - $x = Math::BigInt->new("-inf"); $x->as_bin(); ok 3575 - $x = Math::BigInt->new("NaNas_bin"); $x->as_bin(); ok 3576 - $x = Math::BigInt->new("128"); $x->as_oct(); ok 3577 - $x = Math::BigInt->new("-128"); $x->as_oct(); ok 3578 - $x = Math::BigInt->new("0"); $x->as_oct(); ok 3579 - $x = Math::BigInt->new("-0"); $x->as_oct(); ok 3580 - $x = Math::BigInt->new("1"); $x->as_oct(); ok 3581 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 3582 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_oct(); ok 3583 - $x = Math::BigInt->new("+inf"); $x->as_oct(); ok 3584 - $x = Math::BigInt->new("-inf"); $x->as_oct(); ok 3585 - $x = Math::BigInt->new("NaNas_oct"); $x->as_oct(); ok 3586 - $x = Math::BigInt->new("-1"); $x = log($x); ok 3587 - is a valid object ok 3588 - $x = Math::BigInt->new("0"); $x = log($x); ok 3589 - is a valid object ok 3590 - $x = Math::BigInt->new("1"); $x = log($x); ok 3591 - is a valid object ok 3592 - $x = Math::BigInt->new("2"); $x = log($x); ok 3593 - is a valid object ok 3594 - $x = Math::BigInt->new("3"); $x = log($x); ok 3595 - is a valid object ok 3596 - $x = Math::BigInt->new("123456789"); $x = log($x); ok 3597 - is a valid object ok 3598 - $x = Math::BigInt->new("1234567890987654321"); $x = log($x); ok 3599 - is a valid object ok 3600 - $x = Math::BigInt->new("-inf"); $x = log($x); ok 3601 - is a valid object ok 3602 - $x = Math::BigInt->new("inf"); $x = log($x); ok 3603 - is a valid object ok 3604 - $x = Math::BigInt->new("NaN"); $x = log($x); ok 3605 - is a valid object ok 3606 - $x = Math::BigInt->new("4294967296"); $a = $x->bmul($x); ok 3607 - $x = Math::BigInt->new(10); $a = $x->bpow($x); ok 3608 - $z = $x & $y; $x ok 3609 - $z = $x & $y; $y ok 3610 - $z = $x & $y; $z ok 3611 - $z = $x | $y; $x ok 3612 - $z = $x | $y; $y ok 3613 - $z = $x | $y; $z ok 3614 - $z = $x | $y; $x ok 3615 - $z = $x | $y; $y ok 3616 - $z = $x | $y; $z ok 3617 - $z = $x ^ $y; $x ok 3618 - $z = $x ^ $y; $y ok 3619 - $z = $x ^ $y; $z ok 3620 - $y = -$x; $x ok 3621 - $y = abs($x); $x ok 3622 - $x->copy()->bmodpow($y, $z); $u ok 3623 - $x->copy()->bmodpow($y, $z); $y ok 3624 - $x->copy()->bmodpow($y, $z); $z ok 3625 - $y = -$x; $x ok 3626 - $y = -$x; $y ok 3627 - $y = $x->copy()->bneg(); $x ok 3628 - $y = $x->copy()->bneg(); $y ok 3629 - $x->bmul($y); $x ok 3630 - $x->bmul($y); $y ok 3631 - $x->badd($y); $x ok 3632 - $x->badd($y); $y ok 3633 - $x->bsub($y); $x ok 3634 - $x->bsub($y); $y ok 3635 - $x->bdiv($y); $x ok 3636 - $x->bdiv($y); $y ok 3637 - $x->bmod($y); $x ok 3638 - $x->bmod($y); $y ok 3639 - $x->bmul($y); $x ok 3640 - $x->bmul($y); $y ok 3641 - $x->badd($y); $x ok 3642 - $x->badd($y); $y ok 3643 - $x->bsub($y); $x ok 3644 - $x->bsub($y); $y ok 3645 - $x->bdiv($y); $x ok 3646 - $x->bdiv($y); $y ok 3647 - $x->bmod($y); $x ok 3648 - $x->bmod($y); $y ok 3649 - $x->bmul($y); $x ok 3650 - $x->bmul($y); $y ok 3651 - $x->badd($y); $x ok 3652 - $x->badd($y); $y ok 3653 - $x->bsub($y); $x ok 3654 - $x->bsub($y); $y ok 3655 - $x->bdiv($y); $x ok 3656 - $x->bdiv($y); $y ok 3657 - $x->bmod($y); $x ok 3658 - $x->bmod($y); $y ok 3659 - overloading cmp works ok 3660 - $x = Math::BigInt->new(10); $x = 2 ** $x; $x == 1024; ok 3661 - $x = Math::BigInt->new(10); $x = 2 * $x; $x == 20; ok 3662 - $x = Math::BigInt->new(10); $x = 2 + $x; $x == 12; ok 3663 - $x = Math::BigInt->new(10); $x = 2 - $x; $x == -8; ok 3664 - $x = Math::BigInt->new(10); $x = 20 / $x; $x == 2; ok 3665 - $x = Math::BigInt->new(3); $x = 20 % $x; $x == 2; ok 3666 - $x = Math::BigInt->new(7); $x = 20 & $x; $x == 4; ok 3667 - $x = Math::BigInt->new(7); $x = 0x20 | $x; $x == 0x27; ok 3668 - $x = Math::BigInt->new(7); $x = 0x20 ^ $x; $x == 0x27; ok 3669 - $x = Math::BigInt->badd(4, 5); $x == 9; ok 3670 - $x = Math::BigInt->new(1); $x is true ok 3671 - $x = Math::BigInt->new(0); !$x is false ok 3672 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 3673 - first arg matches /^Math::BigInt/ ok 3674 - second arg is 4 ok 3675 - third arg is 5 ok 3676 - objectify(0, 4, 5) gives Math::BigInt, 4, 5 ok 3677 - first arg matches /^Math::BigInt/ ok 3678 - second arg is 4 ok 3679 - third arg is 5 ok 3680 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 3681 - first arg matches /^Math::BigInt/ ok 3682 - second arg is 4 ok 3683 - third arg is 5 ok 3684 - objectify(2, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 3685 - first arg matches /^Math::BigInt/ ok 3686 - second arg is 4 ok 3687 - second arg is a Math::BigInt object ok 3688 - third arg is 5 ok 3689 - third arg is a Math::BigInt object ok 3690 - fourth arg is 6 ok 3691 - fourth arg is a scalar ok 3692 - fifth arg is 7 ok 3693 - fifth arg is a scalar ok 3694 - objectify(2, Math::BigInt, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 3695 - first arg is Math::BigInt ok 3696 - second arg is 4 ok 3697 - second arg is a Math::BigInt object ok 3698 - third arg is 5 ok 3699 - third arg is a Math::BigInt object ok 3700 - fourth arg is 6 ok 3701 - fourth arg is a scalar ok 3702 - fifth arg is 7 ok 3703 - fifth arg is a scalar ok 3704 - Math::BigInt->new(123)->badd(123) = 246 ok 3705 - Math::BigInt->badd(123, 321) = 444 ok 3706 - Math::BigInt->badd(123, Math::BigInt->new(321)) = 444 ok 3707 - Math::BigInt->new(123)->bsub(122) = 1 ok 3708 - Math::BigInt->bsub(321, 123) = 198 ok 3709 - Math::BigInt->bsub(321, Math::BigInt->new(123)) = 198 ok 3710 - Math::BigInt->new(123)->bmul(123) = 15129 ok 3711 - Math::BigInt->bmul(123, 123) = 15129 ok 3712 - Math::BigInt->bmul(123, Math::BigInt->new(123)) = 15129 ok 3713 - Math::BigInt->new(15129)->bdiv(123) = 123 ok 3714 - Math::BigInt->bdiv(15129, 123) = 123 ok 3715 - Math::BigInt->bdiv(15129, Math::BigInt->new(123)) = 123 ok 3716 - Math::BigInt->new(15131)->bmod(123) = 2 ok 3717 - Math::BigInt->bmod(15131, 123) = 2 ok 3718 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) = 2 ok 3719 - Math::BigInt->new(2)->bpow(16) = 65536 ok 3720 - Math::BigInt->bpow(2, 16) = 65536 ok 3721 - Math::BigInt->bpow(2, Math::BigInt->new(16)) = 65536 ok 3722 - Math::BigInt->new(2**15)->brsft(1) = 2**14 ok 3723 - Math::BigInt->brsft(2**15, 1) = 2**14 ok 3724 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) = 2**14 ok 3725 - Math::BigInt->new(2**13)->blsft(1) = 2**14 ok 3726 - Math::BigInt->blsft(2**13, 1) = 2**14 ok 3727 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) = 2**14 ok 3728 - $x = Math::BigInt->new(1050000000000000); $x->bsstr() = "105e+13" ok 3729 - $x = Math::BigInt->new(1e+129); $x->bsstr() = "1e+129" ok 3730 - Math::BigInt->new("1") = 1 ok 3731 - Math::BigInt->new(" 1") = 1 ok 3732 - Math::BigInt->new("1 ") = 1 ok 3733 - Math::BigInt->new(" 1 ") = 1 ok 3734 - Math::BigInt->new("\n1") = 1 ok 3735 - Math::BigInt->new("1\n") = 1 ok 3736 - Math::BigInt->new("\n1\n") = 1 ok 3737 - Math::BigInt->new(" \n1\n") = 1 ok 3738 - Math::BigInt->new(" \n1 \n") = 1 ok 3739 - Math::BigInt->new(" \n1\n ") = 1 ok 3740 - Math::BigInt->new(" \n1\n1") = 'NaN' ok 3741 - Math::BigInt->new("1 \n1\n1") = 'NaN' ok 3742 - Math::BigInt->new("12") = 12 ok 3743 - Math::BigInt->new(" 12") = 12 ok 3744 - Math::BigInt->new("12 ") = 12 ok 3745 - Math::BigInt->new(" 12 ") = 12 ok 3746 - Math::BigInt->new("\n12") = 12 ok 3747 - Math::BigInt->new("12\n") = 12 ok 3748 - Math::BigInt->new("\n12\n") = 12 ok 3749 - Math::BigInt->new(" \n12\n") = 12 ok 3750 - Math::BigInt->new(" \n12 \n") = 12 ok 3751 - Math::BigInt->new(" \n12\n ") = 12 ok 3752 - Math::BigInt->new(" \n12\n1") = 'NaN' ok 3753 - Math::BigInt->new("1 \n12\n1") = 'NaN' ok 3754 - Math::BigInt->new("123") = 123 ok 3755 - Math::BigInt->new(" 123") = 123 ok 3756 - Math::BigInt->new("123 ") = 123 ok 3757 - Math::BigInt->new(" 123 ") = 123 ok 3758 - Math::BigInt->new("\n123") = 123 ok 3759 - Math::BigInt->new("123\n") = 123 ok 3760 - Math::BigInt->new("\n123\n") = 123 ok 3761 - Math::BigInt->new(" \n123\n") = 123 ok 3762 - Math::BigInt->new(" \n123 \n") = 123 ok 3763 - Math::BigInt->new(" \n123\n ") = 123 ok 3764 - Math::BigInt->new(" \n123\n1") = 'NaN' ok 3765 - Math::BigInt->new("1 \n123\n1") = 'NaN' ok 3766 - Math::BigInt->new("1234") = 1234 ok 3767 - Math::BigInt->new(" 1234") = 1234 ok 3768 - Math::BigInt->new("1234 ") = 1234 ok 3769 - Math::BigInt->new(" 1234 ") = 1234 ok 3770 - Math::BigInt->new("\n1234") = 1234 ok 3771 - Math::BigInt->new("1234\n") = 1234 ok 3772 - Math::BigInt->new("\n1234\n") = 1234 ok 3773 - Math::BigInt->new(" \n1234\n") = 1234 ok 3774 - Math::BigInt->new(" \n1234 \n") = 1234 ok 3775 - Math::BigInt->new(" \n1234\n ") = 1234 ok 3776 - Math::BigInt->new(" \n1234\n1") = 'NaN' ok 3777 - Math::BigInt->new("1 \n1234\n1") = 'NaN' ok 3778 - Math::BigInt->new("12345") = 12345 ok 3779 - Math::BigInt->new(" 12345") = 12345 ok 3780 - Math::BigInt->new("12345 ") = 12345 ok 3781 - Math::BigInt->new(" 12345 ") = 12345 ok 3782 - Math::BigInt->new("\n12345") = 12345 ok 3783 - Math::BigInt->new("12345\n") = 12345 ok 3784 - Math::BigInt->new("\n12345\n") = 12345 ok 3785 - Math::BigInt->new(" \n12345\n") = 12345 ok 3786 - Math::BigInt->new(" \n12345 \n") = 12345 ok 3787 - Math::BigInt->new(" \n12345\n ") = 12345 ok 3788 - Math::BigInt->new(" \n12345\n1") = 'NaN' ok 3789 - Math::BigInt->new("1 \n12345\n1") = 'NaN' ok 3790 - Math::BigInt->new("123456") = 123456 ok 3791 - Math::BigInt->new(" 123456") = 123456 ok 3792 - Math::BigInt->new("123456 ") = 123456 ok 3793 - Math::BigInt->new(" 123456 ") = 123456 ok 3794 - Math::BigInt->new("\n123456") = 123456 ok 3795 - Math::BigInt->new("123456\n") = 123456 ok 3796 - Math::BigInt->new("\n123456\n") = 123456 ok 3797 - Math::BigInt->new(" \n123456\n") = 123456 ok 3798 - Math::BigInt->new(" \n123456 \n") = 123456 ok 3799 - Math::BigInt->new(" \n123456\n ") = 123456 ok 3800 - Math::BigInt->new(" \n123456\n1") = 'NaN' ok 3801 - Math::BigInt->new("1 \n123456\n1") = 'NaN' ok 3802 - Math::BigInt->new("1234567") = 1234567 ok 3803 - Math::BigInt->new(" 1234567") = 1234567 ok 3804 - Math::BigInt->new("1234567 ") = 1234567 ok 3805 - Math::BigInt->new(" 1234567 ") = 1234567 ok 3806 - Math::BigInt->new("\n1234567") = 1234567 ok 3807 - Math::BigInt->new("1234567\n") = 1234567 ok 3808 - Math::BigInt->new("\n1234567\n") = 1234567 ok 3809 - Math::BigInt->new(" \n1234567\n") = 1234567 ok 3810 - Math::BigInt->new(" \n1234567 \n") = 1234567 ok 3811 - Math::BigInt->new(" \n1234567\n ") = 1234567 ok 3812 - Math::BigInt->new(" \n1234567\n1") = 'NaN' ok 3813 - Math::BigInt->new("1 \n1234567\n1") = 'NaN' ok 3814 - Math::BigInt->new("12345678") = 12345678 ok 3815 - Math::BigInt->new(" 12345678") = 12345678 ok 3816 - Math::BigInt->new("12345678 ") = 12345678 ok 3817 - Math::BigInt->new(" 12345678 ") = 12345678 ok 3818 - Math::BigInt->new("\n12345678") = 12345678 ok 3819 - Math::BigInt->new("12345678\n") = 12345678 ok 3820 - Math::BigInt->new("\n12345678\n") = 12345678 ok 3821 - Math::BigInt->new(" \n12345678\n") = 12345678 ok 3822 - Math::BigInt->new(" \n12345678 \n") = 12345678 ok 3823 - Math::BigInt->new(" \n12345678\n ") = 12345678 ok 3824 - Math::BigInt->new(" \n12345678\n1") = 'NaN' ok 3825 - Math::BigInt->new("1 \n12345678\n1") = 'NaN' ok 3826 - Math::BigInt->new("123456789") = 123456789 ok 3827 - Math::BigInt->new(" 123456789") = 123456789 ok 3828 - Math::BigInt->new("123456789 ") = 123456789 ok 3829 - Math::BigInt->new(" 123456789 ") = 123456789 ok 3830 - Math::BigInt->new("\n123456789") = 123456789 ok 3831 - Math::BigInt->new("123456789\n") = 123456789 ok 3832 - Math::BigInt->new("\n123456789\n") = 123456789 ok 3833 - Math::BigInt->new(" \n123456789\n") = 123456789 ok 3834 - Math::BigInt->new(" \n123456789 \n") = 123456789 ok 3835 - Math::BigInt->new(" \n123456789\n ") = 123456789 ok 3836 - Math::BigInt->new(" \n123456789\n1") = 'NaN' ok 3837 - Math::BigInt->new("1 \n123456789\n1") = 'NaN' ok 3838 - Math::BigInt->new("1234567890") = 1234567890 ok 3839 - Math::BigInt->new(" 1234567890") = 1234567890 ok 3840 - Math::BigInt->new("1234567890 ") = 1234567890 ok 3841 - Math::BigInt->new(" 1234567890 ") = 1234567890 ok 3842 - Math::BigInt->new("\n1234567890") = 1234567890 ok 3843 - Math::BigInt->new("1234567890\n") = 1234567890 ok 3844 - Math::BigInt->new("\n1234567890\n") = 1234567890 ok 3845 - Math::BigInt->new(" \n1234567890\n") = 1234567890 ok 3846 - Math::BigInt->new(" \n1234567890 \n") = 1234567890 ok 3847 - Math::BigInt->new(" \n1234567890\n ") = 1234567890 ok 3848 - Math::BigInt->new(" \n1234567890\n1") = 'NaN' ok 3849 - Math::BigInt->new("1 \n1234567890\n1") = 'NaN' ok 3850 - value of ((2^148)+1)/17 ok 3851 - number of digits in ((2^148)+1)/17 ok 3852 - value of 2^127-1 ok 3853 - number of digits in 2^127-1 ok 3854 - number of digits in fraction part of 2^127-1 ok 3855 - number of digits in 1_000_000_000_000 ok 3856 - number of digits in fraction part of 1_000_000_000_000 ok 3857 - 2 <<= 18 with Math::BigInt objects ok 3858 - 2 <<= 18 with Math::BigInt objects ok 3859 - 2 >>= 18 with Math::BigInt objects ok 3860 - 2 >>= 18 with Math::BigInt objects ok 3861 - $x = Math::Foo->new(5); $x = $x - 8; $x = 3 ok 3862 - $x is an object of class "Math::Foo" ok 3863 - $x = Math::Foo->new(5); $x = 8 - $x; $x = -3 ok 3864 - $x is an object of class "Math::Foo" ok 3865 - Math::BigInt->new("+inf") = "inf" ok 3866 - bigint 2**64-1 as string ok 3867 - bigint 2**64-1 as number ok 3868 - bigint -2**63 as string ok 3869 - bigint -2**63 as number ok 3870 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3871 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3872 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3873 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3874 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3875 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3876 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3877 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3878 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3879 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3880 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3881 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3882 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3883 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3884 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3885 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3886 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3887 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3888 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3889 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3890 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3891 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3892 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3893 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3894 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3895 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3896 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3897 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3898 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3899 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3900 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3901 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3902 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3903 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3904 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3905 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3906 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3907 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3908 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3909 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3910 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3911 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3912 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3913 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3914 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3915 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3916 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3917 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3918 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3919 # skip skipping tests not intended for the backend Math::BigInt::GMP ok t/biglog.t ............... 1..71 ok 1 - GMP loaded ok 2 - blog(2) ok 3 - blog(288) ok 4 - blog(2000) ok 5 - bexp(1) ok 6 - bexp(2) ok 7 - bexp(3) ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 ok 27 ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 ok 38 ok 39 ok 40 ok 41 - blog(100) ok 42 - 2 ** 32 ok 43 - 3 ** 32 ok 44 - 2 ** 65 ok 45 - blog(777**256, 12345678901234) ok 46 - blog(777**777, 777) ok 47 - 14.14213562 ok 48 - 4.472135955 ok 49 - 1.414213562 ok 50 - 0.4472135955 ok 51 - 0.1414213562 ok 52 - 0.7 ok 53 - 0.7000000000 ok 54 - 0.04472135955 ok 55 - 0.01414213562 ok 56 - 0.07 ok 57 - 0.07000000000 ok 58 - 0.001414213562 ok 59 - 0.1449137675 ok 60 - 1.095445115 ok 61 - 1.109053651 ok 62 - 3.507135583 ok 63 - 3.146426545 ok 64 - 3.141500000 ok 65 - 3.1415 ok 66 - 0.5169187652 ok 67 - bexp(1) ok 68 - bexp(2) ok 69 - bexp(12.5) ok 70 - bexp(100) ok 71 - bexp(12.5) to 91 digits ok t/bigroot.t .............. 1..9 ok 1 - GMP loaded ok 2 - Try: Math::BigFloat 2->bpow(120)->broot(8,undef) == 32768 ok 3 - Try: Math::BigInt 2->bpow(120)->broot(8,undef) == 32768 ok 4 - Try: Math::BigFloat 2->bpow(60)->broot(8,undef) == 181.0193359837561662466161566988413540569 ok 5 - Try: Math::BigInt 2->bpow(60)->broot(8,undef) == 181 ok 6 - Try: Math::BigFloat 2->bpow(60)->broot(9,undef) == 101.5936673259647663841091609134277286651 ok 7 - Try: Math::BigInt 2->bpow(60)->broot(9,undef) == 101 ok 8 - Try: Math::BigFloat 2->bpow(60)->broot(17,undef) == 11.54672461623965153271017217302844672562 ok 9 - Try: Math::BigInt 2->bpow(60)->broot(17,undef) == 11 ok t/mbi-from-big-scalar.t .. 1..12 ok 1 - new 9223372036854775805 ok 2 - new -9223372036854775805 ok 3 - new 9223372036854775806 ok 4 - new -9223372036854775806 ok 5 - new 9223372036854775807 ok 6 - new -9223372036854775807 ok 7 - new 9223372036854775808 ok 8 - new -9223372036854775808 ok 9 - new 18446744073709551614 ok 10 - new 18446744073709551615 ok 11 - 10 should be less than maxint ok 12 # skip The following test may hang or cause an exception if incorrect. Set AUTHOR_TESTING to a true value to run this test. ok t/storable.t ............. 1..1 ok 1 ok t/threads.t .............. 1..22 ok 1 - we survived our threads ok 2 - got all the numbers we expected ok 3 - numbers look sane ok 4 - numbers look sane ok 5 - numbers look sane ok 6 - numbers look sane ok 7 - numbers look sane ok 8 - numbers look sane ok 9 - numbers look sane ok 10 - numbers look sane ok 11 - numbers look sane ok 12 - numbers look sane ok 13 - numbers look sane ok 14 - numbers look sane ok 15 - numbers look sane ok 16 - numbers look sane ok 17 - numbers look sane ok 18 - numbers look sane ok 19 - numbers look sane ok 20 - numbers look sane ok 21 - numbers look sane ok 22 - numbers look sane ok All tests successful. Files=12, Tests=6801, 6 wallclock secs ( 0.44 usr 0.59 sys + 3.55 cusr 1.36 csys = 5.94 CPU) Result: PASS PJACKLAM/Math-BigInt-GMP-1.50.tar.gz make test TEST_VERBOSE=1 -- OK Peter John Acklam <pjacklam@online.no> Use the GMP library for Math::BigInt routines >>> (cd /home/fly1800/cpanfly-5.18/var/cpan/build/Math-BigInt-GMP-1.50-CexKj7 && tar cvf - Math-BigInt-GMP-1.50.ppd blib) | gzip -c >/home/fly1800/cpanfly-5.18/var/REPO/P/PJ/PJACKLAM/Math-BigInt-GMP-1.50.tar.gz Math-BigInt-GMP-1.50.ppd blib/ blib/arch/ blib/arch/auto/ blib/arch/auto/Math/ blib/arch/auto/Math/BigInt/ blib/arch/auto/Math/BigInt/GMP/ blib/arch/auto/Math/BigInt/GMP/GMP.so blib/lib/ blib/lib/Math/ blib/lib/Math/BigInt/ blib/lib/Math/BigInt/GMP.pm blib/man3/ blib/man3/Math::BigInt::GMP.3 >>> mv /home/fly1800/cpanfly-5.18/var/cpan/build/Math-BigInt-GMP-1.50-CexKj7/Math-BigInt-GMP-1.50.ppd /home/fly1800/cpanfly-5.18/var/REPO/P/PJ/PJACKLAM VmSize: 315992 kB Finished 2016-04-23T08:23:00