PATH=C:\Program Files\Microsoft Platform SDK\Bin;C:\Program Files\Microsoft Platform SDK\Bin\WinNT;C:\Program Files\Microsoft Visual Studio\VC98\Bin;C:\Program Files\Microsoft Visual Studio\Common\MSDev98\Bin;C:\cpanfly-5.16\var\megalib\bin;C:\Perl-5.16\site\bin;C:\Perl-5.16\bin;C:\cygwin\bin;C:\Program Files\Microsoft Platform SDK\Bin;C:\Program Files\Microsoft Platform SDK\Bin\WinNT;C:\Program Files\Microsoft Visual Studio\VC98\Bin;C:\Program Files\Microsoft Visual Studio\Common\MSDev98\Bin;C:\cpanfly-5.16\var\megalib\bin;C:\Perl-5.16\site\bin;C:\Perl-5.16\bin;C:\cygwin\bin;C:\Program Files\Perforce;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WindowsPowerShell\v1.0;C:\WINDOWS\system32\WindowsPowerShell\v1.0;C:\Program Files\Git\cmd;C:\instantclient_11_2;C:\Program Files\Perforce;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WindowsPowerShell\v1.0;C:\WINDOWS\system32\WindowsPowerShell\v1.0;C:\Program Files\Git\cmd Start 2016-01-07T02:49:08 ActivePerl-1600 CPAN-2.00 LIB=C:\PROGRA~1\MICROS~2\Lib;C:\PROGRA~1\MICROS~3\VC98\Lib\PSDK;C:\PROGRA~1\MICROS~3\VC98\Lib;C:\PROGRA~1\MICROS~3\VC98\MFC\Lib;C:\PROGRA~1\MICROS~2\Lib;C:\PROGRA~1\MICROS~3\VC98\Lib\PSDK;C:\PROGRA~1\MICROS~3\VC98\Lib;C:\PROGRA~1\MICROS~3\VC98\MFC\Lib INCLUDE=C:\PROGRA~1\MICROS~2\Include;C:\PROGRA~1\MICROS~3\VC98\ATL\Include;C:\PROGRA~1\MICROS~3\VC98\Include;C:\PROGRA~1\MICROS~3\VC98\MFC\Include;C:\PROGRA~1\MICROS~2\Include;C:\PROGRA~1\MICROS~3\VC98\ATL\Include;C:\PROGRA~1\MICROS~3\VC98\Include;C:\PROGRA~1\MICROS~3\VC98\MFC\Include PATH=C:/CPANFL~1.16/var/libs/bin;C:\PROGRA~1\MICROS~2\Bin;C:\PROGRA~1\MICROS~2\Bin\WinNT;C:\PROGRA~1\MICROS~3\VC98\Bin;C:\PROGRA~1\MICROS~3\Common\MSDev98\Bin;C:\CPANFL~1.16\var\megalib\bin;C:\Perl-5.16\site\bin;C:\Perl-5.16\bin;C:\cygwin\bin;C:\PROGRA~1\MICROS~2\Bin;C:\PROGRA~1\MICROS~2\Bin\WinNT;C:\PROGRA~1\MICROS~3\VC98\Bin;C:\PROGRA~1\MICROS~3\Common\MSDev98\Bin;C:\CPANFL~1.16\var\megalib\bin;C:\Perl-5.16\site\bin;C:\Perl-5.16\bin;C:\cygwin\bin;C:\PROGRA~1\Perforce;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WINDOW~2\v1.0;C:\WINDOWS\system32\WINDOW~2\v1.0;C:\PROGRA~1\Git\cmd;C:\INSTAN~1;C:\PROGRA~1\Perforce;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WINDOW~2\v1.0;C:\WINDOWS\system32\WINDOW~2\v1.0;C:\PROGRA~1\Git\cmd Reading 'C:\cpanfly-5.16\var\cpan\Metadata' Database was generated on Wed, 06 Jan 2016 06:41:02 GMT Running make for P/PJ/PJACKLAM/bignum-0.42.tar.gz Fetching with LWP: http://ppm.activestate.com/CPAN/authors/id/P/PJ/PJACKLAM/bignum-0.42.tar.gz Checksum for C:\cpanfly-5.16\var\cpan\sources\authors\id\P\PJ\PJACKLAM\bignum-0.42.tar.gz ok bignum-0.42/ bignum-0.42/BUGS bignum-0.42/CHANGES bignum-0.42/inc/ bignum-0.42/inc/Module/ bignum-0.42/inc/Module/Install/ bignum-0.42/inc/Module/Install/Base.pm bignum-0.42/inc/Module/Install/Can.pm bignum-0.42/inc/Module/Install/Fetch.pm bignum-0.42/inc/Module/Install/Makefile.pm bignum-0.42/inc/Module/Install/Metadata.pm bignum-0.42/inc/Module/Install/Win32.pm bignum-0.42/inc/Module/Install/WriteAll.pm bignum-0.42/inc/Module/Install.pm bignum-0.42/INSTALL bignum-0.42/lib/ bignum-0.42/lib/bigint.pm bignum-0.42/lib/bignum.pm bignum-0.42/lib/bigrat.pm bignum-0.42/lib/Math/ bignum-0.42/lib/Math/BigFloat/ bignum-0.42/lib/Math/BigFloat/Trace.pm bignum-0.42/lib/Math/BigInt/ bignum-0.42/lib/Math/BigInt/Trace.pm bignum-0.42/LICENSE bignum-0.42/Makefile.PL bignum-0.42/MANIFEST bignum-0.42/MANIFEST.SKIP bignum-0.42/META.json bignum-0.42/META.yml bignum-0.42/README bignum-0.42/SIGNATURE bignum-0.42/t/ bignum-0.42/t/00sig.t bignum-0.42/t/01load.t bignum-0.42/t/02pod.t bignum-0.42/t/03podcov.t bignum-0.42/t/author-bigint-hex.t bignum-0.42/t/author-bigint-oct.t bignum-0.42/t/bigexp.t bignum-0.42/t/bigint.t bignum-0.42/t/bignum.t bignum-0.42/t/bigrat.t bignum-0.42/t/big_e_pi.t bignum-0.42/t/biinfnan.t bignum-0.42/t/bii_e_pi.t bignum-0.42/t/bir_e_pi.t bignum-0.42/t/bninfnan.t bignum-0.42/t/bn_lite.t bignum-0.42/t/brinfnan.t bignum-0.42/t/br_lite.t bignum-0.42/t/infnan.inc bignum-0.42/t/in_effect.t bignum-0.42/t/option_a.t bignum-0.42/t/option_l.t bignum-0.42/t/option_p.t bignum-0.42/t/overrides.t bignum-0.42/t/ratopt_a.t bignum-0.42/t/scope_f.t bignum-0.42/t/scope_i.t bignum-0.42/t/scope_r.t bignum-0.42/TODO CPAN.pm: Building P/PJ/PJACKLAM/bignum-0.42.tar.gz >>> C:\Perl-5.16\bin\perl.exe Makefile.PL Warning: prerequisite Math::BigInt 1.999712 not found. We have 1.999710. Checking if your kit is complete... Looks good Generating a nmake-style Makefile Writing Makefile for bignum Writing MYMETA.yml and MYMETA.json ---- Unsatisfied dependencies detected during ---- ---- PJACKLAM/bignum-0.42.tar.gz ---- Math::BigInt [requires] Running make test Delayed until after prerequisites Running test for module 'Math::BigInt' Running make for P/PJ/PJACKLAM/Math-BigInt-1.999715.tar.gz Checksum for C:\cpanfly-5.16\var\cpan\sources\authors\id\P\PJ\PJACKLAM\Math-BigInt-1.999715.tar.gz ok Math-BigInt-1.999715/ Math-BigInt-1.999715/BENCHMARK Math-BigInt-1.999715/BUGS Math-BigInt-1.999715/CHANGES Math-BigInt-1.999715/CREDITS Math-BigInt-1.999715/examples/ Math-BigInt-1.999715/examples/1000.txt Math-BigInt-1.999715/examples/bigprimes.pl Math-BigInt-1.999715/examples/prime.pl Math-BigInt-1.999715/GOALS Math-BigInt-1.999715/HISTORY Math-BigInt-1.999715/inc/ Math-BigInt-1.999715/inc/Module/ Math-BigInt-1.999715/inc/Module/Install/ Math-BigInt-1.999715/inc/Module/Install/Base.pm Math-BigInt-1.999715/inc/Module/Install/Can.pm Math-BigInt-1.999715/inc/Module/Install/Fetch.pm Math-BigInt-1.999715/inc/Module/Install/Makefile.pm Math-BigInt-1.999715/inc/Module/Install/Metadata.pm Math-BigInt-1.999715/inc/Module/Install/Win32.pm Math-BigInt-1.999715/inc/Module/Install/WriteAll.pm Math-BigInt-1.999715/inc/Module/Install.pm Math-BigInt-1.999715/lib/ Math-BigInt-1.999715/lib/Math/ Math-BigInt-1.999715/lib/Math/BigFloat.pm Math-BigInt-1.999715/lib/Math/BigInt/ Math-BigInt-1.999715/lib/Math/BigInt/Calc.pm Math-BigInt-1.999715/lib/Math/BigInt/CalcEmu.pm Math-BigInt-1.999715/lib/Math/BigInt.pm Math-BigInt-1.999715/LICENSE Math-BigInt-1.999715/Makefile.PL Math-BigInt-1.999715/MANIFEST Math-BigInt-1.999715/MANIFEST.SKIP Math-BigInt-1.999715/META.json Math-BigInt-1.999715/META.yml Math-BigInt-1.999715/NEW Math-BigInt-1.999715/README Math-BigInt-1.999715/SIGNATURE Math-BigInt-1.999715/t/ Math-BigInt-1.999715/t/00sig.t Math-BigInt-1.999715/t/01load.t Math-BigInt-1.999715/t/02pod.t Math-BigInt-1.999715/t/03podcov.t Math-BigInt-1.999715/t/alias.inc Math-BigInt-1.999715/t/author-batan-mbf.t Math-BigInt-1.999715/t/author-batan2-mbf.t Math-BigInt-1.999715/t/author-bexp-mbf.t Math-BigInt-1.999715/t/author-blog-mbf.t Math-BigInt-1.999715/t/author-blog-mbi.t Math-BigInt-1.999715/t/author-bpi-mbf.t Math-BigInt-1.999715/t/bare_mbf.t Math-BigInt-1.999715/t/bare_mbi.t Math-BigInt-1.999715/t/bare_mif.t Math-BigInt-1.999715/t/bigfltpm.inc Math-BigInt-1.999715/t/bigfltpm.t Math-BigInt-1.999715/t/bigintc.t Math-BigInt-1.999715/t/bigintpm.inc Math-BigInt-1.999715/t/bigintpm.t Math-BigInt-1.999715/t/bigints.t Math-BigInt-1.999715/t/biglog.t Math-BigInt-1.999715/t/bigroot.t Math-BigInt-1.999715/t/big_pi_e.t Math-BigInt-1.999715/t/calling.t Math-BigInt-1.999715/t/config.t Math-BigInt-1.999715/t/constant.t Math-BigInt-1.999715/t/const_mbf.t Math-BigInt-1.999715/t/downgrade.t Math-BigInt-1.999715/t/from_hex-mbf.t Math-BigInt-1.999715/t/inf_nan.t Math-BigInt-1.999715/t/isa.t Math-BigInt-1.999715/t/lib_load.t Math-BigInt-1.999715/t/Math/ Math-BigInt-1.999715/t/Math/BigFloat/ Math-BigInt-1.999715/t/Math/BigFloat/Subclass.pm Math-BigInt-1.999715/t/Math/BigInt/ Math-BigInt-1.999715/t/Math/BigInt/BareCalc.pm Math-BigInt-1.999715/t/Math/BigInt/Scalar.pm Math-BigInt-1.999715/t/Math/BigInt/Subclass.pm Math-BigInt-1.999715/t/mbf_ali.t Math-BigInt-1.999715/t/mbimbf.inc Math-BigInt-1.999715/t/mbimbf.t Math-BigInt-1.999715/t/mbi_ali.t Math-BigInt-1.999715/t/mbi_rand.t Math-BigInt-1.999715/t/nan_cmp.t Math-BigInt-1.999715/t/new_overloaded.t Math-BigInt-1.999715/t/objectify_mbf.t Math-BigInt-1.999715/t/objectify_mbi.t Math-BigInt-1.999715/t/require.t Math-BigInt-1.999715/t/req_mbf0.t Math-BigInt-1.999715/t/req_mbf1.t Math-BigInt-1.999715/t/req_mbfa.t Math-BigInt-1.999715/t/req_mbfi.t Math-BigInt-1.999715/t/req_mbfn.t Math-BigInt-1.999715/t/req_mbfw.t Math-BigInt-1.999715/t/round.t Math-BigInt-1.999715/t/rt-16221.t Math-BigInt-1.999715/t/sub_ali.t Math-BigInt-1.999715/t/sub_mbf.t Math-BigInt-1.999715/t/sub_mbi.t Math-BigInt-1.999715/t/sub_mif.t Math-BigInt-1.999715/t/trap.t Math-BigInt-1.999715/t/upgrade.inc Math-BigInt-1.999715/t/upgrade.t Math-BigInt-1.999715/t/upgrade2.t Math-BigInt-1.999715/t/upgradef.t Math-BigInt-1.999715/t/use.t Math-BigInt-1.999715/t/use_lib1.t Math-BigInt-1.999715/t/use_lib2.t Math-BigInt-1.999715/t/use_lib3.t Math-BigInt-1.999715/t/use_lib4.t Math-BigInt-1.999715/t/use_mbfw.t Math-BigInt-1.999715/t/with_sub.t Math-BigInt-1.999715/t/_e_math.t Math-BigInt-1.999715/TODO CPAN.pm: Building P/PJ/PJACKLAM/Math-BigInt-1.999715.tar.gz >>> C:\Perl-5.16\bin\perl.exe Makefile.PL Checking if your kit is complete... Looks good Generating a nmake-style Makefile Writing Makefile for Math::BigInt Writing MYMETA.yml and MYMETA.json >>> nmake Microsoft (R) Program Maintenance Utility Version 7.00.8882 Copyright (C) Microsoft Corp 1988-2000. All rights reserved. cp lib/Math/BigInt/CalcEmu.pm blib\lib\Math\BigInt\CalcEmu.pm cp lib/Math/BigInt.pm blib\lib\Math\BigInt.pm cp lib/Math/BigFloat.pm blib\lib\Math\BigFloat.pm cp lib/Math/BigInt/Calc.pm blib\lib\Math\BigInt\Calc.pm PJACKLAM/Math-BigInt-1.999715.tar.gz nmake -- OK Running make test >>> nmake test TEST_VERBOSE=1 Microsoft (R) Program Maintenance Utility Version 7.00.8882 Copyright (C) Microsoft Corp 1988-2000. All rights reserved. "C:\Perl-5.16\bin\perl.exe" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(1, 'inc', 'blib\lib', 'blib\arch')" t\*.t t\00sig.t .............. skipped: Set the environment variable TEST_SIGNATURE to enable this test. # # Testing with Perl 5.016000, C:\Perl-5.16\bin\perl.exe # # Version Module # ------- ------ # 1.999715 Math::BigInt # 1.999715 Math::BigFloat # 1.999715 Math::BigInt::Calc # t\01load.t ............. 1..2 ok 1 - use Math::BigInt; ok 2 - use Math::BigFloat; ok t\02pod.t .............. 1..4 ok 1 - POD test for blib/lib/Math/BigFloat.pm ok 2 - POD test for blib/lib/Math/BigInt.pm ok 3 - POD test for blib/lib/Math/BigInt/Calc.pm ok 4 - POD test for blib/lib/Math/BigInt/CalcEmu.pm ok t\03podcov.t ........... 1..2 ok 1 - Math::BigInt is covered ok 2 - Math::BigFloat is covered ok t\_e_math.t ............ 1..26 # Subtest: Math::BigFloat::_e_add(123, 321, "+", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 1 - Math::BigFloat::_e_add(123, 321, "+", "+"); # Subtest: Math::BigFloat::_e_add(123, 321, "+", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 2 - Math::BigFloat::_e_add(123, 321, "+", "-"); # Subtest: Math::BigFloat::_e_add(123, 321, "-", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 3 - Math::BigFloat::_e_add(123, 321, "-", "+"); # Subtest: Math::BigFloat::_e_add(321, 123, "-", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 4 - Math::BigFloat::_e_add(321, 123, "-", "+"); # Subtest: Math::BigFloat::_e_add(321, 123, "+", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 5 - Math::BigFloat::_e_add(321, 123, "+", "-"); # Subtest: Math::BigFloat::_e_add(10, 1, "+", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 6 - Math::BigFloat::_e_add(10, 1, "+", "-"); # Subtest: Math::BigFloat::_e_add(10, 1, "-", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 7 - Math::BigFloat::_e_add(10, 1, "-", "+"); # Subtest: Math::BigFloat::_e_add(1, 10, "-", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 8 - Math::BigFloat::_e_add(1, 10, "-", "+"); ok 9 # skip $x -> _zero() does not (yet?) modify the first argument ok 10 # skip $x -> _zero() does not (yet?) modify the first argument # Subtest: Math::BigFloat::_e_add(123, 123, "+", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 11 - Math::BigFloat::_e_add(123, 123, "+", "+"); # Subtest: Math::BigFloat::_e_add(123, 123, "-", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 12 - Math::BigFloat::_e_add(123, 123, "-", "-"); # Subtest: Math::BigFloat::_e_add(0, 0, "-", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 13 - Math::BigFloat::_e_add(0, 0, "-", "+"); # Subtest: Math::BigFloat::_e_add(0, 0, "+", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 14 - Math::BigFloat::_e_add(0, 0, "+", "-"); # Subtest: Math::BigFloat::_e_add(0, 0, "+", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 15 - Math::BigFloat::_e_add(0, 0, "+", "+"); # Subtest: Math::BigFloat::_e_add(0, 0, "-", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_add() is modified ok 16 - Math::BigFloat::_e_add(0, 0, "-", "-"); # Subtest: Math::BigFloat::_e_sub(123, 321, "+", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_sub() is modified ok 17 - Math::BigFloat::_e_sub(123, 321, "+", "-"); # Subtest: Math::BigFloat::_e_sub(123, 321, "-", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_sub() is modified ok 18 - Math::BigFloat::_e_sub(123, 321, "-", "+"); # Subtest: Math::BigFloat::_e_sub(123, 123, "-", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_sub() is modified ok 19 - Math::BigFloat::_e_sub(123, 123, "-", "+"); # Subtest: Math::BigFloat::_e_sub(123, 123, "+", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_sub() is modified ok 20 - Math::BigFloat::_e_sub(123, 123, "+", "-"); ok 21 # skip $x -> _zero() does not (yet?) modify the first argument ok 22 # skip $x -> _zero() does not (yet?) modify the first argument # Subtest: Math::BigFloat::_e_sub(0, 0, "-", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_sub() is modified ok 23 - Math::BigFloat::_e_sub(0, 0, "-", "+"); # Subtest: Math::BigFloat::_e_sub(0, 0, "+", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_sub() is modified ok 24 - Math::BigFloat::_e_sub(0, 0, "+", "-"); # Subtest: Math::BigFloat::_e_sub(0, 0, "+", "+"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_sub() is modified ok 25 - Math::BigFloat::_e_sub(0, 0, "+", "+"); # Subtest: Math::BigFloat::_e_sub(0, 0, "-", "-"); 1..2 ok 1 - output has the correct value ok 2 - first operand to _e_sub() is modified ok 26 - Math::BigFloat::_e_sub(0, 0, "-", "-"); ok t\author-batan-mbf.t ... skipped: these tests are for testing by the author t\author-batan2-mbf.t .. skipped: these tests are for testing by the author t\author-bexp-mbf.t .... skipped: these tests are for testing by the author t\author-blog-mbf.t .... skipped: these tests are for testing by the author t\author-blog-mbi.t .... skipped: these tests are for testing by the author t\author-bpi-mbf.t ..... skipped: these tests are for testing by the author t\bare_mbf.t ........... 1..2409 # BareCalc using Calc v1.999715 ok 1 - Math::BigFloat->config()->{lib} ok 2 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 3 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 4 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 5 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 6 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 7 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 8 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 9 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 10 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 11 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 12 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 13 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 14 - $x = Math::BigFloat->new("-inf"); $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("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 17 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 18 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 19 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 20 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 21 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 22 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 23 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 24 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 25 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 26 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 27 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 28 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 29 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 30 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat::bgcd($x, $y); ok 31 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat::bgcd($x, $y); ok 32 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 33 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 34 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 35 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 36 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); 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("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 39 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 40 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 41 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 42 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); 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("100"); $y = Math::BigFloat->new("625"); Math::BigFloat::bgcd($x, $y); ok 45 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat::bgcd($x, $y); ok 46 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat::bgcd($x, $y); ok 47 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat::bgcd($x, $y); ok 48 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat::bgcd($x, $y); ok 49 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat::bgcd($x, $y); ok 50 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat::bgcd($x, $y, $z); ok 51 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat::bgcd($x, $y, $z); ok 52 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat::bgcd($x, $y, $z); ok 53 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat::bgcd($x, $y, $z); ok 54 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 55 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 56 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 57 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 58 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 59 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 60 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 61 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 62 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 63 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 64 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::blcm($x, $y); ok 65 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::blcm($x, $y); ok 66 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat::blcm($x, $y); ok 67 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat::blcm($x, $y); ok 68 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat::blcm($x, $y); ok 69 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat::blcm($x, $y); ok 70 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 71 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 72 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 73 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 74 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 75 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 76 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 77 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 78 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 79 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 80 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 81 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 82 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 83 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 84 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 85 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 86 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 87 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 88 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 89 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 90 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 91 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 92 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 93 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 94 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 95 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 96 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 97 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 98 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 99 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 100 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 101 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 102 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 103 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 104 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 105 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 106 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 107 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 108 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 109 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 110 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 111 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 112 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 113 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 114 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 115 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 116 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 117 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 118 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 119 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 120 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 121 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 122 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 123 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 124 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 125 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 126 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 127 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 128 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 129 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 130 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 131 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 132 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 133 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 134 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 135 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 136 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 137 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 138 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 139 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 140 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 141 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 142 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 143 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 144 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 145 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 146 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 149 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 150 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 151 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 152 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 153 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 154 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 155 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 156 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 159 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 160 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 161 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 162 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 163 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 164 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 165 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 166 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 169 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 170 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 171 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 172 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 173 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 174 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 175 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 176 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 179 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 180 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 181 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 182 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 183 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 184 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 185 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 186 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 189 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 190 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 191 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 192 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 193 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 194 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 195 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 196 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 197 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 198 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 199 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 200 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 201 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 202 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 203 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 204 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 205 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 206 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 207 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 208 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 209 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 210 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 211 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 212 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 213 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 214 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 215 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 216 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 217 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 218 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 219 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 220 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 221 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 222 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 223 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 224 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 225 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 226 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 227 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 228 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 229 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 230 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 231 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 232 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 233 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 234 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 235 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 236 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 237 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 238 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 239 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 240 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 241 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 242 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 243 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 244 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 245 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 246 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 247 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 248 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 249 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 250 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 251 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 252 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 253 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 254 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 255 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 256 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 257 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 258 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 259 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 260 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 261 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 262 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 263 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 264 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 265 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 266 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); 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("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 269 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 270 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 271 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 272 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 273 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 274 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 275 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 276 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 277 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 278 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 279 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 280 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 281 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 282 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 283 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 284 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 285 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 286 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 287 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 288 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 289 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 290 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 291 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 292 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 293 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 294 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 295 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 296 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 297 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 298 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 299 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 300 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 301 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 302 - $x = Math::BigFloat->new("NaNbrsft"); $y = Math::BigFloat->new("2"); $x >> $y; ok 303 - $x = Math::BigFloat->new("NaNbrsft"); $y = Math::BigFloat->new("2"); $x >> $y; ok 304 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x >> $y; ok 305 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x >> $y; ok 306 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x >> $y; ok 307 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x >> $y; ok 308 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x >> $y; ok 309 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x >> $y; ok 310 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x >> $y; ok 311 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x >> $y; ok 312 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x >> $y; ok 313 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x >> $y; ok 314 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x >> $y; ok 315 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x >> $y; ok 316 - $x = Math::BigFloat->new("NaNblsft"); $y = Math::BigFloat->new("0"); $x << $y; ok 317 - $x = Math::BigFloat->new("NaNblsft"); $y = Math::BigFloat->new("0"); $x << $y; ok 318 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x << $y; ok 319 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x << $y; ok 320 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x << $y; ok 321 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x << $y; ok 322 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x << $y; ok 323 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x << $y; ok 324 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x << $y; ok 325 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x << $y; ok 326 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x << $y; ok 327 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x << $y; ok 328 - $x = Math::BigFloat->new("1"); $x; ok 329 - $x = Math::BigFloat->new("1"); $x; ok 330 - $x = Math::BigFloat->new("-0"); $x; ok 331 - $x = Math::BigFloat->new("-0"); $x; ok 332 - $x = Math::BigFloat->new("bnormNaN"); $x; ok 333 - $x = Math::BigFloat->new("bnormNaN"); $x; ok 334 - $x = Math::BigFloat->new("+inf"); $x; ok 335 - $x = Math::BigFloat->new("+inf"); $x; ok 336 - $x = Math::BigFloat->new("-inf"); $x; ok 337 - $x = Math::BigFloat->new("-inf"); $x; ok 338 - $x = Math::BigFloat->new("123"); $x; ok 339 - $x = Math::BigFloat->new("123"); $x; ok 340 - $x = Math::BigFloat->new("-123.4567"); $x; ok 341 - $x = Math::BigFloat->new("-123.4567"); $x; ok 342 - $x = Math::BigFloat->new("1__2"); $x; ok 343 - $x = Math::BigFloat->new("1__2"); $x; ok 344 - $x = Math::BigFloat->new("1E1__2"); $x; ok 345 - $x = Math::BigFloat->new("1E1__2"); $x; ok 346 - $x = Math::BigFloat->new("11__2E2"); $x; ok 347 - $x = Math::BigFloat->new("11__2E2"); $x; ok 348 - $x = Math::BigFloat->new(".2E-3."); $x; ok 349 - $x = Math::BigFloat->new(".2E-3."); $x; ok 350 - $x = Math::BigFloat->new("1e3e4"); $x; ok 351 - $x = Math::BigFloat->new("1e3e4"); $x; ok 352 - $x = Math::BigFloat->new(".2E2"); $x; ok 353 - $x = Math::BigFloat->new(".2E2"); $x; ok 354 - $x = Math::BigFloat->new("1.E3"); $x; ok 355 - $x = Math::BigFloat->new("1.E3"); $x; ok 356 - $x = Math::BigFloat->new("0e0"); $x; ok 357 - $x = Math::BigFloat->new("0e0"); $x; ok 358 - $x = Math::BigFloat->new("+0e0"); $x; ok 359 - $x = Math::BigFloat->new("+0e0"); $x; ok 360 - $x = Math::BigFloat->new("+0e+0"); $x; ok 361 - $x = Math::BigFloat->new("+0e+0"); $x; ok 362 - $x = Math::BigFloat->new("-0e+0"); $x; ok 363 - $x = Math::BigFloat->new("-0e+0"); $x; ok 364 - $x = Math::BigFloat->new("0e-0"); $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("000"); $x; ok 371 - $x = Math::BigFloat->new("000"); $x; ok 372 - $x = Math::BigFloat->new("00e2"); $x; ok 373 - $x = Math::BigFloat->new("00e2"); $x; ok 374 - $x = Math::BigFloat->new("00e02"); $x; ok 375 - $x = Math::BigFloat->new("00e02"); $x; ok 376 - $x = Math::BigFloat->new("000e002"); $x; ok 377 - $x = Math::BigFloat->new("000e002"); $x; ok 378 - $x = Math::BigFloat->new("000e1230"); $x; ok 379 - $x = Math::BigFloat->new("000e1230"); $x; ok 380 - $x = Math::BigFloat->new("00e-3"); $x; ok 381 - $x = Math::BigFloat->new("00e-3"); $x; ok 382 - $x = Math::BigFloat->new("00e+3"); $x; ok 383 - $x = Math::BigFloat->new("00e+3"); $x; ok 384 - $x = Math::BigFloat->new("00e-03"); $x; ok 385 - $x = Math::BigFloat->new("00e-03"); $x; ok 386 - $x = Math::BigFloat->new("00e+03"); $x; ok 387 - $x = Math::BigFloat->new("00e+03"); $x; ok 388 - $x = Math::BigFloat->new("-000"); $x; ok 389 - $x = Math::BigFloat->new("-000"); $x; ok 390 - $x = Math::BigFloat->new("-00e2"); $x; ok 391 - $x = Math::BigFloat->new("-00e2"); $x; ok 392 - $x = Math::BigFloat->new("-00e02"); $x; ok 393 - $x = Math::BigFloat->new("-00e02"); $x; ok 394 - $x = Math::BigFloat->new("-000e002"); $x; ok 395 - $x = Math::BigFloat->new("-000e002"); $x; ok 396 - $x = Math::BigFloat->new("-000e1230"); $x; ok 397 - $x = Math::BigFloat->new("-000e1230"); $x; ok 398 - $x = Math::BigFloat->new("-00e-3"); $x; ok 399 - $x = Math::BigFloat->new("-00e-3"); $x; ok 400 - $x = Math::BigFloat->new("-00e+3"); $x; ok 401 - $x = Math::BigFloat->new("-00e+3"); $x; ok 402 - $x = Math::BigFloat->new("-00e-03"); $x; ok 403 - $x = Math::BigFloat->new("-00e-03"); $x; ok 404 - $x = Math::BigFloat->new("-00e+03"); $x; ok 405 - $x = Math::BigFloat->new("-00e+03"); $x; ok 406 - $x = Math::BigFloat->new("0"); $x->as_number(); ok 407 - $x = Math::BigFloat->new("1"); $x->as_number(); ok 408 - $x = Math::BigFloat->new("1.2"); $x->as_number(); ok 409 - $x = Math::BigFloat->new("2.345"); $x->as_number(); ok 410 - $x = Math::BigFloat->new("-2"); $x->as_number(); ok 411 - $x = Math::BigFloat->new("-123.456"); $x->as_number(); ok 412 - $x = Math::BigFloat->new("-200"); $x->as_number(); ok 413 - $x = Math::BigFloat->new("-inf"); $x->as_number(); ok 414 - $x = Math::BigFloat->new("inf"); $x->as_number(); ok 415 - $x = Math::BigFloat->new("NaN"); $x->as_number(); ok 416 - $x = Math::BigFloat->new("71243225429896467497217836789578596379"); $x->as_number(); ok 417 - $x = Math::BigFloat->new("0.000641"); $x->as_number(); ok 418 - $x = Math::BigFloat->new("0.0006412"); $x->as_number(); ok 419 - $x = Math::BigFloat->new("0.00064123"); $x->as_number(); ok 420 - $x = Math::BigFloat->new("0.000641234"); $x->as_number(); ok 421 - $x = Math::BigFloat->new("0.0006412345"); $x->as_number(); ok 422 - $x = Math::BigFloat->new("0.00064123456"); $x->as_number(); ok 423 - $x = Math::BigFloat->new("0.000641234567"); $x->as_number(); ok 424 - $x = Math::BigFloat->new("0.0006412345678"); $x->as_number(); ok 425 - $x = Math::BigFloat->new("0.00064123456789"); $x->as_number(); ok 426 - $x = Math::BigFloat->new("0.1"); $x->as_number(); ok 427 - $x = Math::BigFloat->new("0.01"); $x->as_number(); ok 428 - $x = Math::BigFloat->new("0.001"); $x->as_number(); ok 429 - $x = Math::BigFloat->new("0.0001"); $x->as_number(); ok 430 - $x = Math::BigFloat->new("0.00001"); $x->as_number(); ok 431 - $x = Math::BigFloat->new("0.000001"); $x->as_number(); ok 432 - $x = Math::BigFloat->new("0.0000001"); $x->as_number(); ok 433 - $x = Math::BigFloat->new("0.00000001"); $x->as_number(); ok 434 - $x = Math::BigFloat->new("0.000000001"); $x->as_number(); ok 435 - $x = Math::BigFloat->new("0.0000000001"); $x->as_number(); ok 436 - $x = Math::BigFloat->new("0.00000000001"); $x->as_number(); ok 437 - $x = Math::BigFloat->new("0.12345"); $x->as_number(); ok 438 - $x = Math::BigFloat->new("0.123456"); $x->as_number(); ok 439 - $x = Math::BigFloat->new("0.1234567"); $x->as_number(); ok 440 - $x = Math::BigFloat->new("0.12345678"); $x->as_number(); ok 441 - $x = Math::BigFloat->new("0.123456789"); $x->as_number(); ok 442 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 443 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 444 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 445 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 446 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 447 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 448 - $x = Math::BigFloat->new("+inf"); $x->as_hex(); ok 449 - $x = Math::BigFloat->new("-inf"); $x->as_hex(); ok 450 - $x = Math::BigFloat->new("hexNaN"); $x->as_hex(); ok 451 - $x = Math::BigFloat->new("0"); $x->as_hex(); ok 452 - $x = Math::BigFloat->new("5"); $x->as_hex(); ok 453 - $x = Math::BigFloat->new("-5"); $x->as_hex(); ok 454 - $x = Math::BigFloat->new("+inf"); $x->as_bin(); ok 455 - $x = Math::BigFloat->new("-inf"); $x->as_bin(); ok 456 - $x = Math::BigFloat->new("hexNaN"); $x->as_bin(); ok 457 - $x = Math::BigFloat->new("0"); $x->as_bin(); ok 458 - $x = Math::BigFloat->new("5"); $x->as_bin(); ok 459 - $x = Math::BigFloat->new("-5"); $x->as_bin(); ok 460 - $x = Math::BigFloat->new("0"); $x->numify(); ok 461 - $x = Math::BigFloat->new("+1"); $x->numify(); ok 462 - $x = Math::BigFloat->new("1234"); $x->numify(); ok 463 - $x = Math::BigFloat->new("-5"); $x->numify(); ok 464 - $x = Math::BigFloat->new("100"); $x->numify(); ok 465 - $x = Math::BigFloat->new("-100"); $x->numify(); ok 466 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 467 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 468 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 469 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 470 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 471 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 472 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 473 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 474 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 475 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 476 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 477 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 478 - $x = Math::BigFloat->new("-2"); $x->bone("+"); 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("0"); $x->bone(""); ok 483 - $x = Math::BigFloat->new("0"); $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("abc"); $x->bone(""); ok 487 - $x = Math::BigFloat->new("abc"); $x->bone(""); ok 488 - $x = Math::BigFloat->new("2"); $x->bone("abc"); ok 489 - $x = Math::BigFloat->new("2"); $x->bone("abc"); ok 490 - $x = Math::BigFloat->new("+inf"); $x->bsstr(); ok 491 - $x = Math::BigFloat->new("-inf"); $x->bsstr(); ok 492 - $x = Math::BigFloat->new("abcfsstr"); $x->bsstr(); ok 493 - $x = Math::BigFloat->new("-abcfsstr"); $x->bsstr(); ok 494 - $x = Math::BigFloat->new("1234.567"); $x->bsstr(); ok 495 - $x = Math::BigFloat->new("123"); $x->bsstr(); ok 496 - $x = Math::BigFloat->new("-5"); $x->bsstr(); ok 497 - $x = Math::BigFloat->new("-100"); $x->bsstr(); ok 498 - $x = Math::BigFloat->new("+inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 499 - $x = Math::BigFloat->new("-inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 500 - $x = Math::BigFloat->new("abcfstr"); $x->accuracy(); $x->precision(); $x->bstr(); ok 501 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(9); $x->precision(); $x->bstr(); ok 502 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(); $x->precision(-6); $x->bstr(); ok 503 - $x = Math::BigFloat->new("12345"); $x->accuracy(5); $x->precision(); $x->bstr(); ok 504 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(6); $x->precision(); $x->bstr(); ok 505 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(); $x->precision(-8); $x->bstr(); ok 506 - $x = Math::BigFloat->new("0"); $x->accuracy(4); $x->precision(); $x->bstr(); ok 507 - $x = Math::BigFloat->new("0"); $x->accuracy(); $x->precision(-4); $x->bstr(); ok 508 - $x = Math::BigFloat->new("inf"); $x; ok 509 - $x = Math::BigFloat->new("inf"); $x; ok 510 - $x = Math::BigFloat->new("+inf"); $x; ok 511 - $x = Math::BigFloat->new("+inf"); $x; ok 512 - $x = Math::BigFloat->new("-inf"); $x; ok 513 - $x = Math::BigFloat->new("-inf"); $x; ok 514 - $x = Math::BigFloat->new("+infinity"); $x; ok 515 - $x = Math::BigFloat->new("+infinity"); $x; ok 516 - $x = Math::BigFloat->new("+-inf"); $x; ok 517 - $x = Math::BigFloat->new("+-inf"); $x; ok 518 - $x = Math::BigFloat->new("abc"); $x; ok 519 - $x = Math::BigFloat->new("abc"); $x; ok 520 - $x = Math::BigFloat->new(" 1 a"); $x; ok 521 - $x = Math::BigFloat->new(" 1 a"); $x; ok 522 - $x = Math::BigFloat->new("1bcd2"); $x; ok 523 - $x = Math::BigFloat->new("1bcd2"); $x; ok 524 - $x = Math::BigFloat->new("11111b"); $x; ok 525 - $x = Math::BigFloat->new("11111b"); $x; ok 526 - $x = Math::BigFloat->new("+1z"); $x; ok 527 - $x = Math::BigFloat->new("+1z"); $x; ok 528 - $x = Math::BigFloat->new("-1z"); $x; ok 529 - $x = Math::BigFloat->new("-1z"); $x; ok 530 - $x = Math::BigFloat->new("0e999"); $x; ok 531 - $x = Math::BigFloat->new("0e999"); $x; ok 532 - $x = Math::BigFloat->new("0e-999"); $x; ok 533 - $x = Math::BigFloat->new("0e-999"); $x; ok 534 - $x = Math::BigFloat->new("-0e999"); $x; ok 535 - $x = Math::BigFloat->new("-0e999"); $x; ok 536 - $x = Math::BigFloat->new("-0e-999"); $x; ok 537 - $x = Math::BigFloat->new("-0e-999"); $x; ok 538 - $x = Math::BigFloat->new("0"); $x; ok 539 - $x = Math::BigFloat->new("0"); $x; ok 540 - $x = Math::BigFloat->new("+0"); $x; ok 541 - $x = Math::BigFloat->new("+0"); $x; ok 542 - $x = Math::BigFloat->new("+00"); $x; ok 543 - $x = Math::BigFloat->new("+00"); $x; ok 544 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 545 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 546 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 547 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 548 - $x = Math::BigFloat->new("-0"); $x; ok 549 - $x = Math::BigFloat->new("-0"); $x; ok 550 - $x = Math::BigFloat->new("-0000"); $x; ok 551 - $x = Math::BigFloat->new("-0000"); $x; ok 552 - $x = Math::BigFloat->new("+1"); $x; ok 553 - $x = Math::BigFloat->new("+1"); $x; ok 554 - $x = Math::BigFloat->new("+01"); $x; ok 555 - $x = Math::BigFloat->new("+01"); $x; ok 556 - $x = Math::BigFloat->new("+001"); $x; ok 557 - $x = Math::BigFloat->new("+001"); $x; ok 558 - $x = Math::BigFloat->new("+00000100000"); $x; ok 559 - $x = Math::BigFloat->new("+00000100000"); $x; ok 560 - $x = Math::BigFloat->new("123456789"); $x; ok 561 - $x = Math::BigFloat->new("123456789"); $x; ok 562 - $x = Math::BigFloat->new("-1"); $x; ok 563 - $x = Math::BigFloat->new("-1"); $x; ok 564 - $x = Math::BigFloat->new("-01"); $x; ok 565 - $x = Math::BigFloat->new("-01"); $x; ok 566 - $x = Math::BigFloat->new("-001"); $x; ok 567 - $x = Math::BigFloat->new("-001"); $x; ok 568 - $x = Math::BigFloat->new("-123456789"); $x; ok 569 - $x = Math::BigFloat->new("-123456789"); $x; ok 570 - $x = Math::BigFloat->new("-00000100000"); $x; ok 571 - $x = Math::BigFloat->new("-00000100000"); $x; ok 572 - $x = Math::BigFloat->new("123.456a"); $x; ok 573 - $x = Math::BigFloat->new("123.456a"); $x; ok 574 - $x = Math::BigFloat->new("123.456"); $x; ok 575 - $x = Math::BigFloat->new("123.456"); $x; ok 576 - $x = Math::BigFloat->new("0.01"); $x; ok 577 - $x = Math::BigFloat->new("0.01"); $x; ok 578 - $x = Math::BigFloat->new(".002"); $x; ok 579 - $x = Math::BigFloat->new(".002"); $x; ok 580 - $x = Math::BigFloat->new("+.2"); $x; ok 581 - $x = Math::BigFloat->new("+.2"); $x; ok 582 - $x = Math::BigFloat->new("-0.0003"); $x; ok 583 - $x = Math::BigFloat->new("-0.0003"); $x; ok 584 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 585 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 586 - $x = Math::BigFloat->new("123456E2"); $x; ok 587 - $x = Math::BigFloat->new("123456E2"); $x; ok 588 - $x = Math::BigFloat->new("123456E-2"); $x; ok 589 - $x = Math::BigFloat->new("123456E-2"); $x; ok 590 - $x = Math::BigFloat->new("-123456E2"); $x; ok 591 - $x = Math::BigFloat->new("-123456E2"); $x; ok 592 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 593 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 594 - $x = Math::BigFloat->new("1e1"); $x; ok 595 - $x = Math::BigFloat->new("1e1"); $x; ok 596 - $x = Math::BigFloat->new("2e-11"); $x; ok 597 - $x = Math::BigFloat->new("2e-11"); $x; ok 598 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 599 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 600 - $x = Math::BigFloat->new(" 000001"); $x; ok 601 - $x = Math::BigFloat->new(" 000001"); $x; ok 602 - $x = Math::BigFloat->new(" -00001"); $x; ok 603 - $x = Math::BigFloat->new(" -00001"); $x; ok 604 - $x = Math::BigFloat->new(" -1"); $x; ok 605 - $x = Math::BigFloat->new(" -1"); $x; ok 606 - $x = Math::BigFloat->new(" 000.01"); $x; ok 607 - $x = Math::BigFloat->new(" 000.01"); $x; ok 608 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 609 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 610 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 611 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 612 - $x = Math::BigFloat->new("-3e111"); $x; ok 613 - $x = Math::BigFloat->new("-3e111"); $x; ok 614 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 615 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 616 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x ** $y; ok 617 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x ** $y; ok 618 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 619 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 620 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x ** $y; ok 621 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x ** $y; ok 622 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 623 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 624 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-21"); $x ** $y; ok 625 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-21"); $x ** $y; ok 626 - $x = Math::BigFloat->new("-21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 627 - $x = Math::BigFloat->new("-21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 628 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("21"); $x ** $y; ok 629 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("21"); $x ** $y; ok 630 - $x = Math::BigFloat->new("21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 631 - $x = Math::BigFloat->new("21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 632 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x ** $y; ok 633 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x ** $y; ok 634 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x ** $y; ok 635 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x ** $y; ok 636 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("9"); $x ** $y; ok 637 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("9"); $x ** $y; ok 638 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 639 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 640 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 641 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 642 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 643 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 644 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 645 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 646 - $x = Math::BigFloat->new("-1"); $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("3"); $x ** $y; ok 649 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 650 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x ** $y; ok 651 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x ** $y; ok 652 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 653 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 654 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x ** $y; ok 655 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x ** $y; ok 656 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 657 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 658 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x ** $y; ok 659 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x ** $y; ok 660 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x ** $y; ok 661 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x ** $y; ok 662 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 663 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 664 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 665 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 666 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $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("-2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 671 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 672 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x ** $y; ok 673 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x ** $y; ok 674 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x ** $y; ok 675 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x ** $y; ok 676 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x ** $y; ok 677 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x ** $y; ok 678 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x ** $y; ok 679 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x ** $y; ok 680 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x ** $y; ok 681 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x ** $y; ok 682 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x ** $y; ok 683 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x ** $y; ok 684 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x ** $y; ok 685 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x ** $y; ok 686 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x ** $y; ok 687 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x ** $y; ok 688 - $x = Math::BigFloat->new("bnegNaN"); $x->bneg(); ok 689 - $x = Math::BigFloat->new("bnegNaN"); $x->bneg(); ok 690 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 691 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 692 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 693 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 694 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 695 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 696 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 697 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 698 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 699 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 700 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 701 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 702 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 703 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 704 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 705 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 706 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 707 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 708 - $x = Math::BigFloat->new("babsNaN"); $x->babs(); ok 709 - $x = Math::BigFloat->new("babsNaN"); $x->babs(); ok 710 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 711 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 712 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 713 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 714 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 715 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 716 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 717 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 718 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 719 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 720 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 721 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 722 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 723 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 724 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 725 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 726 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 727 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 728 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 729 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 730 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 731 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 732 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 733 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 734 - $x = Math::BigFloat->new("NaNfround"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 735 - $x = Math::BigFloat->new("NaNfround"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 736 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 737 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 738 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 739 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 740 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 741 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 742 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 743 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 744 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 745 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 746 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 747 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 748 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 749 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 750 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 751 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 752 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 753 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 754 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 755 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 756 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 757 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 758 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 759 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 760 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 761 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 762 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 763 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 764 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 765 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 766 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 767 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 768 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 769 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 770 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 771 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 772 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 773 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 774 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 775 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 776 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 777 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 778 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 779 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 780 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 781 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 782 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 783 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 784 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 785 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 786 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 787 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 788 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 789 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 790 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 791 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 792 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 793 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 794 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 795 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 796 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 797 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 798 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 799 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 800 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 801 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 802 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 803 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 804 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 805 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 806 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 807 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 808 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 809 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 810 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 811 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 812 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 813 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 814 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 815 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 816 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 817 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 818 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 819 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 820 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 821 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 822 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 823 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 824 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 825 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 826 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 827 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 828 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 829 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 830 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 831 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 832 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 833 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 834 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 835 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 836 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 837 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 838 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 839 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 840 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 841 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 842 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 843 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 844 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 845 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 846 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 847 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 848 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 849 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 850 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 851 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 852 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 853 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 854 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 855 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 856 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 857 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 858 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 859 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 860 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 861 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 862 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 863 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 864 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 865 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 866 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 867 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 868 - $x = Math::BigFloat->new("NaNffround"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 869 - $x = Math::BigFloat->new("NaNffround"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 870 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 871 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 872 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 873 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 874 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 875 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 876 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 877 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 878 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 879 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 880 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 881 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 882 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 883 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 884 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 885 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 886 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 887 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 888 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 889 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 890 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 891 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 892 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 893 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 894 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 895 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 896 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 897 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 898 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 899 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 900 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 901 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 902 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 903 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 904 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 905 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 906 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 907 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 908 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 909 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 910 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 911 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 912 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 913 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 914 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 915 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 916 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 917 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 918 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 919 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-4); ok 920 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-5); ok 921 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 922 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 923 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 924 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 925 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 926 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 927 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 928 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 929 - $x = Math::BigFloat->new("+2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 930 - $x = Math::BigFloat->new("-2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 931 - $x = Math::BigFloat->new("+2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 932 - $x = Math::BigFloat->new("-2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 933 - $x = Math::BigFloat->new("+2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 934 - $x = Math::BigFloat->new("-2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 935 - $x = Math::BigFloat->new("+2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 936 - $x = Math::BigFloat->new("-2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 937 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 938 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 939 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-2); ok 940 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-3); ok 941 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-4); ok 942 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-5); ok 943 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 944 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 945 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 946 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 947 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 948 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 949 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 950 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 951 - $x = Math::BigFloat->new("+3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 952 - $x = Math::BigFloat->new("-3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 953 - $x = Math::BigFloat->new("+3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 954 - $x = Math::BigFloat->new("-3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 955 - $x = Math::BigFloat->new("+3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 956 - $x = Math::BigFloat->new("-3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 957 - $x = Math::BigFloat->new("+3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 958 - $x = Math::BigFloat->new("-3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 959 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 960 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 961 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-2); ok 962 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-3); ok 963 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-4); ok 964 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-5); ok 965 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 966 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 967 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 968 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 969 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 970 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 971 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 972 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 973 - $x = Math::BigFloat->new("+4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 974 - $x = Math::BigFloat->new("-4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 975 - $x = Math::BigFloat->new("+4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 976 - $x = Math::BigFloat->new("-4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 977 - $x = Math::BigFloat->new("+4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 978 - $x = Math::BigFloat->new("-4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 979 - $x = Math::BigFloat->new("+4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 980 - $x = Math::BigFloat->new("-4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 981 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 982 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 983 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-2); ok 984 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-3); ok 985 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-4); ok 986 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-5); ok 987 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 988 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 989 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 990 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 991 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 992 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 993 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 994 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 995 - $x = Math::BigFloat->new("+5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 996 - $x = Math::BigFloat->new("-5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 997 - $x = Math::BigFloat->new("+5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 998 - $x = Math::BigFloat->new("-5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 999 - $x = Math::BigFloat->new("+5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1000 - $x = Math::BigFloat->new("-5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1001 - $x = Math::BigFloat->new("+5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1002 - $x = Math::BigFloat->new("-5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1003 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1004 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1005 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-2); ok 1006 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-3); ok 1007 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-4); ok 1008 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-5); ok 1009 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1010 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1011 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1012 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1013 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1014 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1015 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1016 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1017 - $x = Math::BigFloat->new("+6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1018 - $x = Math::BigFloat->new("-6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1019 - $x = Math::BigFloat->new("+6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1020 - $x = Math::BigFloat->new("-6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1021 - $x = Math::BigFloat->new("+6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1022 - $x = Math::BigFloat->new("-6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1023 - $x = Math::BigFloat->new("+6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1024 - $x = Math::BigFloat->new("-6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1025 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1026 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1027 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-2); ok 1028 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1029 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1030 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1031 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1032 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1033 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1034 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1035 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1036 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1037 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1038 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1039 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1040 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1041 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1042 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1043 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1044 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1045 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1046 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1047 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1048 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1049 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1050 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1051 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1052 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1053 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1054 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1055 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("bcmpNaN"); $x->bcmp($y); ok 1056 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1057 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("bcmpNaN"); $x->bcmp($y); ok 1058 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1059 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1060 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1061 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1062 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1063 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1064 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1065 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1066 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1067 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1068 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bcmp($y); ok 1069 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1070 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bcmp($y); ok 1071 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1072 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bcmp($y); ok 1073 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1074 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1075 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bcmp($y); ok 1076 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1077 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bcmp($y); ok 1078 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1079 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bcmp($y); ok 1080 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1081 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bcmp($y); ok 1082 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1083 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bcmp($y); ok 1084 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bcmp($y); ok 1085 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1086 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1087 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1088 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1089 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bcmp($y); ok 1090 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bcmp($y); ok 1091 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1092 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1093 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1094 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1095 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1096 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1097 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1098 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1099 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1100 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bcmp($y); ok 1101 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1102 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bcmp($y); ok 1103 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bcmp($y); ok 1104 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bcmp($y); ok 1105 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bcmp($y); ok 1106 - $x = Math::BigFloat->new("1e1234567890987654321"); $y = Math::BigFloat->new("1e1234567890987654320"); $x->bcmp($y); ok 1107 - $x = Math::BigFloat->new("1e-1234567890987654321"); $y = Math::BigFloat->new("1e-1234567890987654320"); $x->bcmp($y); ok 1108 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1109 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1110 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1111 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1112 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1113 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1114 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1115 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1116 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1117 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1118 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1119 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1120 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1121 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bcmp($y); ok 1122 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1123 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1124 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("bcmpNaN"); $x->bacmp($y); ok 1125 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1126 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("bcmpNaN"); $x->bacmp($y); ok 1127 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1128 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1129 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1130 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1131 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1132 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1133 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1134 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1135 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1136 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1137 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bacmp($y); ok 1138 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1139 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bacmp($y); ok 1140 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1141 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bacmp($y); ok 1142 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1143 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1144 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bacmp($y); ok 1145 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1146 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bacmp($y); ok 1147 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1148 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bacmp($y); ok 1149 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1150 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bacmp($y); ok 1151 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1152 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bacmp($y); ok 1153 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bacmp($y); ok 1154 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1155 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1156 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1157 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1158 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bacmp($y); ok 1159 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bacmp($y); ok 1160 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1161 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1162 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1163 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1164 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1165 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1166 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1167 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1168 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1169 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bacmp($y); ok 1170 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1171 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bacmp($y); ok 1172 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bacmp($y); ok 1173 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bacmp($y); ok 1174 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bacmp($y); ok 1175 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1176 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1177 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1178 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1179 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1180 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1181 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1182 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1183 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1184 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1185 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1186 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1187 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1188 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1189 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1190 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1191 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("bacmpNaN"); $x->bacmp($y); ok 1192 - $x = Math::BigFloat->new("bacmpNaN"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1193 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("bacmpNaN"); $x->bacmp($y); ok 1194 - $x = Math::BigFloat->new("bacmpNaN"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1195 - $x = Math::BigFloat->new("bdecNaN"); --$x; ok 1196 - $x = Math::BigFloat->new("bdecNaN"); --$x; ok 1197 - $x = Math::BigFloat->new("+inf"); --$x; ok 1198 - $x = Math::BigFloat->new("+inf"); --$x; ok 1199 - $x = Math::BigFloat->new("-inf"); --$x; ok 1200 - $x = Math::BigFloat->new("-inf"); --$x; ok 1201 - $x = Math::BigFloat->new("+0"); --$x; ok 1202 - $x = Math::BigFloat->new("+0"); --$x; ok 1203 - $x = Math::BigFloat->new("+1"); --$x; ok 1204 - $x = Math::BigFloat->new("+1"); --$x; ok 1205 - $x = Math::BigFloat->new("-1"); --$x; ok 1206 - $x = Math::BigFloat->new("-1"); --$x; ok 1207 - $x = Math::BigFloat->new("1.23"); --$x; ok 1208 - $x = Math::BigFloat->new("1.23"); --$x; ok 1209 - $x = Math::BigFloat->new("-1.23"); --$x; ok 1210 - $x = Math::BigFloat->new("-1.23"); --$x; ok 1211 - $x = Math::BigFloat->new("100"); --$x; ok 1212 - $x = Math::BigFloat->new("100"); --$x; ok 1213 - $x = Math::BigFloat->new("101"); --$x; ok 1214 - $x = Math::BigFloat->new("101"); --$x; ok 1215 - $x = Math::BigFloat->new("-100"); --$x; ok 1216 - $x = Math::BigFloat->new("-100"); --$x; ok 1217 - $x = Math::BigFloat->new("-99"); --$x; ok 1218 - $x = Math::BigFloat->new("-99"); --$x; ok 1219 - $x = Math::BigFloat->new("-98"); --$x; ok 1220 - $x = Math::BigFloat->new("-98"); --$x; ok 1221 - $x = Math::BigFloat->new("99"); --$x; ok 1222 - $x = Math::BigFloat->new("99"); --$x; ok 1223 - $x = Math::BigFloat->new("bincNaN"); ++$x; ok 1224 - $x = Math::BigFloat->new("bincNaN"); ++$x; ok 1225 - $x = Math::BigFloat->new("+inf"); ++$x; ok 1226 - $x = Math::BigFloat->new("+inf"); ++$x; ok 1227 - $x = Math::BigFloat->new("-inf"); ++$x; ok 1228 - $x = Math::BigFloat->new("-inf"); ++$x; ok 1229 - $x = Math::BigFloat->new("+0"); ++$x; ok 1230 - $x = Math::BigFloat->new("+0"); ++$x; ok 1231 - $x = Math::BigFloat->new("+1"); ++$x; ok 1232 - $x = Math::BigFloat->new("+1"); ++$x; ok 1233 - $x = Math::BigFloat->new("-1"); ++$x; ok 1234 - $x = Math::BigFloat->new("-1"); ++$x; ok 1235 - $x = Math::BigFloat->new("1.23"); ++$x; ok 1236 - $x = Math::BigFloat->new("1.23"); ++$x; ok 1237 - $x = Math::BigFloat->new("-1.23"); ++$x; ok 1238 - $x = Math::BigFloat->new("-1.23"); ++$x; ok 1239 - $x = Math::BigFloat->new("100"); ++$x; ok 1240 - $x = Math::BigFloat->new("100"); ++$x; ok 1241 - $x = Math::BigFloat->new("-100"); ++$x; ok 1242 - $x = Math::BigFloat->new("-100"); ++$x; ok 1243 - $x = Math::BigFloat->new("-99"); ++$x; ok 1244 - $x = Math::BigFloat->new("-99"); ++$x; ok 1245 - $x = Math::BigFloat->new("-101"); ++$x; ok 1246 - $x = Math::BigFloat->new("-101"); ++$x; ok 1247 - $x = Math::BigFloat->new("99"); ++$x; ok 1248 - $x = Math::BigFloat->new("99"); ++$x; ok 1249 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1250 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1251 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1252 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1253 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1254 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1255 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1256 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1257 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1258 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1259 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $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("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1264 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1265 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1266 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1267 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1268 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1269 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1270 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1271 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1272 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1273 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1274 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1275 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1276 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1277 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1278 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1279 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1280 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1281 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1282 - $x = Math::BigFloat->new("+0"); $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("-1"); $x + $y; ok 1285 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1286 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1287 - $x = Math::BigFloat->new("+1"); $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("+9"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1290 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1291 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1292 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1293 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1294 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1295 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1296 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1297 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1298 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1299 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1300 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1301 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1302 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1303 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1304 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1305 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1306 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1307 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1308 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1309 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1310 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1311 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1312 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1313 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1314 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1315 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1316 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1317 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1318 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1319 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1320 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1321 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1322 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1323 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1324 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1325 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1326 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1327 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1328 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1329 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1330 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1331 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1332 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1333 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1334 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1335 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $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("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x + $y; ok 1340 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x + $y; ok 1341 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1342 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1343 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1344 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1345 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1346 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1347 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1348 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1349 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1350 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1351 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $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("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1356 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1357 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1358 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1359 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1360 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1361 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1362 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1363 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1364 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1365 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1366 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1367 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1368 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1369 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1370 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1371 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1372 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1373 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1374 - $x = Math::BigFloat->new("+0"); $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("-1"); $x - $y; ok 1377 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1378 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1379 - $x = Math::BigFloat->new("+1"); $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("+9"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1382 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1383 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1384 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1385 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1386 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1387 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1388 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1389 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1390 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1391 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1392 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1393 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1394 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1395 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1396 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1397 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1398 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1399 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1400 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1401 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1402 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1403 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1404 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1405 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1406 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1407 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1408 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1409 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1410 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1411 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1412 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1413 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1414 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1415 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1416 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1417 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1418 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1419 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1420 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1421 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1422 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1423 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1424 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1425 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1426 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1427 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $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("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1432 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1433 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1434 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1435 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1436 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1437 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1438 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1439 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1440 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1441 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1442 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1443 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1444 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1445 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1446 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1447 - $x = Math::BigFloat->new("+inf"); $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("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1449 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1450 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1451 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $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("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1456 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1457 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1458 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1459 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1460 - $x = Math::BigFloat->new("+1"); $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("-1"); $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("-1"); $y = Math::BigFloat->new("+0"); $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("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1466 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1467 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1468 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1469 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1470 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1471 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1472 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1473 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $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("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1480 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1481 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1482 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1483 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $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("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1488 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1489 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1490 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1491 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1492 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1493 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1494 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1495 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1496 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1497 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1498 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1499 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1500 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1501 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1502 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1503 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1504 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1505 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1506 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1507 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1508 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1509 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1510 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1511 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1512 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1513 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1514 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1515 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1516 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1517 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1518 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1519 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1520 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1521 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1522 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1523 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1524 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1525 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1526 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1527 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1528 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1529 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1530 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1531 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1532 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1533 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1534 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1535 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1536 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1537 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $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("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1546 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1547 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1548 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1549 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1550 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1551 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1552 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1553 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1554 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1555 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1556 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1557 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1558 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1559 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1560 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1561 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1562 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1563 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1564 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1565 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1566 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1567 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1568 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1569 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1570 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1571 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1572 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1573 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1574 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1575 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1576 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1577 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1578 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1579 - $x = Math::BigFloat->new("+inf"); $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("123.34"); $x * $y; ok 1584 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1585 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1586 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1587 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $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("123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1592 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1593 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1594 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1595 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $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("+0"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1600 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1601 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1602 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1603 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1604 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1605 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1606 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1607 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1608 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1609 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1610 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1611 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x * $y; ok 1612 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x * $y; ok 1613 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1614 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1615 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1616 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1617 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $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("+2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1622 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1623 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1624 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1625 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $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("+111"); $y = Math::BigFloat->new("+111"); $x * $y; ok 1630 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x * $y; ok 1631 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x * $y; ok 1632 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x * $y; ok 1633 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x * $y; ok 1634 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x * $y; ok 1635 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x * $y; ok 1636 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x * $y; ok 1637 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x * $y; ok 1638 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x * $y; ok 1639 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1640 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1641 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1642 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1643 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1644 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1645 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1646 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1647 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1648 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1649 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1650 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1651 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1652 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1653 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1654 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1655 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1656 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1657 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x * $y; ok 1658 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x * $y; ok 1659 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x * $y; ok 1660 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x * $y; ok 1661 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1662 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1663 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1664 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1665 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1666 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1667 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1668 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1669 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1670 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1671 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1672 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1673 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1674 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1675 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1676 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1677 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1678 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1679 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1680 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1681 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1682 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1683 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1684 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1685 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1686 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $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("+0"); $y = Math::BigFloat->new("-1"); $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("-1"); $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("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1693 - $x = Math::BigFloat->new("+1"); $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("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1695 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1696 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1697 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $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("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1702 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1703 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1704 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1705 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1706 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1707 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1708 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1709 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1710 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1711 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1712 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1713 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1714 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1715 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1716 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1717 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1718 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1719 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1720 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1721 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1722 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1723 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1724 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1725 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1726 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1727 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1728 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1729 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1730 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1731 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1732 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1733 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1734 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1735 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1736 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1737 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1738 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1739 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1740 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1741 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1742 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1743 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1744 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1745 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1746 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1747 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1748 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1749 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1750 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1751 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1752 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1753 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1754 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1755 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1756 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1757 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1758 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1759 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1760 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1761 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1762 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1763 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1764 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1765 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1766 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1767 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1768 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1769 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1770 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1771 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1772 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1773 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1774 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1775 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1776 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1777 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1778 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1779 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1780 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1781 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1782 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1783 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1784 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1785 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1786 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1787 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1788 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1789 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1790 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1791 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1792 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1793 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1794 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1795 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1796 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1797 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1798 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1799 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1800 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1801 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1802 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1803 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x % $y; ok 1804 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x % $y; ok 1805 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x % $y; ok 1806 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x % $y; ok 1807 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x % $y; ok 1808 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x % $y; ok 1809 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x % $y; ok 1810 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x % $y; ok 1811 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1812 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1813 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1814 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1815 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1816 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1817 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1818 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1819 - $x = Math::BigFloat->new("-5"); $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("inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1824 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1825 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1826 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1827 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $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("5"); $y = Math::BigFloat->new("5"); $x % $y; ok 1832 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x % $y; ok 1833 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1834 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1835 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1836 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1837 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1838 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1839 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $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("8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1844 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1845 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1846 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1847 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1848 - $x = Math::BigFloat->new("-inf"); $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("-8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1851 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x % $y; ok 1852 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x % $y; ok 1853 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1854 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1855 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x % $y; ok 1856 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x % $y; ok 1857 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1858 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1859 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x % $y; ok 1860 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x % $y; ok 1861 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1862 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1863 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1864 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1865 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $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("1"); $x % $y; ok 1868 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1869 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1870 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1871 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $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("2"); $x % $y; ok 1876 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x % $y; ok 1877 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x % $y; ok 1878 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x % $y; ok 1879 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1880 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1881 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1882 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1883 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1884 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1885 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1886 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1887 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1888 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1889 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1890 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1891 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1892 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1893 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1894 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1895 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1896 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1897 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x % $y; ok 1898 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x % $y; ok 1899 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x % $y; ok 1900 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x % $y; ok 1901 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x % $y; ok 1902 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x % $y; ok 1903 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x % $y; ok 1904 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x % $y; ok 1905 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x % $y; ok 1906 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x % $y; ok 1907 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x % $y; ok 1908 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x % $y; ok 1909 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x % $y; ok 1910 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x % $y; ok 1911 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x % $y; ok 1912 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x % $y; ok 1913 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x % $y; ok 1914 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x % $y; ok 1915 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x % $y; ok 1916 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x % $y; ok 1917 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x % $y; ok 1918 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x % $y; ok 1919 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x % $y; ok 1920 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x % $y; ok 1921 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x % $y; ok 1922 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x % $y; ok 1923 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x % $y; ok 1924 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x % $y; ok 1925 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1926 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1927 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1928 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1929 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x % $y; ok 1930 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x % $y; ok 1931 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x % $y; ok 1932 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x % $y; ok 1933 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x % $y; ok 1934 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x % $y; ok 1935 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x % $y; ok 1936 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x % $y; ok 1937 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1938 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1939 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1940 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1941 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1942 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1943 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1944 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1945 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x % $y; ok 1946 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x % $y; ok 1947 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x % $y; ok 1948 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x % $y; ok 1949 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x % $y; ok 1950 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x % $y; ok 1951 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x % $y; ok 1952 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x % $y; ok 1953 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1954 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1955 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1956 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1957 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1958 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1959 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x % $y; ok 1960 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x % $y; ok 1961 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1962 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1963 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1964 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1965 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $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("-3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1970 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1971 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1972 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1973 - $x = Math::BigFloat->new("-3"); $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("Nanfac"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1978 - $x = Math::BigFloat->new("Nanfac"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1979 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1980 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1981 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1982 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1983 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1984 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1985 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1986 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1987 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1988 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1989 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1990 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1991 - $x = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1992 - $x = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1993 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1994 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1995 - $x = Math::BigFloat->new("5"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1996 - $x = Math::BigFloat->new("5"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1997 - $x = Math::BigFloat->new("6"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1998 - $x = Math::BigFloat->new("6"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1999 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2000 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2001 - $x = Math::BigFloat->new("11"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2002 - $x = Math::BigFloat->new("11"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2003 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2004 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2005 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2006 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2007 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2008 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2009 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2010 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2011 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2012 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2013 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2014 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2015 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2016 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2017 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2018 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2019 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2020 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2021 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2022 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2023 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2024 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2025 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2026 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2027 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2028 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2029 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2030 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2031 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2032 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2033 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2034 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2035 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2036 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2037 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2038 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2039 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2040 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2041 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2042 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2043 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2044 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2045 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2046 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2047 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2048 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2049 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2050 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2051 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2052 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2053 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2054 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2055 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2056 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2057 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2058 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2059 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2060 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2061 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2062 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2063 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2064 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2065 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2066 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2067 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2068 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2069 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2070 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2071 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2072 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2073 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2074 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2075 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2076 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2077 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2078 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2079 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2080 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2081 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2082 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2083 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2084 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2085 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2086 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2087 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2088 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2089 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2090 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2091 - $x = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2092 - $x = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2093 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2094 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2095 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2096 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2097 - $x = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2098 - $x = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2099 - $x = Math::BigFloat->new("-123.45"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2100 - $x = Math::BigFloat->new("-123.45"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2101 - $x = Math::BigFloat->new("nanbsqrt"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2102 - $x = Math::BigFloat->new("nanbsqrt"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2103 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2104 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2105 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2106 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2107 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2108 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2109 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2110 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2111 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2112 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2113 - $x = Math::BigFloat->new("9"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2114 - $x = Math::BigFloat->new("9"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2115 - $x = Math::BigFloat->new("16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2116 - $x = Math::BigFloat->new("16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2117 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2118 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2119 - $x = Math::BigFloat->new("123.456"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2120 - $x = Math::BigFloat->new("123.456"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2121 - $x = Math::BigFloat->new("15241.38393"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2122 - $x = Math::BigFloat->new("15241.38393"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2123 - $x = Math::BigFloat->new("1.44"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2124 - $x = Math::BigFloat->new("1.44"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2125 - $x = Math::BigFloat->new("1.44E10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2126 - $x = Math::BigFloat->new("1.44E10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2127 - $x = Math::BigFloat->new("2e10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2128 - $x = Math::BigFloat->new("2e10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2129 - $x = Math::BigFloat->new("144e20"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2130 - $x = Math::BigFloat->new("144e20"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2131 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2132 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2133 - $x = Math::BigFloat->new("0.49"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2134 - $x = Math::BigFloat->new("0.49"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2135 - $x = Math::BigFloat->new("0.0049"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2136 - $x = Math::BigFloat->new("0.0049"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2137 - $x = Math::BigFloat->new("123"); $x->is_nan(); ok 2138 - $x = Math::BigFloat->new("abc"); $x->is_nan(); ok 2139 - $x = Math::BigFloat->new("NaN"); $x->is_nan(); ok 2140 - $x = Math::BigFloat->new("-123"); $x->is_nan(); ok 2141 - $x = Math::BigFloat->new("+inf"); $x->is_inf(""); ok 2142 - $x = Math::BigFloat->new("-inf"); $x->is_inf(""); ok 2143 - $x = Math::BigFloat->new("abc"); $x->is_inf(""); ok 2144 - $x = Math::BigFloat->new("1"); $x->is_inf(""); ok 2145 - $x = Math::BigFloat->new("NaN"); $x->is_inf(""); ok 2146 - $x = Math::BigFloat->new("-1"); $x->is_inf(""); ok 2147 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-"); ok 2148 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+"); ok 2149 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-"); ok 2150 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+"); ok 2151 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-inf"); ok 2152 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+inf"); ok 2153 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-inf"); ok 2154 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+inf"); ok 2155 - $x = Math::BigFloat->new("+iNfInItY"); $x->is_inf(""); ok 2156 - $x = Math::BigFloat->new("-InFiNiTy"); $x->is_inf(""); ok 2157 - $x = Math::BigFloat->new("abc"); $x->is_odd(); ok 2158 - $x = Math::BigFloat->new("0"); $x->is_odd(); ok 2159 - $x = Math::BigFloat->new("-1"); $x->is_odd(); ok 2160 - $x = Math::BigFloat->new("-3"); $x->is_odd(); ok 2161 - $x = Math::BigFloat->new("1"); $x->is_odd(); ok 2162 - $x = Math::BigFloat->new("3"); $x->is_odd(); ok 2163 - $x = Math::BigFloat->new("1000001"); $x->is_odd(); ok 2164 - $x = Math::BigFloat->new("1000002"); $x->is_odd(); ok 2165 - $x = Math::BigFloat->new("+inf"); $x->is_odd(); ok 2166 - $x = Math::BigFloat->new("-inf"); $x->is_odd(); ok 2167 - $x = Math::BigFloat->new("123.45"); $x->is_odd(); ok 2168 - $x = Math::BigFloat->new("-123.45"); $x->is_odd(); ok 2169 - $x = Math::BigFloat->new("2"); $x->is_odd(); ok 2170 - $x = Math::BigFloat->new("NaNis_int"); $x->is_int(); ok 2171 - $x = Math::BigFloat->new("0"); $x->is_int(); ok 2172 - $x = Math::BigFloat->new("1"); $x->is_int(); ok 2173 - $x = Math::BigFloat->new("2"); $x->is_int(); ok 2174 - $x = Math::BigFloat->new("-2"); $x->is_int(); ok 2175 - $x = Math::BigFloat->new("-1"); $x->is_int(); ok 2176 - $x = Math::BigFloat->new("-inf"); $x->is_int(); ok 2177 - $x = Math::BigFloat->new("+inf"); $x->is_int(); ok 2178 - $x = Math::BigFloat->new("123.4567"); $x->is_int(); ok 2179 - $x = Math::BigFloat->new("-0.1"); $x->is_int(); ok 2180 - $x = Math::BigFloat->new("-0.002"); $x->is_int(); ok 2181 - $x = Math::BigFloat->new("abc"); $x->is_even(); ok 2182 - $x = Math::BigFloat->new("0"); $x->is_even(); ok 2183 - $x = Math::BigFloat->new("-1"); $x->is_even(); ok 2184 - $x = Math::BigFloat->new("-3"); $x->is_even(); ok 2185 - $x = Math::BigFloat->new("1"); $x->is_even(); ok 2186 - $x = Math::BigFloat->new("3"); $x->is_even(); ok 2187 - $x = Math::BigFloat->new("1000001"); $x->is_even(); ok 2188 - $x = Math::BigFloat->new("1000002"); $x->is_even(); ok 2189 - $x = Math::BigFloat->new("2"); $x->is_even(); ok 2190 - $x = Math::BigFloat->new("+inf"); $x->is_even(); ok 2191 - $x = Math::BigFloat->new("-inf"); $x->is_even(); ok 2192 - $x = Math::BigFloat->new("123.456"); $x->is_even(); ok 2193 - $x = Math::BigFloat->new("-123.456"); $x->is_even(); ok 2194 - $x = Math::BigFloat->new("0.01"); $x->is_even(); ok 2195 - $x = Math::BigFloat->new("-0.01"); $x->is_even(); ok 2196 - $x = Math::BigFloat->new("120"); $x->is_even(); ok 2197 - $x = Math::BigFloat->new("1200"); $x->is_even(); ok 2198 - $x = Math::BigFloat->new("-1200"); $x->is_even(); ok 2199 - $x = Math::BigFloat->new("0"); $x->is_positive(); ok 2200 - $x = Math::BigFloat->new("1"); $x->is_positive(); ok 2201 - $x = Math::BigFloat->new("-1"); $x->is_positive(); ok 2202 - $x = Math::BigFloat->new("-123"); $x->is_positive(); ok 2203 - $x = Math::BigFloat->new("NaN"); $x->is_positive(); ok 2204 - $x = Math::BigFloat->new("-inf"); $x->is_positive(); ok 2205 - $x = Math::BigFloat->new("+inf"); $x->is_positive(); ok 2206 - $x = Math::BigFloat->new("0"); $x->is_negative(); ok 2207 - $x = Math::BigFloat->new("1"); $x->is_negative(); ok 2208 - $x = Math::BigFloat->new("-1"); $x->is_negative(); ok 2209 - $x = Math::BigFloat->new("-123"); $x->is_negative(); ok 2210 - $x = Math::BigFloat->new("NaN"); $x->is_negative(); ok 2211 - $x = Math::BigFloat->new("-inf"); $x->is_negative(); ok 2212 - $x = Math::BigFloat->new("+inf"); $x->is_negative(); ok 2213 - $x = Math::BigFloat->new("0"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2214 - $x = Math::BigFloat->new("1"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2215 - $x = Math::BigFloat->new("123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2216 - $x = Math::BigFloat->new("-123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2217 - $x = Math::BigFloat->new("-1200"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2218 - $x = Math::BigFloat->new("NaNparts"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2219 - $x = Math::BigFloat->new("+inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2220 - $x = Math::BigFloat->new("-inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2221 - $x = Math::BigFloat->new("0"); $x->exponent()->bstr(); ok 2222 - $x = Math::BigFloat->new("1"); $x->exponent()->bstr(); ok 2223 - $x = Math::BigFloat->new("123"); $x->exponent()->bstr(); ok 2224 - $x = Math::BigFloat->new("-123"); $x->exponent()->bstr(); ok 2225 - $x = Math::BigFloat->new("-1200"); $x->exponent()->bstr(); ok 2226 - $x = Math::BigFloat->new("+inf"); $x->exponent()->bstr(); ok 2227 - $x = Math::BigFloat->new("-inf"); $x->exponent()->bstr(); ok 2228 - $x = Math::BigFloat->new("NaNexponent"); $x->exponent()->bstr(); ok 2229 - $x = Math::BigFloat->new("0"); $x->mantissa()->bstr(); ok 2230 - $x = Math::BigFloat->new("1"); $x->mantissa()->bstr(); ok 2231 - $x = Math::BigFloat->new("123"); $x->mantissa()->bstr(); ok 2232 - $x = Math::BigFloat->new("-123"); $x->mantissa()->bstr(); ok 2233 - $x = Math::BigFloat->new("-1200"); $x->mantissa()->bstr(); ok 2234 - $x = Math::BigFloat->new("+inf"); $x->mantissa()->bstr(); ok 2235 - $x = Math::BigFloat->new("-inf"); $x->mantissa()->bstr(); ok 2236 - $x = Math::BigFloat->new("NaNmantissa"); $x->mantissa()->bstr(); ok 2237 - $x = Math::BigFloat->new("123"); $x->length(); ok 2238 - $x = Math::BigFloat->new("-123"); $x->length(); ok 2239 - $x = Math::BigFloat->new("0"); $x->length(); ok 2240 - $x = Math::BigFloat->new("1"); $x->length(); ok 2241 - $x = Math::BigFloat->new("12345678901234567890"); $x->length(); ok 2242 - $x = Math::BigFloat->new("NaNzero"); $x->is_zero(); ok 2243 - $x = Math::BigFloat->new("+inf"); $x->is_zero(); ok 2244 - $x = Math::BigFloat->new("-inf"); $x->is_zero(); ok 2245 - $x = Math::BigFloat->new("0"); $x->is_zero(); ok 2246 - $x = Math::BigFloat->new("-1"); $x->is_zero(); ok 2247 - $x = Math::BigFloat->new("1"); $x->is_zero(); ok 2248 - $x = Math::BigFloat->new("NaNone"); $x->is_one(); ok 2249 - $x = Math::BigFloat->new("+inf"); $x->is_one(); ok 2250 - $x = Math::BigFloat->new("-inf"); $x->is_one(); ok 2251 - $x = Math::BigFloat->new("0"); $x->is_one(); ok 2252 - $x = Math::BigFloat->new("2"); $x->is_one(); ok 2253 - $x = Math::BigFloat->new("1"); $x->is_one(); ok 2254 - $x = Math::BigFloat->new("-1"); $x->is_one(); ok 2255 - $x = Math::BigFloat->new("-2"); $x->is_one(); ok 2256 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2257 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2258 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2259 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2260 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2261 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2262 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2263 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2264 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2265 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2266 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2267 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2268 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2269 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2270 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2271 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2272 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2273 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2274 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2275 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2276 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2277 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2278 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2279 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2280 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2281 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2282 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2283 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2284 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2285 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2286 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2287 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2288 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2289 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2290 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2291 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2292 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2293 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2294 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2295 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2296 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2297 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2298 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2299 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2300 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2301 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2302 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2303 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2304 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2305 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2306 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2307 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2308 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2309 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2310 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2311 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2312 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2313 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2314 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2315 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2316 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2317 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2318 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2319 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2320 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2321 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2322 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2323 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2324 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2325 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2326 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2327 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2328 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2329 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2330 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 2331 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 2332 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 2333 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 2334 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 2335 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 2336 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 2337 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 2338 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $y ok 2339 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $x ok 2340 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsstr() ok 2341 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->exponent() ok 2342 - Math::BigFloat->new("1e1234567890123456789012345678901234567890") > 0 ok 2343 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsub("1e1234567890123456789012345678901234567890") ok 2344 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bmul(2)->bsstr() ok 2345 - Math::BigFloat->new("1234567890123456789012345678901234567890e2")->mantissa() ok 2346 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_a} ok 2347 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_p} ok 2348 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_a} ok 2349 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_p} ok 2350 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_a} ok 2351 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_p} ok 2352 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_a} ok 2353 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_p} ok 2354 - Math::BigFloat->bzero() ok 2355 - Math::BigFloat->bone() ok 2356 - Math::BigFloat->bone("+") ok 2357 - Math::BigFloat->bone("-") ok 2358 - Math::BigFloat->bnan() ok 2359 - Math::BigFloat->binf() ok 2360 - Math::BigFloat->binf("+") ok 2361 - Math::BigFloat->binf("-") ok 2362 - Math::BigFloat->binf("-inf") ok 2363 - $x = Math::BigFloat->new("0.008"); $y = Math::BigFloat->new(2); $x->bdiv(3, $y); ok 2364 - Math::BigFloat->new("12345e67")->numify() ok 2365 - Math::BigFloat->new("1e-9999")->numify() ok 2366 - Math::BigFloat->new("1e9999")->numify() ok 2367 - numify of +Inf ok 2368 - numify of -Inf ok 2369 - numify of NaN ok 2370 - $x = Math::BigFloat->new(12); Math::BigFloat->precision(-2); $x->bsqrt(); ok 2371 - Math::BigFloat->precision(undef); $x = Math::BigFloat->new(12); Math::BigFloat->precision(0); $x->bsqrt(); ok 2372 - Math::BigFloat->precision(-3); $x = Math::BigFloat->new(12); $x->bsqrt(); ok 2373 - A and P set => NaN ok 2374 - supplied arg overrides set global ok 2375 - @args = Math::BigFloat::objectify(2, Math::BigFloat, 4, 5); join(" ", @args); ok 2376 - Math::BigFloat->new(-1)->is_one() ok 2377 - Math::BigFloat->new(-1)->is_one("-") ok 2378 - Math::BigFloat->new(1)->bdiv("0.5")->bsstr() ok 2379 - $x = Math::BigFloat->new(3); $x -= $x; ok 2380 - $x = Math::BigFloat->new(-3); $x -= $x; ok 2381 - $x = Math::BigFloat->new(3); $x += $x; ok 2382 - $x = Math::BigFloat->new(-3); $x += $x; ok 2383 - $x = Math::BigFloat->new("NaN"); $x -= $x; ok 2384 - $x = Math::BigFloat->new("inf"); $x -= $x; ok 2385 - $x = Math::BigFloat->new("-inf"); $x -= $x; ok 2386 - $x = Math::BigFloat->new("NaN"); $x += $x; ok 2387 - $x = Math::BigFloat->new("inf"); $x += $x; ok 2388 - $x = Math::BigFloat->new("-inf"); $x += $x; ok 2389 - $x = Math::BigFloat->new("3.14"); $x -= $x; ok 2390 - $x = Math::BigFloat->new("-3.14"); $x -= $x; ok 2391 - 6.28 = Math::BigFloat->new("3.14"); 6.28 += 6.28; ok 2392 - -6.28 = Math::BigFloat->new("-3.14"); -6.28 += -6.28; ok 2393 - 9.8596 = Math::BigFloat->new("3.14"); 9.8596 *= 9.8596; ok 2394 - 9.8596 = Math::BigFloat->new("-3.14"); 9.8596 *= 9.8596; ok 2395 - 1 = Math::BigFloat->new("3.14"); 1 /= 1; ok 2396 - 1 = Math::BigFloat->new("-3.14"); 1 /= 1; ok 2397 - 0 = Math::BigFloat->new("3.14"); 0 %= 0; ok 2398 - 0 = Math::BigFloat->new("-3.14"); 0 %= 0; ok 2399 - $x = Math::BigFloat->new(0); $y = Math::BigFloat->new("0.1"); $x ** $y ok 2400 - 1 = Math::BigFloat->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 2401 - value of ((2**148)+1)/17 ok 2402 - number of digits in ((2**148)+1)/17 ok 2403 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y ok 2404 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x ok 2405 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y ok 2406 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y; $x ok 2407 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); ok 2408 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 2409 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y; $x ok t\bare_mbi.t ........... 1..3724 # BareCalc using Calc v1.999715 # Math::BigInt::BareCalc ok 1 - Math::BigInt->config()->{lib} ok 2 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("-345"); $x .= $y; ok 3 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x += $y; ok 4 - is a valid object ok 5 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x += $y; ok 6 - is a valid object ok 7 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x -= $y; ok 8 - is a valid object 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("2"); $y = Math::BigInt->new("3"); $x *= $y; ok 12 - is a valid object ok 13 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x *= $y; ok 14 - is a valid object ok 15 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x %= $y; ok 16 - is a valid object ok 17 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("9"); $x %= $y; ok 18 - is a valid object ok 19 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $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("2"); $x /= $y; ok 24 - is a valid object ok 25 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x |= $y; ok 26 - is a valid object ok 27 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x &= $y; ok 28 - is a valid object ok 29 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x ^= $y; ok 30 - is a valid object ok 31 - $x = Math::BigInt->new("NaNlog"); $y = Math::BigInt->new("2"); $x->blog($y); ok 32 - is a valid object ok 33 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("NaNlog"); $x->blog($y); ok 34 - is a valid object ok 35 - $x = Math::BigInt->new("NaNlog1"); $y = Math::BigInt->new("NaNlog"); $x->blog($y); ok 36 - is a valid object ok 37 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 38 - is a valid object ok 39 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 40 - is a valid object ok 41 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 42 - is a valid object ok 43 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 44 - is a valid object ok 45 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 46 - is a valid object ok 47 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->blog($y); ok 48 - is a valid object ok 49 - $x = Math::BigInt->new("-21"); $y = Math::BigInt->new("4"); $x->blog($y); ok 50 - is a valid object ok 51 - $x = Math::BigInt->new("21"); $y = Math::BigInt->new("-21"); $x->blog($y); ok 52 - is a valid object ok 53 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 54 - is a valid object ok 55 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 56 - is a valid object ok 57 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->blog($y); ok 58 - is a valid object ok 59 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->blog($y); ok 60 - is a valid object ok 61 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 62 - is a valid object ok 63 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 64 - is a valid object ok 65 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 66 - is a valid object ok 67 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->blog($y); ok 68 - is a valid object ok 69 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->blog($y); ok 70 - is a valid object ok 71 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->blog($y); ok 72 - is a valid object ok 73 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 74 - is a valid object ok 75 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 76 - is a valid object ok 77 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 78 - is a valid object ok 79 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->blog($y); ok 80 - is a valid object ok 81 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->blog($y); ok 82 - is a valid object ok 83 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("4"); $x->blog($y); ok 84 - is a valid object ok 85 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 86 - is a valid object ok 87 - $x = Math::BigInt->new("1024"); $y = Math::BigInt->new("2"); $x->blog($y); ok 88 - is a valid object ok 89 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("3"); $x->blog($y); ok 90 - is a valid object ok 91 - $x = Math::BigInt->new("82"); $y = Math::BigInt->new("3"); $x->blog($y); ok 92 - is a valid object ok 93 - $x = Math::BigInt->new("80"); $y = Math::BigInt->new("3"); $x->blog($y); ok 94 - is a valid object ok 95 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("2"); $x->blog($y); ok 96 - is a valid object ok 97 - $x = Math::BigInt->new("15625"); $y = Math::BigInt->new("5"); $x->blog($y); ok 98 - is a valid object ok 99 - $x = Math::BigInt->new("15626"); $y = Math::BigInt->new("5"); $x->blog($y); ok 100 - is a valid object ok 101 - $x = Math::BigInt->new("15624"); $y = Math::BigInt->new("5"); $x->blog($y); ok 102 - is a valid object ok 103 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 104 - is a valid object ok 105 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 106 - is a valid object ok 107 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 108 - is a valid object ok 109 - $x = Math::BigInt->new("1000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 110 - is a valid object ok 111 - $x = Math::BigInt->new("10000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 112 - is a valid object ok 113 - $x = Math::BigInt->new("100000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 114 - is a valid object ok 115 - $x = Math::BigInt->new("8916100448256"); $y = Math::BigInt->new("12"); $x->blog($y); ok 116 - is a valid object ok 117 - $x = Math::BigInt->new("8916100448257"); $y = Math::BigInt->new("12"); $x->blog($y); ok 118 - is a valid object ok 119 - $x = Math::BigInt->new("8916100448255"); $y = Math::BigInt->new("12"); $x->blog($y); ok 120 - is a valid object ok 121 - $x = Math::BigInt->new("2251799813685248"); $y = Math::BigInt->new("8"); $x->blog($y); ok 122 - is a valid object ok 123 - $x = Math::BigInt->new("72057594037927936"); $y = Math::BigInt->new("2"); $x->blog($y); ok 124 - is a valid object ok 125 - $x = Math::BigInt->new("144115188075855872"); $y = Math::BigInt->new("2"); $x->blog($y); ok 126 - is a valid object ok 127 - $x = Math::BigInt->new("288230376151711744"); $y = Math::BigInt->new("2"); $x->blog($y); ok 128 - is a valid object ok 129 - $x = Math::BigInt->new("576460752303423488"); $y = Math::BigInt->new("2"); $x->blog($y); ok 130 - is a valid object ok 131 - $x = Math::BigInt->new("1329227995784915872903807060280344576"); $y = Math::BigInt->new("2"); $x->blog($y); ok 132 - is a valid object ok 133 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->blog($y); ok 134 - is a valid object ok 135 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->blog($y); ok 136 - is a valid object ok 137 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->blog($y); ok 138 - is a valid object ok 139 - $x = Math::BigInt->new("0"); $x->is_negative() || 0; ok 140 - $x = Math::BigInt->new("-1"); $x->is_negative() || 0; ok 141 - $x = Math::BigInt->new("1"); $x->is_negative() || 0; ok 142 - $x = Math::BigInt->new("+inf"); $x->is_negative() || 0; ok 143 - $x = Math::BigInt->new("-inf"); $x->is_negative() || 0; ok 144 - $x = Math::BigInt->new("NaNneg"); $x->is_negative() || 0; ok 145 - $x = Math::BigInt->new("0"); $x->is_positive() || 0; ok 146 - $x = Math::BigInt->new("-1"); $x->is_positive() || 0; ok 147 - $x = Math::BigInt->new("1"); $x->is_positive() || 0; ok 148 - $x = Math::BigInt->new("+inf"); $x->is_positive() || 0; ok 149 - $x = Math::BigInt->new("-inf"); $x->is_positive() || 0; ok 150 - $x = Math::BigInt->new("NaNneg"); $x->is_positive() || 0; ok 151 - $x = Math::BigInt->new("-inf"); $x->is_int() || 0; ok 152 - $x = Math::BigInt->new("+inf"); $x->is_int() || 0; ok 153 - $x = Math::BigInt->new("NaNis_int"); $x->is_int() || 0; ok 154 - $x = Math::BigInt->new("1"); $x->is_int() || 0; ok 155 - $x = Math::BigInt->new("0"); $x->is_int() || 0; ok 156 - $x = Math::BigInt->new("123e12"); $x->is_int() || 0; ok 157 - $x = Math::BigInt->new("abc"); $x->is_odd() || 0; ok 158 - $x = Math::BigInt->new("0"); $x->is_odd() || 0; ok 159 - $x = Math::BigInt->new("1"); $x->is_odd() || 0; ok 160 - $x = Math::BigInt->new("3"); $x->is_odd() || 0; ok 161 - $x = Math::BigInt->new("-1"); $x->is_odd() || 0; ok 162 - $x = Math::BigInt->new("-3"); $x->is_odd() || 0; ok 163 - $x = Math::BigInt->new("10000001"); $x->is_odd() || 0; ok 164 - $x = Math::BigInt->new("10000002"); $x->is_odd() || 0; ok 165 - $x = Math::BigInt->new("2"); $x->is_odd() || 0; ok 166 - $x = Math::BigInt->new("120"); $x->is_odd() || 0; ok 167 - $x = Math::BigInt->new("121"); $x->is_odd() || 0; ok 168 - $x = Math::BigInt->new("abc"); $x->is_even() || 0; ok 169 - $x = Math::BigInt->new("0"); $x->is_even() || 0; ok 170 - $x = Math::BigInt->new("1"); $x->is_even() || 0; ok 171 - $x = Math::BigInt->new("3"); $x->is_even() || 0; ok 172 - $x = Math::BigInt->new("-1"); $x->is_even() || 0; ok 173 - $x = Math::BigInt->new("-3"); $x->is_even() || 0; ok 174 - $x = Math::BigInt->new("10000001"); $x->is_even() || 0; ok 175 - $x = Math::BigInt->new("10000002"); $x->is_even() || 0; ok 176 - $x = Math::BigInt->new("2"); $x->is_even() || 0; ok 177 - $x = Math::BigInt->new("120"); $x->is_even() || 0; ok 178 - $x = Math::BigInt->new("121"); $x->is_even() || 0; ok 179 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-0"); $x->bacmp($y); ok 180 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 181 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 182 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 183 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+2"); $x->bacmp($y); ok 184 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 185 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bacmp($y); ok 186 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bacmp($y); ok 187 - $x = Math::BigInt->new("+987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 188 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 189 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("+4567889"); $x->bacmp($y); ok 190 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 191 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 192 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 193 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 194 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 195 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 196 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 197 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 198 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 199 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 200 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 201 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 202 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 203 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 204 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 205 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 206 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 207 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 208 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 209 - $x = Math::BigInt->bnorm("0e999"); ok 210 - is a valid object ok 211 - $x = Math::BigInt->bnorm("0e-999"); ok 212 - is a valid object ok 213 - $x = Math::BigInt->bnorm("-0e999"); ok 214 - is a valid object ok 215 - $x = Math::BigInt->bnorm("-0e-999"); ok 216 - is a valid object ok 217 - $x = Math::BigInt->bnorm("123"); ok 218 - is a valid object ok 219 - $x = Math::BigInt->bnorm("123.000"); ok 220 - is a valid object ok 221 - $x = Math::BigInt->bnorm("123e0"); ok 222 - is a valid object ok 223 - $x = Math::BigInt->bnorm("123e+0"); ok 224 - is a valid object ok 225 - $x = Math::BigInt->bnorm("123e-0"); ok 226 - is a valid object ok 227 - $x = Math::BigInt->bnorm("123.000e0"); ok 228 - is a valid object ok 229 - $x = Math::BigInt->bnorm("123.000e+0"); ok 230 - is a valid object ok 231 - $x = Math::BigInt->bnorm("123.000e-0"); ok 232 - is a valid object ok 233 - $x = Math::BigInt->bnorm("0babc"); ok 234 - is a valid object ok 235 - $x = Math::BigInt->bnorm("0b123"); ok 236 - is a valid object ok 237 - $x = Math::BigInt->bnorm("0b0"); ok 238 - is a valid object ok 239 - $x = Math::BigInt->bnorm("-0b0"); ok 240 - is a valid object ok 241 - $x = Math::BigInt->bnorm("-0b1"); ok 242 - is a valid object ok 243 - $x = Math::BigInt->bnorm("0b0001"); ok 244 - is a valid object ok 245 - $x = Math::BigInt->bnorm("0b001"); ok 246 - is a valid object ok 247 - $x = Math::BigInt->bnorm("0b011"); ok 248 - is a valid object ok 249 - $x = Math::BigInt->bnorm("0b101"); ok 250 - is a valid object ok 251 - $x = Math::BigInt->bnorm("0b1001"); ok 252 - is a valid object ok 253 - $x = Math::BigInt->bnorm("0b10001"); ok 254 - is a valid object ok 255 - $x = Math::BigInt->bnorm("0b100001"); ok 256 - is a valid object ok 257 - $x = Math::BigInt->bnorm("0b1000001"); ok 258 - is a valid object ok 259 - $x = Math::BigInt->bnorm("0b10000001"); ok 260 - is a valid object ok 261 - $x = Math::BigInt->bnorm("0b100000001"); ok 262 - is a valid object ok 263 - $x = Math::BigInt->bnorm("0b1000000001"); ok 264 - is a valid object ok 265 - $x = Math::BigInt->bnorm("0b10000000001"); ok 266 - is a valid object ok 267 - $x = Math::BigInt->bnorm("0b100000000001"); ok 268 - is a valid object ok 269 - $x = Math::BigInt->bnorm("0b1000000000001"); ok 270 - is a valid object ok 271 - $x = Math::BigInt->bnorm("0b10000000000001"); ok 272 - is a valid object ok 273 - $x = Math::BigInt->bnorm("0b100000000000001"); ok 274 - is a valid object ok 275 - $x = Math::BigInt->bnorm("0b1000000000000001"); ok 276 - is a valid object ok 277 - $x = Math::BigInt->bnorm("0b10000000000000001"); ok 278 - is a valid object ok 279 - $x = Math::BigInt->bnorm("0b100000000000000001"); ok 280 - is a valid object ok 281 - $x = Math::BigInt->bnorm("0b1000000000000000001"); ok 282 - is a valid object ok 283 - $x = Math::BigInt->bnorm("0b10000000000000000001"); ok 284 - is a valid object ok 285 - $x = Math::BigInt->bnorm("0b100000000000000000001"); ok 286 - is a valid object ok 287 - $x = Math::BigInt->bnorm("0b1000000000000000000001"); ok 288 - is a valid object ok 289 - $x = Math::BigInt->bnorm("0b10000000000000000000001"); ok 290 - is a valid object ok 291 - $x = Math::BigInt->bnorm("0b100000000000000000000001"); ok 292 - is a valid object ok 293 - $x = Math::BigInt->bnorm("0b1000000000000000000000001"); ok 294 - is a valid object ok 295 - $x = Math::BigInt->bnorm("0b10000000000000000000000001"); ok 296 - is a valid object ok 297 - $x = Math::BigInt->bnorm("0b100000000000000000000000001"); ok 298 - is a valid object ok 299 - $x = Math::BigInt->bnorm("0b1000000000000000000000000001"); ok 300 - is a valid object ok 301 - $x = Math::BigInt->bnorm("0b10000000000000000000000000001"); ok 302 - is a valid object ok 303 - $x = Math::BigInt->bnorm("0b100000000000000000000000000001"); ok 304 - is a valid object ok 305 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000001"); ok 306 - is a valid object ok 307 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000001"); ok 308 - is a valid object ok 309 - $x = Math::BigInt->bnorm("0b100000000000000000000000000000001"); ok 310 - is a valid object ok 311 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000000001"); ok 312 - is a valid object ok 313 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000000001"); ok 314 - is a valid object ok 315 - $x = Math::BigInt->bnorm("0b__101"); ok 316 - is a valid object ok 317 - $x = Math::BigInt->bnorm("0b1_0_1"); ok 318 - is a valid object ok 319 - $x = Math::BigInt->bnorm("0b0_0_0_1"); ok 320 - is a valid object ok 321 - $x = Math::BigInt->bnorm("-0x0"); ok 322 - is a valid object ok 323 - $x = Math::BigInt->bnorm("0xabcdefgh"); ok 324 - is a valid object ok 325 - $x = Math::BigInt->bnorm("0x1234"); ok 326 - is a valid object ok 327 - $x = Math::BigInt->bnorm("0xabcdef"); ok 328 - is a valid object ok 329 - $x = Math::BigInt->bnorm("-0xABCDEF"); 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("0x12345678"); ok 334 - is a valid object ok 335 - $x = Math::BigInt->bnorm("0x1_2_3_4_56_78"); ok 336 - is a valid object ok 337 - $x = Math::BigInt->bnorm("0xa_b_c_d_e_f"); ok 338 - is a valid object ok 339 - $x = Math::BigInt->bnorm("0x__123"); ok 340 - is a valid object ok 341 - $x = Math::BigInt->bnorm("0x9"); ok 342 - is a valid object ok 343 - $x = Math::BigInt->bnorm("0x11"); ok 344 - is a valid object ok 345 - $x = Math::BigInt->bnorm("0x21"); ok 346 - is a valid object ok 347 - $x = Math::BigInt->bnorm("0x41"); ok 348 - is a valid object ok 349 - $x = Math::BigInt->bnorm("0x81"); ok 350 - is a valid object ok 351 - $x = Math::BigInt->bnorm("0x101"); ok 352 - is a valid object ok 353 - $x = Math::BigInt->bnorm("0x201"); ok 354 - is a valid object ok 355 - $x = Math::BigInt->bnorm("0x401"); ok 356 - is a valid object ok 357 - $x = Math::BigInt->bnorm("0x801"); ok 358 - is a valid object ok 359 - $x = Math::BigInt->bnorm("0x1001"); ok 360 - is a valid object ok 361 - $x = Math::BigInt->bnorm("0x2001"); ok 362 - is a valid object ok 363 - $x = Math::BigInt->bnorm("0x4001"); ok 364 - is a valid object ok 365 - $x = Math::BigInt->bnorm("0x8001"); ok 366 - is a valid object ok 367 - $x = Math::BigInt->bnorm("0x10001"); ok 368 - is a valid object ok 369 - $x = Math::BigInt->bnorm("0x20001"); ok 370 - is a valid object ok 371 - $x = Math::BigInt->bnorm("0x40001"); ok 372 - is a valid object ok 373 - $x = Math::BigInt->bnorm("0x80001"); ok 374 - is a valid object ok 375 - $x = Math::BigInt->bnorm("0x100001"); ok 376 - is a valid object ok 377 - $x = Math::BigInt->bnorm("0x200001"); ok 378 - is a valid object ok 379 - $x = Math::BigInt->bnorm("0x400001"); ok 380 - is a valid object ok 381 - $x = Math::BigInt->bnorm("0x800001"); ok 382 - is a valid object ok 383 - $x = Math::BigInt->bnorm("0x1000001"); ok 384 - is a valid object ok 385 - $x = Math::BigInt->bnorm("0x2000001"); ok 386 - is a valid object ok 387 - $x = Math::BigInt->bnorm("0x4000001"); ok 388 - is a valid object ok 389 - $x = Math::BigInt->bnorm("0x8000001"); ok 390 - is a valid object ok 391 - $x = Math::BigInt->bnorm("0x10000001"); ok 392 - is a valid object ok 393 - $x = Math::BigInt->bnorm("0x20000001"); ok 394 - is a valid object ok 395 - $x = Math::BigInt->bnorm("0x40000001"); ok 396 - is a valid object ok 397 - $x = Math::BigInt->bnorm("0x80000001"); ok 398 - is a valid object ok 399 - $x = Math::BigInt->bnorm("0x100000001"); ok 400 - is a valid object ok 401 - $x = Math::BigInt->bnorm("0x200000001"); ok 402 - is a valid object ok 403 - $x = Math::BigInt->bnorm("0x400000001"); ok 404 - is a valid object ok 405 - $x = Math::BigInt->bnorm("0x800000001"); ok 406 - is a valid object ok 407 - $x = Math::BigInt->bnorm("0x2dd59e18a125dbed30a6ab1d93e9c855569f44f75806f0645dc9a2e98b808c3"); ok 408 - is a valid object ok 409 - $x = Math::BigInt->bnorm("inf"); ok 410 - is a valid object ok 411 - $x = Math::BigInt->bnorm("+inf"); ok 412 - is a valid object ok 413 - $x = Math::BigInt->bnorm("-inf"); ok 414 - is a valid object ok 415 - $x = Math::BigInt->bnorm("0inf"); ok 416 - is a valid object ok 417 - $x = Math::BigInt->bnorm(""); ok 418 - is a valid object ok 419 - $x = Math::BigInt->bnorm("abc"); ok 420 - is a valid object ok 421 - $x = Math::BigInt->bnorm(" 1 a"); ok 422 - is a valid object ok 423 - $x = Math::BigInt->bnorm("1bcd2"); ok 424 - is a valid object ok 425 - $x = Math::BigInt->bnorm("11111b"); ok 426 - is a valid object ok 427 - $x = Math::BigInt->bnorm("+1z"); ok 428 - is a valid object ok 429 - $x = Math::BigInt->bnorm("-1z"); ok 430 - is a valid object ok 431 - $x = Math::BigInt->bnorm("_123"); ok 432 - is a valid object ok 433 - $x = Math::BigInt->bnorm("_123_"); ok 434 - is a valid object ok 435 - $x = Math::BigInt->bnorm("123_"); ok 436 - is a valid object ok 437 - $x = Math::BigInt->bnorm("1__23"); ok 438 - is a valid object ok 439 - $x = Math::BigInt->bnorm("1E1__2"); ok 440 - is a valid object ok 441 - $x = Math::BigInt->bnorm("1_E12"); ok 442 - is a valid object ok 443 - $x = Math::BigInt->bnorm("1E_12"); ok 444 - is a valid object ok 445 - $x = Math::BigInt->bnorm("1_E_12"); ok 446 - is a valid object ok 447 - $x = Math::BigInt->bnorm("+_1E12"); ok 448 - is a valid object ok 449 - $x = Math::BigInt->bnorm("+0_1E2"); ok 450 - is a valid object ok 451 - $x = Math::BigInt->bnorm("+0_0_1E2"); ok 452 - is a valid object ok 453 - $x = Math::BigInt->bnorm("-0_0_1E2"); ok 454 - is a valid object ok 455 - $x = Math::BigInt->bnorm("-0_0_1E+0_0_2"); ok 456 - is a valid object ok 457 - $x = Math::BigInt->bnorm("E1"); ok 458 - is a valid object ok 459 - $x = Math::BigInt->bnorm("E23"); ok 460 - is a valid object ok 461 - $x = Math::BigInt->bnorm("1.23E1"); ok 462 - is a valid object ok 463 - $x = Math::BigInt->bnorm("1.23E-1"); ok 464 - is a valid object ok 465 - $x = Math::BigInt->bnorm("1e2e3"); ok 466 - is a valid object ok 467 - $x = Math::BigInt->bnorm("1e2r"); ok 468 - is a valid object ok 469 - $x = Math::BigInt->bnorm("1e2.0"); ok 470 - is a valid object ok 471 - $x = Math::BigInt->bnorm("1.2.2"); ok 472 - is a valid object ok 473 - $x = Math::BigInt->bnorm("1.2.3e1"); ok 474 - is a valid object ok 475 - $x = Math::BigInt->bnorm("-1.2.3"); ok 476 - is a valid object ok 477 - $x = Math::BigInt->bnorm("-1.2.3e-4"); ok 478 - is a valid object ok 479 - $x = Math::BigInt->bnorm("1.2e3.4"); ok 480 - is a valid object ok 481 - $x = Math::BigInt->bnorm("1.2e-3.4"); ok 482 - is a valid object ok 483 - $x = Math::BigInt->bnorm("1.2.3.4"); ok 484 - is a valid object ok 485 - $x = Math::BigInt->bnorm("1.2.t"); ok 486 - is a valid object ok 487 - $x = Math::BigInt->bnorm("1..2"); ok 488 - is a valid object ok 489 - $x = Math::BigInt->bnorm("1..2e1"); ok 490 - is a valid object ok 491 - $x = Math::BigInt->bnorm("1..2e1..1"); ok 492 - is a valid object ok 493 - $x = Math::BigInt->bnorm("12e1..1"); ok 494 - is a valid object ok 495 - $x = Math::BigInt->bnorm("..2"); ok 496 - is a valid object ok 497 - $x = Math::BigInt->bnorm(".-2"); ok 498 - is a valid object ok 499 - $x = Math::BigInt->bnorm("012"); ok 500 - is a valid object ok 501 - $x = Math::BigInt->bnorm("0123"); ok 502 - is a valid object ok 503 - $x = Math::BigInt->bnorm("01234"); ok 504 - is a valid object ok 505 - $x = Math::BigInt->bnorm("012345"); ok 506 - is a valid object ok 507 - $x = Math::BigInt->bnorm("0123456"); ok 508 - is a valid object ok 509 - $x = Math::BigInt->bnorm("01234567"); ok 510 - is a valid object ok 511 - $x = Math::BigInt->bnorm("012345678"); ok 512 - is a valid object ok 513 - $x = Math::BigInt->bnorm("0123456789"); ok 514 - is a valid object ok 515 - $x = Math::BigInt->bnorm("01234567891"); ok 516 - is a valid object ok 517 - $x = Math::BigInt->bnorm("012345678912"); ok 518 - is a valid object ok 519 - $x = Math::BigInt->bnorm("0123456789123"); ok 520 - is a valid object ok 521 - $x = Math::BigInt->bnorm("01234567891234"); ok 522 - is a valid object ok 523 - $x = Math::BigInt->bnorm("0e0"); ok 524 - is a valid object ok 525 - $x = Math::BigInt->bnorm("+0e0"); ok 526 - is a valid object ok 527 - $x = Math::BigInt->bnorm("+0e+0"); ok 528 - is a valid object ok 529 - $x = Math::BigInt->bnorm("-0e+0"); ok 530 - is a valid object ok 531 - $x = Math::BigInt->bnorm("0e-0"); 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("000"); ok 538 - is a valid object ok 539 - $x = Math::BigInt->bnorm("00e2"); ok 540 - is a valid object ok 541 - $x = Math::BigInt->bnorm("00e02"); ok 542 - is a valid object ok 543 - $x = Math::BigInt->bnorm("000e002"); ok 544 - is a valid object ok 545 - $x = Math::BigInt->bnorm("000e1230"); ok 546 - is a valid object ok 547 - $x = Math::BigInt->bnorm("00e-3"); ok 548 - is a valid object ok 549 - $x = Math::BigInt->bnorm("00e+3"); ok 550 - is a valid object ok 551 - $x = Math::BigInt->bnorm("00e-03"); ok 552 - is a valid object ok 553 - $x = Math::BigInt->bnorm("00e+03"); ok 554 - is a valid object ok 555 - $x = Math::BigInt->bnorm("-000"); ok 556 - is a valid object ok 557 - $x = Math::BigInt->bnorm("-00e2"); ok 558 - is a valid object ok 559 - $x = Math::BigInt->bnorm("-00e02"); ok 560 - is a valid object ok 561 - $x = Math::BigInt->bnorm("-000e002"); ok 562 - is a valid object ok 563 - $x = Math::BigInt->bnorm("-000e1230"); ok 564 - is a valid object ok 565 - $x = Math::BigInt->bnorm("-00e-3"); ok 566 - is a valid object ok 567 - $x = Math::BigInt->bnorm("-00e+3"); ok 568 - is a valid object ok 569 - $x = Math::BigInt->bnorm("-00e-03"); ok 570 - is a valid object ok 571 - $x = Math::BigInt->bnorm("-00e+03"); ok 572 - is a valid object ok 573 - $x = Math::BigInt->bnorm("0"); ok 574 - is a valid object ok 575 - $x = Math::BigInt->bnorm("+0"); ok 576 - is a valid object ok 577 - $x = Math::BigInt->bnorm("+00"); ok 578 - is a valid object ok 579 - $x = Math::BigInt->bnorm("+000"); ok 580 - is a valid object ok 581 - $x = Math::BigInt->bnorm("000000000000000000"); ok 582 - is a valid object ok 583 - $x = Math::BigInt->bnorm("-0"); ok 584 - is a valid object ok 585 - $x = Math::BigInt->bnorm("-0000"); ok 586 - is a valid object ok 587 - $x = Math::BigInt->bnorm("+1"); ok 588 - is a valid object ok 589 - $x = Math::BigInt->bnorm("+01"); ok 590 - is a valid object ok 591 - $x = Math::BigInt->bnorm("+001"); ok 592 - is a valid object ok 593 - $x = Math::BigInt->bnorm("+00000100000"); ok 594 - is a valid object ok 595 - $x = Math::BigInt->bnorm("123456789"); ok 596 - is a valid object ok 597 - $x = Math::BigInt->bnorm("-1"); ok 598 - is a valid object ok 599 - $x = Math::BigInt->bnorm("-01"); ok 600 - is a valid object ok 601 - $x = Math::BigInt->bnorm("-001"); ok 602 - is a valid object ok 603 - $x = Math::BigInt->bnorm("-123456789"); ok 604 - is a valid object ok 605 - $x = Math::BigInt->bnorm("-00000100000"); ok 606 - is a valid object ok 607 - $x = Math::BigInt->bnorm("1_2_3"); ok 608 - is a valid object ok 609 - $x = Math::BigInt->bnorm("10000000000E-1_0"); ok 610 - is a valid object ok 611 - $x = Math::BigInt->bnorm("1E2"); ok 612 - is a valid object ok 613 - $x = Math::BigInt->bnorm("1E1"); ok 614 - is a valid object ok 615 - $x = Math::BigInt->bnorm("1E0"); ok 616 - is a valid object ok 617 - $x = Math::BigInt->bnorm("1.23E2"); ok 618 - is a valid object ok 619 - $x = Math::BigInt->bnorm("100E-1"); ok 620 - is a valid object ok 621 - $x = Math::BigInt->bnorm("1.E3"); ok 622 - is a valid object ok 623 - $x = Math::BigInt->bnorm("1.01E2"); ok 624 - is a valid object ok 625 - $x = Math::BigInt->bnorm("1010E-1"); ok 626 - is a valid object ok 627 - $x = Math::BigInt->bnorm("-1010E0"); ok 628 - is a valid object ok 629 - $x = Math::BigInt->bnorm("-1010E1"); ok 630 - is a valid object ok 631 - $x = Math::BigInt->bnorm("1234.00"); ok 632 - is a valid object ok 633 - $x = Math::BigInt->bnorm("-1010E-2"); ok 634 - is a valid object ok 635 - $x = Math::BigInt->bnorm("-1.01E+1"); ok 636 - is a valid object ok 637 - $x = Math::BigInt->bnorm("-1.01E-1"); ok 638 - is a valid object ok 639 - $x = Math::BigInt->bnorm("1E-999999"); ok 640 - is a valid object ok 641 - $x = Math::BigInt->bnorm("0.5"); ok 642 - is a valid object ok 643 - $x = Math::BigInt->new("1"); $x->bnan(); ok 644 - is a valid object ok 645 - $x = Math::BigInt->new("2"); $x->bnan(); ok 646 - is a valid object ok 647 - $x = Math::BigInt->new("abc"); $x->bnan(); ok 648 - is a valid object ok 649 - $x = Math::BigInt->new("2"); $x->bone("+"); ok 650 - is a valid object ok 651 - $x = Math::BigInt->new("2"); $x->bone("-"); ok 652 - is a valid object ok 653 - $x = Math::BigInt->new("boneNaN"); $x->bone("-"); ok 654 - is a valid object ok 655 - $x = Math::BigInt->new("boneNaN"); $x->bone("+"); ok 656 - is a valid object ok 657 - $x = Math::BigInt->new("2"); $x->bone("abc"); ok 658 - is a valid object ok 659 - $x = Math::BigInt->new("3"); $x->bone(""); ok 660 - is a valid object ok 661 - $x = Math::BigInt->new("1"); $x->binf("+"); ok 662 - is a valid object ok 663 - $x = Math::BigInt->new("2"); $x->binf("-"); ok 664 - is a valid object ok 665 - $x = Math::BigInt->new("3"); $x->binf("abc"); ok 666 - is a valid object ok 667 - $x = Math::BigInt->new("123"); $x->is_nan() || 0; ok 668 - $x = Math::BigInt->new("abc"); $x->is_nan() || 0; ok 669 - $x = Math::BigInt->new("NaN"); $x->is_nan() || 0; ok 670 - $x = Math::BigInt->new("-123"); $x->is_nan() || 0; ok 671 - $x = Math::BigInt->new("+inf"); $x->is_inf(""); ok 672 - $x = Math::BigInt->new("-inf"); $x->is_inf(""); ok 673 - $x = Math::BigInt->new("abc"); $x->is_inf(""); ok 674 - $x = Math::BigInt->new("1"); $x->is_inf(""); ok 675 - $x = Math::BigInt->new("NaN"); $x->is_inf(""); ok 676 - $x = Math::BigInt->new("-1"); $x->is_inf(""); 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("-inf"); $x->is_inf("-"); ok 680 - $x = Math::BigInt->new("-inf"); $x->is_inf("+"); ok 681 - $x = Math::BigInt->new("-inf"); $x->is_inf("-inf"); ok 682 - $x = Math::BigInt->new("-inf"); $x->is_inf("+inf"); ok 683 - $x = Math::BigInt->new("+inf"); $x->is_inf("-inf"); ok 684 - $x = Math::BigInt->new("+inf"); $x->is_inf("+inf"); ok 685 - $x = Math::BigInt->new("+iNfInItY"); $x->is_inf(""); ok 686 - $x = Math::BigInt->new("-InFiNiTy"); $x->is_inf(""); ok 687 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x << $y; ok 688 - is a valid object ok 689 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+2"); $x << $y; ok 690 - is a valid object ok 691 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+32"); $x << $y; ok 692 - is a valid object ok 693 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+48"); $x << $y; ok 694 - is a valid object ok 695 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("-2"); $x << $y; ok 696 - is a valid object ok 697 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("4"); $x->blsft($y, 10); ok 698 - is a valid object ok 699 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 700 - is a valid object ok 701 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 702 - is a valid object ok 703 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 704 - is a valid object ok 705 - $x = Math::BigInt->new("+12"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 706 - is a valid object ok 707 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->blsft($y, 10); ok 708 - is a valid object ok 709 - $x = Math::BigInt->new("1234567890123"); $y = Math::BigInt->new("12"); $x->blsft($y, 10); ok 710 - is a valid object ok 711 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 712 - is a valid object ok 713 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 714 - is a valid object ok 715 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 716 - is a valid object ok 717 - $x = Math::BigInt->new("-102533203"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 718 - is a valid object ok 719 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x >> $y; ok 720 - is a valid object ok 721 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x >> $y; ok 722 - is a valid object ok 723 - $x = Math::BigInt->new("+4294967296"); $y = Math::BigInt->new("+32"); $x >> $y; ok 724 - is a valid object ok 725 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+48"); $x >> $y; ok 726 - is a valid object ok 727 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-2"); $x >> $y; ok 728 - is a valid object ok 729 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 730 - is a valid object ok 731 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 732 - is a valid object ok 733 - $x = Math::BigInt->new("+200"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 734 - is a valid object ok 735 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("3"); $x->brsft($y, 10); ok 736 - is a valid object ok 737 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 738 - is a valid object ok 739 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->brsft($y, 10); ok 740 - is a valid object ok 741 - $x = Math::BigInt->new("310000"); $y = Math::BigInt->new("4"); $x->brsft($y, 10); ok 742 - is a valid object ok 743 - $x = Math::BigInt->new("12300000"); $y = Math::BigInt->new("5"); $x->brsft($y, 10); ok 744 - is a valid object ok 745 - $x = Math::BigInt->new("1230000000000"); $y = Math::BigInt->new("10"); $x->brsft($y, 10); ok 746 - is a valid object ok 747 - $x = Math::BigInt->new("09876123456789067890"); $y = Math::BigInt->new("12"); $x->brsft($y, 10); ok 748 - is a valid object ok 749 - $x = Math::BigInt->new("1234561234567890123"); $y = Math::BigInt->new("13"); $x->brsft($y, 10); ok 750 - is a valid object ok 751 - $x = Math::BigInt->new("820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 752 - is a valid object ok 753 - $x = Math::BigInt->new("-15"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 754 - is a valid object ok 755 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 756 - is a valid object ok 757 - $x = Math::BigInt->new("-13"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 758 - is a valid object ok 759 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 760 - is a valid object ok 761 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 762 - is a valid object ok 763 - $x = Math::BigInt->new("-10"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 764 - is a valid object ok 765 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 766 - is a valid object ok 767 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 768 - is a valid object ok 769 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 770 - is a valid object ok 771 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 772 - is a valid object ok 773 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 774 - is a valid object ok 775 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 776 - is a valid object ok 777 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 778 - is a valid object ok 779 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 780 - is a valid object ok 781 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 782 - is a valid object ok 783 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("2"); $x->brsft($y, 2); ok 784 - is a valid object ok 785 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 786 - is a valid object ok 787 - $x = Math::BigInt->new("-820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 788 - is a valid object ok 789 - $x = Math::BigInt->new("-205066405"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 790 - is a valid object ok 791 - $x = Math::BigInt->new("+inf"); $x->bsstr(); ok 792 - $x = Math::BigInt->new("-inf"); $x->bsstr(); ok 793 - $x = Math::BigInt->new("1e+34"); $x->bsstr(); ok 794 - $x = Math::BigInt->new("123.456E3"); $x->bsstr(); ok 795 - $x = Math::BigInt->new("100"); $x->bsstr(); ok 796 - $x = Math::BigInt->new("bsstrabc"); $x->bsstr(); ok 797 - $x = Math::BigInt->new("-5"); $x->bsstr(); ok 798 - $x = Math::BigInt->new("-100"); $x->bsstr(); ok 799 - $x = Math::BigInt->new("5"); $x->numify(); ok 800 - $x = Math::BigInt->new("-5"); $x->numify(); ok 801 - $x = Math::BigInt->new("100"); $x->numify(); ok 802 - $x = Math::BigInt->new("-100"); $x->numify(); ok 803 - $x = Math::BigInt->new("bnegNaN"); $x->bneg(); ok 804 - is a valid object ok 805 - $x = Math::BigInt->new("+inf"); $x->bneg(); ok 806 - is a valid object ok 807 - $x = Math::BigInt->new("-inf"); $x->bneg(); ok 808 - is a valid object ok 809 - $x = Math::BigInt->new("abd"); $x->bneg(); ok 810 - is a valid object ok 811 - $x = Math::BigInt->new("0"); $x->bneg(); ok 812 - is a valid object ok 813 - $x = Math::BigInt->new("1"); $x->bneg(); ok 814 - is a valid object ok 815 - $x = Math::BigInt->new("-1"); $x->bneg(); ok 816 - is a valid object ok 817 - $x = Math::BigInt->new("+123456789"); $x->bneg(); ok 818 - is a valid object ok 819 - $x = Math::BigInt->new("-123456789"); $x->bneg(); ok 820 - is a valid object ok 821 - $x = Math::BigInt->new("babsNaN"); $x->babs(); ok 822 - is a valid object ok 823 - $x = Math::BigInt->new("+inf"); $x->babs(); ok 824 - is a valid object ok 825 - $x = Math::BigInt->new("-inf"); $x->babs(); ok 826 - is a valid object ok 827 - $x = Math::BigInt->new("0"); $x->babs(); ok 828 - is a valid object ok 829 - $x = Math::BigInt->new("1"); $x->babs(); ok 830 - is a valid object ok 831 - $x = Math::BigInt->new("-1"); $x->babs(); ok 832 - is a valid object ok 833 - $x = Math::BigInt->new("+123456789"); $x->babs(); ok 834 - is a valid object ok 835 - $x = Math::BigInt->new("-123456789"); $x->babs(); ok 836 - is a valid object ok 837 - $x = Math::BigInt->new("NaN"); $x->bsgn(); ok 838 - is a valid object ok 839 - $x = Math::BigInt->new("+inf"); $x->bsgn(); ok 840 - is a valid object ok 841 - $x = Math::BigInt->new("-inf"); $x->bsgn(); ok 842 - is a valid object ok 843 - $x = Math::BigInt->new("0"); $x->bsgn(); ok 844 - is a valid object ok 845 - $x = Math::BigInt->new("+123456789"); $x->bsgn(); ok 846 - is a valid object ok 847 - $x = Math::BigInt->new("-123456789"); $x->bsgn(); ok 848 - is a valid object ok 849 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 850 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 851 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 852 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 853 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 854 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 855 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 856 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 857 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 858 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 859 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 860 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 861 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 862 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("12"); $x->bcmp($y); ok 863 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 864 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 865 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-12"); $x->bcmp($y); ok 866 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 867 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("124"); $x->bcmp($y); ok 868 - $x = Math::BigInt->new("124"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 869 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-124"); $x->bcmp($y); ok 870 - $x = Math::BigInt->new("-124"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 871 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("5"); $x->bcmp($y); ok 872 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->bcmp($y); ok 873 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bcmp($y); ok 874 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("123456789"); $x->bcmp($y); ok 875 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 876 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 877 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 878 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 879 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 880 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 881 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 882 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 883 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 884 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 885 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 886 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 887 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 888 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 889 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 890 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 891 - $x = Math::BigInt->new("abc"); $x->binc(); ok 892 - is a valid object ok 893 - $x = Math::BigInt->new("+inf"); $x->binc(); ok 894 - is a valid object ok 895 - $x = Math::BigInt->new("-inf"); $x->binc(); ok 896 - is a valid object ok 897 - $x = Math::BigInt->new("+0"); $x->binc(); ok 898 - is a valid object ok 899 - $x = Math::BigInt->new("+1"); $x->binc(); ok 900 - is a valid object ok 901 - $x = Math::BigInt->new("-1"); $x->binc(); ok 902 - is a valid object ok 903 - $x = Math::BigInt->new("abc"); $x->bdec(); ok 904 - is a valid object ok 905 - $x = Math::BigInt->new("+inf"); $x->bdec(); ok 906 - is a valid object ok 907 - $x = Math::BigInt->new("-inf"); $x->bdec(); ok 908 - is a valid object ok 909 - $x = Math::BigInt->new("+0"); $x->bdec(); ok 910 - is a valid object ok 911 - $x = Math::BigInt->new("+1"); $x->bdec(); ok 912 - is a valid object ok 913 - $x = Math::BigInt->new("-1"); $x->bdec(); ok 914 - is a valid object ok 915 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x + $y; ok 916 - is a valid object ok 917 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x + $y; ok 918 - is a valid object ok 919 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x + $y; ok 920 - is a valid object ok 921 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x + $y; ok 922 - is a valid object ok 923 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x + $y; ok 924 - is a valid object ok 925 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x + $y; ok 926 - is a valid object ok 927 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x + $y; ok 928 - is a valid object ok 929 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x + $y; ok 930 - is a valid object ok 931 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x + $y; ok 932 - is a valid object ok 933 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("baddNaN"); $x + $y; ok 934 - is a valid object ok 935 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("baddNaN"); $x + $y; ok 936 - is a valid object ok 937 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x + $y; ok 938 - is a valid object ok 939 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x + $y; ok 940 - is a valid object ok 941 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x + $y; ok 942 - is a valid object ok 943 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x + $y; ok 944 - is a valid object ok 945 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x + $y; ok 946 - is a valid object ok 947 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x + $y; ok 948 - is a valid object ok 949 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x + $y; ok 950 - is a valid object ok 951 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x + $y; ok 952 - is a valid object ok 953 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x + $y; ok 954 - is a valid object ok 955 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x + $y; ok 956 - is a valid object ok 957 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x + $y; ok 958 - is a valid object ok 959 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x + $y; ok 960 - is a valid object ok 961 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x + $y; ok 962 - is a valid object ok 963 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x + $y; ok 964 - is a valid object ok 965 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 966 - is a valid object ok 967 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 968 - is a valid object ok 969 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 970 - is a valid object ok 971 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 972 - is a valid object ok 973 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 974 - is a valid object ok 975 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 976 - is a valid object ok 977 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x + $y; ok 978 - is a valid object ok 979 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x + $y; ok 980 - is a valid object ok 981 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x + $y; ok 982 - is a valid object ok 983 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x + $y; ok 984 - is a valid object ok 985 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x + $y; ok 986 - is a valid object ok 987 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 988 - is a valid object ok 989 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 990 - is a valid object ok 991 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 992 - is a valid object ok 993 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 994 - is a valid object ok 995 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 996 - is a valid object ok 997 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("987654321"); $x + $y; ok 998 - is a valid object ok 999 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x + $y; ok 1000 - is a valid object ok 1001 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x + $y; ok 1002 - is a valid object ok 1003 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x + $y; ok 1004 - is a valid object ok 1005 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10001"); $x + $y; ok 1006 - is a valid object ok 1007 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100001"); $x + $y; ok 1008 - is a valid object ok 1009 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000001"); $x + $y; ok 1010 - is a valid object ok 1011 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000001"); $x + $y; ok 1012 - is a valid object ok 1013 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000001"); $x + $y; ok 1014 - is a valid object ok 1015 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000001"); $x + $y; ok 1016 - is a valid object ok 1017 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000001"); $x + $y; ok 1018 - is a valid object ok 1019 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000000001"); $x + $y; ok 1020 - is a valid object ok 1021 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000000001"); $x + $y; ok 1022 - is a valid object ok 1023 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000000001"); $x + $y; ok 1024 - is a valid object ok 1025 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10001"); $x + $y; ok 1026 - is a valid object ok 1027 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100001"); $x + $y; ok 1028 - is a valid object ok 1029 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000001"); $x + $y; ok 1030 - is a valid object ok 1031 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000001"); $x + $y; ok 1032 - is a valid object ok 1033 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000001"); $x + $y; ok 1034 - is a valid object ok 1035 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000001"); $x + $y; ok 1036 - is a valid object ok 1037 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000001"); $x + $y; ok 1038 - is a valid object ok 1039 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000000001"); $x + $y; ok 1040 - is a valid object ok 1041 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000000001"); $x + $y; ok 1042 - is a valid object ok 1043 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000000001"); $x + $y; ok 1044 - is a valid object ok 1045 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x - $y; ok 1046 - is a valid object ok 1047 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x - $y; ok 1048 - is a valid object ok 1049 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x - $y; ok 1050 - is a valid object ok 1051 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x - $y; ok 1052 - is a valid object ok 1053 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x - $y; ok 1054 - is a valid object ok 1055 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x - $y; ok 1056 - is a valid object ok 1057 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x - $y; ok 1058 - is a valid object ok 1059 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x - $y; ok 1060 - is a valid object ok 1061 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x - $y; ok 1062 - is a valid object ok 1063 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x - $y; ok 1064 - is a valid object ok 1065 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x - $y; ok 1066 - is a valid object ok 1067 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x - $y; ok 1068 - is a valid object ok 1069 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x - $y; ok 1070 - is a valid object ok 1071 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x - $y; ok 1072 - is a valid object ok 1073 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x - $y; ok 1074 - is a valid object ok 1075 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x - $y; ok 1076 - is a valid object ok 1077 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x - $y; ok 1078 - is a valid object ok 1079 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x - $y; ok 1080 - is a valid object ok 1081 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1082 - is a valid object ok 1083 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1084 - is a valid object ok 1085 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1086 - is a valid object ok 1087 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1088 - is a valid object ok 1089 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1090 - is a valid object ok 1091 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1092 - is a valid object ok 1093 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1094 - is a valid object ok 1095 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1096 - is a valid object ok 1097 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1098 - is a valid object ok 1099 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x - $y; ok 1100 - is a valid object ok 1101 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x - $y; ok 1102 - is a valid object ok 1103 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1104 - is a valid object ok 1105 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1106 - is a valid object ok 1107 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1108 - is a valid object ok 1109 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1110 - is a valid object ok 1111 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1112 - is a valid object ok 1113 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1114 - is a valid object ok 1115 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1116 - is a valid object ok 1117 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1118 - is a valid object ok 1119 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("+987654321"); $x - $y; ok 1120 - is a valid object ok 1121 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x - $y; ok 1122 - is a valid object ok 1123 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x - $y; ok 1124 - is a valid object ok 1125 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x - $y; ok 1126 - is a valid object ok 1127 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("1"); $x - $y; ok 1128 - is a valid object ok 1129 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("1"); $x - $y; ok 1130 - is a valid object ok 1131 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1132 - is a valid object ok 1133 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1134 - is a valid object ok 1135 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1136 - is a valid object ok 1137 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1138 - is a valid object ok 1139 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1140 - is a valid object ok 1141 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1142 - is a valid object ok 1143 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1144 - is a valid object ok 1145 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1146 - is a valid object ok 1147 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1148 - is a valid object ok 1149 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1150 - is a valid object ok 1151 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1152 - is a valid object ok 1153 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1154 - is a valid object ok 1155 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1156 - is a valid object ok 1157 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1158 - is a valid object ok 1159 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1160 - is a valid object ok 1161 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1162 - is a valid object ok 1163 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1164 - is a valid object ok 1165 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1166 - is a valid object ok 1167 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1168 - is a valid object ok 1169 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1170 - is a valid object ok 1171 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1172 - is a valid object ok 1173 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("abc"); $x->bmuladd($y, $z); ok 1174 - is a valid object ok 1175 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1176 - is a valid object ok 1177 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1178 - is a valid object ok 1179 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaNmul"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1180 - is a valid object ok 1181 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaNmul"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1182 - is a valid object ok 1183 - $x = Math::BigInt->new("+inf"); $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("-inf"); $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("+inf"); $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("+0"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1192 - is a valid object ok 1193 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1194 - is a valid object ok 1195 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $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("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1198 - is a valid object ok 1199 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1200 - is a valid object ok 1201 - $x = Math::BigInt->new("123456789123456789"); $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("123456789123456789"); $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("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1206 - is a valid object ok 1207 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1208 - is a valid object ok 1209 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $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("+2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1216 - is a valid object ok 1217 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1218 - is a valid object ok 1219 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $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("111"); $y = Math::BigInt->new("111"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1224 - is a valid object ok 1225 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1226 - is a valid object ok 1227 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1228 - is a valid object ok 1229 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1230 - is a valid object ok 1231 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1232 - is a valid object ok 1233 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1234 - is a valid object ok 1235 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1236 - is a valid object ok 1237 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1238 - is a valid object ok 1239 - $x = Math::BigInt->new("44444444444"); $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("55555555555"); $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("66666666666"); $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("77777777777"); $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("88888888888"); $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("99999999999"); $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("11111111111"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1252 - is a valid object ok 1253 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1254 - is a valid object ok 1255 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1256 - is a valid object ok 1257 - $x = Math::BigInt->new("44444444444"); $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("55555555555"); $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("66666666666"); $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("77777777777"); $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("88888888888"); $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("99999999999"); $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("-3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1270 - is a valid object ok 1271 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1272 - is a valid object ok 1273 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("-5"); $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("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $z = Math::BigInt->new("1234567890"); $x->bmuladd($y, $z); ok 1282 - is a valid object ok 1283 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("12345678901234567890"); $x->bmuladd($y, $z); ok 1284 - is a valid object ok 1285 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x * $y; ok 1286 - is a valid object ok 1287 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x * $y; ok 1288 - is a valid object ok 1289 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x * $y; ok 1290 - is a valid object ok 1291 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("+inf"); $x * $y; ok 1292 - is a valid object ok 1293 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("-inf"); $x * $y; ok 1294 - is a valid object ok 1295 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaNmul"); $x * $y; ok 1296 - is a valid object ok 1297 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaNmul"); $x * $y; ok 1298 - is a valid object ok 1299 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x * $y; ok 1300 - is a valid object ok 1301 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x * $y; ok 1302 - is a valid object ok 1303 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x * $y; ok 1304 - is a valid object ok 1305 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x * $y; ok 1306 - is a valid object ok 1307 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x * $y; ok 1308 - is a valid object ok 1309 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x * $y; ok 1310 - is a valid object ok 1311 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x * $y; ok 1312 - is a valid object ok 1313 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x * $y; ok 1314 - is a valid object ok 1315 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x * $y; ok 1316 - is a valid object ok 1317 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $x * $y; ok 1318 - is a valid object ok 1319 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $x * $y; ok 1320 - is a valid object ok 1321 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x * $y; ok 1322 - is a valid object ok 1323 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x * $y; ok 1324 - is a valid object ok 1325 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x * $y; ok 1326 - is a valid object ok 1327 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x * $y; ok 1328 - is a valid object ok 1329 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $x * $y; ok 1330 - is a valid object ok 1331 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $x * $y; ok 1332 - is a valid object ok 1333 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $x * $y; ok 1334 - is a valid object ok 1335 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x * $y; ok 1336 - is a valid object ok 1337 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $x * $y; ok 1338 - is a valid object ok 1339 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $x * $y; ok 1340 - is a valid object ok 1341 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $x * $y; ok 1342 - is a valid object ok 1343 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $x * $y; ok 1344 - is a valid object ok 1345 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $x * $y; ok 1346 - is a valid object ok 1347 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $x * $y; ok 1348 - is a valid object ok 1349 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $x * $y; ok 1350 - is a valid object ok 1351 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $x * $y; ok 1352 - is a valid object ok 1353 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $x * $y; ok 1354 - is a valid object ok 1355 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $x * $y; ok 1356 - is a valid object ok 1357 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $x * $y; ok 1358 - is a valid object ok 1359 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $x * $y; ok 1360 - is a valid object ok 1361 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $x * $y; ok 1362 - is a valid object ok 1363 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $x * $y; ok 1364 - is a valid object ok 1365 - $x = Math::BigInt->new("+25"); $y = Math::BigInt->new("+25"); $x * $y; ok 1366 - is a valid object ok 1367 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("+12345"); $x * $y; ok 1368 - is a valid object ok 1369 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+11111"); $x * $y; ok 1370 - is a valid object ok 1371 - $x = Math::BigInt->new("9999"); $y = Math::BigInt->new("10000"); $x * $y; ok 1372 - is a valid object ok 1373 - $x = Math::BigInt->new("99999"); $y = Math::BigInt->new("100000"); $x * $y; ok 1374 - is a valid object ok 1375 - $x = Math::BigInt->new("999999"); $y = Math::BigInt->new("1000000"); $x * $y; ok 1376 - is a valid object ok 1377 - $x = Math::BigInt->new("9999999"); $y = Math::BigInt->new("10000000"); $x * $y; ok 1378 - is a valid object ok 1379 - $x = Math::BigInt->new("99999999"); $y = Math::BigInt->new("100000000"); $x * $y; ok 1380 - is a valid object ok 1381 - $x = Math::BigInt->new("999999999"); $y = Math::BigInt->new("1000000000"); $x * $y; ok 1382 - is a valid object ok 1383 - $x = Math::BigInt->new("9999999999"); $y = Math::BigInt->new("10000000000"); $x * $y; ok 1384 - is a valid object ok 1385 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("100000000000"); $x * $y; ok 1386 - is a valid object ok 1387 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("1000000000000"); $x * $y; ok 1388 - is a valid object ok 1389 - $x = Math::BigInt->new("9999999999999"); $y = Math::BigInt->new("10000000000000"); $x * $y; ok 1390 - is a valid object ok 1391 - $x = Math::BigInt->new("99999999999999"); $y = Math::BigInt->new("100000000000000"); $x * $y; ok 1392 - is a valid object ok 1393 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("1000000000000000"); $x * $y; ok 1394 - is a valid object ok 1395 - $x = Math::BigInt->new("9999999999999999"); $y = Math::BigInt->new("10000000000000000"); $x * $y; ok 1396 - is a valid object ok 1397 - $x = Math::BigInt->new("99999999999999999"); $y = Math::BigInt->new("100000000000000000"); $x * $y; ok 1398 - is a valid object ok 1399 - $x = Math::BigInt->new("999999999999999999"); $y = Math::BigInt->new("1000000000000000000"); $x * $y; ok 1400 - is a valid object ok 1401 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $x * $y; ok 1402 - is a valid object ok 1403 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("20"); join (",", $x->bdiv($y)); ok 1404 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); join (",", $x->bdiv($y)); ok 1405 - $x = Math::BigInt->new("-4095"); $y = Math::BigInt->new("-4095"); join (",", $x->bdiv($y)); ok 1406 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("-4095"); join (",", $x->bdiv($y)); ok 1407 - $x = Math::BigInt->new("-4095"); $y = Math::BigInt->new("4095"); join (",", $x->bdiv($y)); ok 1408 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1409 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1410 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("4"); join (",", $x->bdiv($y)); ok 1411 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("8"); join (",", $x->bdiv($y)); ok 1412 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("8"); join (",", $x->bdiv($y)); ok 1413 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1414 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1415 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1416 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1417 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1418 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1419 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1420 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1421 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1422 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1423 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1424 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1425 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1426 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1427 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1428 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1429 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1430 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1431 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1432 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1433 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1434 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1435 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1436 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1437 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); join (",", $x->bdiv($y)); ok 1438 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); join (",", $x->bdiv($y)); ok 1439 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); join (",", $x->bdiv($y)); ok 1440 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); join (",", $x->bdiv($y)); ok 1441 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); join (",", $x->bdiv($y)); ok 1442 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); join (",", $x->bdiv($y)); ok 1443 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); join (",", $x->bdiv($y)); ok 1444 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); join (",", $x->bdiv($y)); ok 1445 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); join (",", $x->bdiv($y)); ok 1446 - $x = Math::BigInt->new("1267650600228229401496703205375"); $y = Math::BigInt->new("1267650600228229401496703205376"); join (",", $x->bdiv($y)); ok 1447 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); join (",", $x->bdiv($y)); ok 1448 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); join (",", $x->bdiv($y)); ok 1449 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); join (",", $x->bdiv($y)); ok 1450 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); join (",", $x->bdiv($y)); ok 1451 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); join (",", $x->bdiv($y)); ok 1452 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); join (",", $x->bdiv($y)); ok 1453 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); join (",", $x->bdiv($y)); ok 1454 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); join (",", $x->bdiv($y)); ok 1455 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); join (",", $x->bdiv($y)); ok 1456 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); join (",", $x->bdiv($y)); ok 1457 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1458 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1459 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1460 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1461 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1462 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1463 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1464 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1465 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1466 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1467 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x / $y; ok 1468 - is a valid object ok 1469 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("1"); $x / $y; ok 1470 - is a valid object ok 1471 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("abc"); $x / $y; ok 1472 - is a valid object ok 1473 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x / $y; ok 1474 - is a valid object ok 1475 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x / $y; ok 1476 - is a valid object ok 1477 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1478 - is a valid object ok 1479 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x / $y; ok 1480 - is a valid object ok 1481 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1482 - is a valid object ok 1483 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x / $y; ok 1484 - is a valid object ok 1485 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1486 - is a valid object ok 1487 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x / $y; ok 1488 - is a valid object ok 1489 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x / $y; ok 1490 - is a valid object ok 1491 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x / $y; ok 1492 - is a valid object ok 1493 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x / $y; ok 1494 - is a valid object ok 1495 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x / $y; ok 1496 - is a valid object ok 1497 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x / $y; ok 1498 - is a valid object ok 1499 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x / $y; ok 1500 - is a valid object ok 1501 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1502 - is a valid object ok 1503 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x / $y; ok 1504 - is a valid object ok 1505 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1506 - is a valid object ok 1507 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); $x / $y; ok 1508 - is a valid object ok 1509 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x / $y; ok 1510 - is a valid object ok 1511 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); $x / $y; ok 1512 - is a valid object ok 1513 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x / $y; ok 1514 - is a valid object ok 1515 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x / $y; ok 1516 - is a valid object ok 1517 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); $x / $y; ok 1518 - is a valid object ok 1519 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("-2"); $x / $y; ok 1520 - is a valid object ok 1521 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); $x / $y; ok 1522 - is a valid object ok 1523 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); $x / $y; ok 1524 - is a valid object ok 1525 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x / $y; ok 1526 - is a valid object ok 1527 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x / $y; ok 1528 - is a valid object ok 1529 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x / $y; ok 1530 - is a valid object ok 1531 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x / $y; ok 1532 - is a valid object ok 1533 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x / $y; ok 1534 - is a valid object ok 1535 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x / $y; ok 1536 - is a valid object ok 1537 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x / $y; ok 1538 - is a valid object ok 1539 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x / $y; ok 1540 - is a valid object ok 1541 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("26"); $x / $y; ok 1542 - is a valid object ok 1543 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1544 - is a valid object ok 1545 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1546 - is a valid object ok 1547 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1548 - is a valid object ok 1549 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1550 - is a valid object ok 1551 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1552 - is a valid object ok 1553 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1554 - is a valid object ok 1555 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1556 - is a valid object ok 1557 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1558 - is a valid object ok 1559 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1560 - is a valid object ok 1561 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x / $y; ok 1562 - is a valid object ok 1563 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x / $y; ok 1564 - is a valid object ok 1565 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x / $y; ok 1566 - is a valid object ok 1567 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x / $y; ok 1568 - is a valid object ok 1569 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("+5"); $x / $y; ok 1570 - is a valid object ok 1571 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("+4"); $x / $y; ok 1572 - is a valid object ok 1573 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("+8"); $x / $y; ok 1574 - is a valid object ok 1575 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("+16"); $x / $y; ok 1576 - is a valid object ok 1577 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x / $y; ok 1578 - is a valid object ok 1579 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x / $y; ok 1580 - is a valid object ok 1581 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x / $y; ok 1582 - is a valid object ok 1583 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x / $y; ok 1584 - is a valid object ok 1585 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x / $y; ok 1586 - is a valid object ok 1587 - $x = Math::BigInt->new("+1111088889"); $y = Math::BigInt->new("99999"); $x / $y; ok 1588 - is a valid object ok 1589 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x / $y; ok 1590 - is a valid object ok 1591 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x / $y; ok 1592 - is a valid object ok 1593 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x / $y; ok 1594 - is a valid object ok 1595 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x / $y; ok 1596 - is a valid object ok 1597 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x / $y; ok 1598 - is a valid object ok 1599 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x / $y; ok 1600 - is a valid object ok 1601 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x / $y; ok 1602 - is a valid object ok 1603 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x / $y; ok 1604 - is a valid object ok 1605 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x / $y; ok 1606 - is a valid object ok 1607 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x / $y; ok 1608 - is a valid object ok 1609 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("-3"); $x / $y; ok 1610 - is a valid object ok 1611 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("3"); $x / $y; ok 1612 - is a valid object ok 1613 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("-3"); $x / $y; ok 1614 - is a valid object ok 1615 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("3"); $x / $y; ok 1616 - is a valid object ok 1617 - $x = Math::BigInt->new("10000000000000000000000000000000000000000000000000000000000000000000000000000000000"); $y = Math::BigInt->new("10000000375084540248994272022843165711074"); $x / $y; ok 1618 - is a valid object ok 1619 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); $x / $y; ok 1620 - is a valid object ok 1621 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); $x / $y; ok 1622 - is a valid object ok 1623 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); $x / $y; ok 1624 - is a valid object ok 1625 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); $x / $y; ok 1626 - is a valid object ok 1627 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); $x / $y; ok 1628 - is a valid object ok 1629 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); $x / $y; ok 1630 - is a valid object ok 1631 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); $x / $y; ok 1632 - is a valid object ok 1633 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); $x / $y; ok 1634 - is a valid object ok 1635 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); $x / $y; ok 1636 - is a valid object ok 1637 - $x = Math::BigInt->new("84696969696969696956565656566184292929292929292847474747436308080808080808086765396464646464646465"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1638 - is a valid object ok 1639 - $x = Math::BigInt->new("84696969696969696943434343434871161616161616161452525252486813131313131313143230042929292929292930"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1640 - is a valid object ok 1641 - $x = Math::BigInt->new("84696969696969696969696969697497424242424242424242424242385803030303030303030300750000000000000000"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1642 - is a valid object ok 1643 - $x = Math::BigInt->new("84696969696969696930303030303558030303030303030057575757537318181818181818199694689393939393939395"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1644 - is a valid object ok 1645 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); $x / $y; ok 1646 - is a valid object ok 1647 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); $x / $y; ok 1648 - is a valid object ok 1649 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); $x / $y; ok 1650 - is a valid object ok 1651 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); $x / $y; ok 1652 - is a valid object ok 1653 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); $x / $y; ok 1654 - is a valid object ok 1655 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); $x / $y; ok 1656 - is a valid object ok 1657 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); $x / $y; ok 1658 - is a valid object ok 1659 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); $x / $y; ok 1660 - is a valid object ok 1661 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); $x / $y; ok 1662 - is a valid object ok 1663 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); $x / $y; ok 1664 - is a valid object ok 1665 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); $x / $y; ok 1666 - is a valid object ok 1667 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); $x / $y; ok 1668 - is a valid object ok 1669 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); $x / $y; ok 1670 - is a valid object ok 1671 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); $x / $y; ok 1672 - is a valid object ok 1673 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); $x / $y; ok 1674 - is a valid object ok 1675 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); $x / $y; ok 1676 - is a valid object ok 1677 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); $x / $y; ok 1678 - is a valid object ok 1679 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); $x / $y; ok 1680 - is a valid object ok 1681 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); $x / $y; ok 1682 - is a valid object ok 1683 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); $x / $y; ok 1684 - is a valid object ok 1685 - $x = Math::BigInt->new("949418181818187070707070707070707070"); $y = Math::BigInt->new("181818181853535353535353535353535353"); $x / $y; ok 1686 - is a valid object ok 1687 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1688 - is a valid object ok 1689 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1690 - is a valid object ok 1691 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1692 - is a valid object ok 1693 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1694 - is a valid object ok 1695 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1696 - is a valid object ok 1697 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-5"); $x->bmodinv($y); ok 1698 - is a valid object ok 1699 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1700 - is a valid object ok 1701 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5033"); $x->bmodinv($y); ok 1702 - is a valid object ok 1703 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1704 - is a valid object ok 1705 - $x = Math::BigInt->new("-1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1706 - is a valid object ok 1707 - $x = Math::BigInt->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigInt->new("2348249874968739"); $x->bmodinv($y); ok 1708 - is a valid object ok 1709 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1710 - is a valid object ok 1711 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1712 - is a valid object ok 1713 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1714 - is a valid object ok 1715 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1716 - is a valid object ok 1717 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1718 - is a valid object ok 1719 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1720 - is a valid object ok 1721 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1722 - is a valid object ok 1723 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1724 - is a valid object ok 1725 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1726 - is a valid object ok 1727 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1728 - is a valid object ok 1729 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1730 - is a valid object ok 1731 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1732 - is a valid object ok 1733 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1734 - is a valid object ok 1735 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1736 - is a valid object ok 1737 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1738 - is a valid object ok 1739 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1740 - is a valid object ok 1741 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1742 - is a valid object ok 1743 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1744 - is a valid object ok 1745 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1746 - is a valid object ok 1747 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1748 - is a valid object ok 1749 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1750 - is a valid object ok 1751 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1752 - is a valid object ok 1753 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bmodinv($y); ok 1754 - is a valid object ok 1755 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1756 - is a valid object ok 1757 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->bmodinv($y); ok 1758 - is a valid object ok 1759 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1760 - is a valid object ok 1761 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1762 - is a valid object ok 1763 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1764 - is a valid object ok 1765 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1766 - is a valid object ok 1767 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1768 - is a valid object ok 1769 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1770 - is a valid object ok 1771 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1772 - is a valid object ok 1773 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("0"); $x->bmodpow($y, $z); ok 1774 - is a valid object ok 1775 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1776 - is a valid object ok 1777 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1778 - is a valid object ok 1779 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1780 - is a valid object ok 1781 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1782 - is a valid object ok 1783 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1784 - is a valid object ok 1785 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1786 - is a valid object ok 1787 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1788 - is a valid object ok 1789 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1790 - is a valid object ok 1791 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1792 - is a valid object ok 1793 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1794 - is a valid object ok 1795 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1796 - is a valid object ok 1797 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1798 - is a valid object ok 1799 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1800 - is a valid object ok 1801 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1802 - is a valid object ok 1803 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1804 - is a valid object ok 1805 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1806 - is a valid object ok 1807 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1808 - is a valid object ok 1809 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1810 - is a valid object ok 1811 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1812 - is a valid object ok 1813 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1814 - is a valid object ok 1815 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1816 - is a valid object ok 1817 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1818 - is a valid object ok 1819 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1820 - is a valid object ok 1821 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1822 - is a valid object ok 1823 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1824 - is a valid object ok 1825 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1826 - is a valid object ok 1827 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1828 - is a valid object ok 1829 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1830 - is a valid object ok 1831 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1832 - is a valid object ok 1833 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1834 - is a valid object ok 1835 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1836 - is a valid object ok 1837 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1838 - is a valid object ok 1839 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1840 - is a valid object ok 1841 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1842 - is a valid object ok 1843 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1844 - is a valid object ok 1845 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1846 - is a valid object ok 1847 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1848 - is a valid object ok 1849 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1850 - is a valid object ok 1851 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1852 - is a valid object ok 1853 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1854 - is a valid object ok 1855 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1856 - is a valid object ok 1857 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1858 - is a valid object ok 1859 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1860 - is a valid object ok 1861 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1862 - is a valid object ok 1863 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1864 - is a valid object ok 1865 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1866 - is a valid object ok 1867 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1868 - is a valid object ok 1869 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1870 - is a valid object ok 1871 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1872 - is a valid object ok 1873 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1874 - is a valid object ok 1875 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1876 - is a valid object ok 1877 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1878 - is a valid object ok 1879 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1880 - is a valid object ok 1881 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1882 - is a valid object ok 1883 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1884 - is a valid object ok 1885 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1886 - is a valid object ok 1887 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1888 - is a valid object ok 1889 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1890 - is a valid object ok 1891 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1892 - is a valid object ok 1893 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1894 - is a valid object ok 1895 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1896 - is a valid object ok 1897 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1898 - is a valid object ok 1899 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1900 - is a valid object ok 1901 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1902 - is a valid object ok 1903 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1904 - is a valid object ok 1905 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1906 - is a valid object ok 1907 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1908 - is a valid object ok 1909 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1910 - is a valid object ok 1911 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1912 - is a valid object ok 1913 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1914 - is a valid object ok 1915 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1916 - is a valid object ok 1917 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1918 - is a valid object ok 1919 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1920 - is a valid object ok 1921 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1922 - is a valid object ok 1923 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1924 - is a valid object ok 1925 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1926 - is a valid object ok 1927 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1928 - is a valid object ok 1929 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1930 - is a valid object ok 1931 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1932 - is a valid object ok 1933 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1934 - is a valid object ok 1935 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1936 - is a valid object ok 1937 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1938 - is a valid object ok 1939 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1940 - is a valid object ok 1941 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1942 - is a valid object ok 1943 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1944 - is a valid object ok 1945 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1946 - is a valid object ok 1947 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1948 - is a valid object ok 1949 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1950 - is a valid object ok 1951 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1952 - is a valid object ok 1953 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1954 - is a valid object ok 1955 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1956 - is a valid object ok 1957 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1958 - is a valid object ok 1959 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1960 - is a valid object ok 1961 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1962 - is a valid object ok 1963 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1964 - is a valid object ok 1965 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1966 - is a valid object ok 1967 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1968 - is a valid object ok 1969 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1970 - is a valid object ok 1971 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1972 - is a valid object ok 1973 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1974 - is a valid object ok 1975 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1976 - is a valid object ok 1977 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1978 - is a valid object ok 1979 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1980 - is a valid object ok 1981 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1982 - is a valid object ok 1983 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1984 - is a valid object ok 1985 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1986 - is a valid object ok 1987 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1988 - is a valid object ok 1989 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1990 - is a valid object ok 1991 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1992 - is a valid object ok 1993 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1994 - is a valid object ok 1995 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1996 - is a valid object ok 1997 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1998 - is a valid object ok 1999 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2000 - is a valid object ok 2001 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2002 - is a valid object ok 2003 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2004 - is a valid object ok 2005 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2006 - is a valid object ok 2007 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2008 - is a valid object ok 2009 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2010 - is a valid object ok 2011 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2012 - is a valid object ok 2013 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2014 - is a valid object ok 2015 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2016 - is a valid object ok 2017 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2018 - is a valid object ok 2019 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2020 - is a valid object ok 2021 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2022 - is a valid object ok 2023 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2024 - is a valid object ok 2025 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2026 - is a valid object ok 2027 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2028 - is a valid object ok 2029 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2030 - is a valid object ok 2031 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2032 - is a valid object ok 2033 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2034 - is a valid object ok 2035 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2036 - is a valid object ok 2037 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2044 - is a valid object ok 2045 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2046 - is a valid object ok 2047 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2048 - is a valid object ok 2049 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2050 - is a valid object ok 2051 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2058 - is a valid object ok 2059 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2072 - is a valid object ok 2073 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("16"); $x->bmodpow($y, $z); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("5033"); $x->bmodpow($y, $z); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("7"); $z = Math::BigInt->new("5032"); $x->bmodpow($y, $z); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("8"); $z = Math::BigInt->new("-5"); $x->bmodpow($y, $z); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt->new("1e50"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigInt->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigInt->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 2086 - is a valid object ok 2087 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2088 - is a valid object ok 2089 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2090 - is a valid object ok 2091 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x % $y; ok 2092 - is a valid object ok 2093 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2094 - is a valid object ok 2095 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2096 - is a valid object ok 2097 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2098 - is a valid object ok 2099 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2100 - is a valid object ok 2101 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2102 - is a valid object ok 2103 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2104 - is a valid object ok 2105 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2106 - is a valid object ok 2107 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2108 - is a valid object ok 2109 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2110 - is a valid object ok 2111 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x % $y; ok 2112 - is a valid object ok 2113 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x % $y; ok 2114 - is a valid object ok 2115 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2116 - is a valid object ok 2117 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2118 - is a valid object ok 2119 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2120 - is a valid object ok 2121 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2122 - is a valid object ok 2123 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); $x % $y; ok 2124 - is a valid object ok 2125 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2126 - is a valid object ok 2127 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2128 - is a valid object ok 2129 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); $x % $y; ok 2130 - is a valid object ok 2131 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x % $y; ok 2132 - is a valid object ok 2133 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x % $y; ok 2134 - is a valid object ok 2135 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("1"); $x % $y; ok 2136 - is a valid object ok 2137 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("abc"); $x % $y; ok 2138 - is a valid object ok 2139 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x % $y; ok 2140 - is a valid object ok 2141 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x % $y; ok 2142 - is a valid object ok 2143 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x % $y; ok 2144 - is a valid object ok 2145 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x % $y; ok 2146 - is a valid object ok 2147 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x % $y; ok 2148 - is a valid object ok 2149 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2150 - is a valid object ok 2151 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2152 - is a valid object ok 2153 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x % $y; ok 2154 - is a valid object ok 2155 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x % $y; ok 2156 - is a valid object ok 2157 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x % $y; ok 2158 - is a valid object ok 2159 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2160 - is a valid object ok 2161 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2162 - is a valid object ok 2163 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2164 - is a valid object ok 2165 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2166 - is a valid object ok 2167 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2168 - is a valid object ok 2169 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2170 - is a valid object ok 2171 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2172 - is a valid object ok 2173 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2174 - is a valid object ok 2175 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2176 - is a valid object ok 2177 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x % $y; ok 2178 - is a valid object ok 2179 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x % $y; ok 2180 - is a valid object ok 2181 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x % $y; ok 2182 - is a valid object ok 2183 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x % $y; ok 2184 - is a valid object ok 2185 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x % $y; ok 2186 - is a valid object ok 2187 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("4"); $x % $y; ok 2188 - is a valid object ok 2189 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("8"); $x % $y; ok 2190 - is a valid object ok 2191 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("16"); $x % $y; ok 2192 - is a valid object ok 2193 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x % $y; ok 2194 - is a valid object ok 2195 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x % $y; ok 2196 - is a valid object ok 2197 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x % $y; ok 2198 - is a valid object ok 2199 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x % $y; ok 2200 - is a valid object ok 2201 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x % $y; ok 2202 - is a valid object ok 2203 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("+5"); $x % $y; ok 2204 - is a valid object ok 2205 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2206 - is a valid object ok 2207 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2208 - is a valid object ok 2209 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x % $y; ok 2210 - is a valid object ok 2211 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x % $y; ok 2212 - is a valid object ok 2213 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x % $y; ok 2214 - is a valid object ok 2215 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x % $y; ok 2216 - is a valid object ok 2217 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x % $y; ok 2218 - is a valid object ok 2219 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x % $y; ok 2220 - is a valid object ok 2221 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x % $y; ok 2222 - is a valid object ok 2223 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x % $y; ok 2224 - is a valid object ok 2225 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); $x % $y; ok 2226 - is a valid object ok 2227 - $x = Math::BigInt->new("100041000510123"); $y = Math::BigInt->new("3"); $x % $y; ok 2228 - is a valid object ok 2229 - $x = Math::BigInt->new("152403346"); $y = Math::BigInt->new("12345"); $x % $y; ok 2230 - is a valid object ok 2231 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x % $y; ok 2232 - is a valid object ok 2233 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("9"); $x % $y; ok 2234 - is a valid object ok 2235 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("9"); $x % $y; ok 2236 - is a valid object ok 2237 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("9"); $x % $y; ok 2238 - is a valid object ok 2239 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("9"); $x % $y; ok 2240 - is a valid object ok 2241 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("9"); $x % $y; ok 2242 - is a valid object ok 2243 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("9"); $x % $y; ok 2244 - is a valid object ok 2245 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("9"); $x % $y; ok 2246 - is a valid object ok 2247 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("9"); $x % $y; ok 2248 - is a valid object ok 2249 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("10"); $x % $y; ok 2250 - is a valid object ok 2251 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("10"); $x % $y; ok 2252 - is a valid object ok 2253 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("10"); $x % $y; ok 2254 - is a valid object ok 2255 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("10"); $x % $y; ok 2256 - is a valid object ok 2257 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("10"); $x % $y; ok 2258 - is a valid object ok 2259 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("10"); $x % $y; ok 2260 - is a valid object ok 2261 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("10"); $x % $y; ok 2262 - is a valid object ok 2263 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("10"); $x % $y; ok 2264 - is a valid object ok 2265 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("113"); $x % $y; ok 2266 - is a valid object ok 2267 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("113"); $x % $y; ok 2268 - is a valid object ok 2269 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("113"); $x % $y; ok 2270 - is a valid object ok 2271 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("113"); $x % $y; ok 2272 - is a valid object ok 2273 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("113"); $x % $y; ok 2274 - is a valid object ok 2275 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("113"); $x % $y; ok 2276 - is a valid object ok 2277 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("113"); $x % $y; ok 2278 - is a valid object ok 2279 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("113"); $x % $y; ok 2280 - is a valid object ok 2281 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x % $y; ok 2282 - is a valid object ok 2283 - $x = Math::BigInt->new("111111111111111111111111111111"); $y = Math::BigInt->new("111111111111111111111111111111"); $x % $y; ok 2284 - is a valid object ok 2285 - $x = Math::BigInt->new("12345678901234567890"); $y = Math::BigInt->new("12345678901234567890"); $x % $y; ok 2286 - is a valid object ok 2287 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("12"); Math::BigInt::bgcd($x, $y); ok 2288 - is a valid object ok 2289 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt::bgcd($x, $y); ok 2290 - is a valid object ok 2291 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); Math::BigInt::bgcd($x, $y); ok 2292 - is a valid object ok 2293 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2294 - is a valid object ok 2295 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); Math::BigInt::bgcd($x, $y); ok 2296 - is a valid object ok 2297 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2298 - is a valid object ok 2299 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2300 - is a valid object ok 2301 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 2302 - is a valid object ok 2303 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2304 - is a valid object ok 2305 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 2306 - is a valid object ok 2307 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2308 - is a valid object ok 2309 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 2310 - is a valid object ok 2311 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2312 - is a valid object ok 2313 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 2314 - is a valid object ok 2315 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); Math::BigInt::bgcd($x, $y); ok 2316 - is a valid object ok 2317 - $x = Math::BigInt->new("+3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 2318 - is a valid object ok 2319 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 2320 - is a valid object ok 2321 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-2"); Math::BigInt::bgcd($x, $y); ok 2322 - is a valid object ok 2323 - $x = Math::BigInt->new("-144"); $y = Math::BigInt->new("-60"); Math::BigInt::bgcd($x, $y); ok 2324 - is a valid object ok 2325 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("-60"); Math::BigInt::bgcd($x, $y); ok 2326 - is a valid object ok 2327 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("60"); Math::BigInt::bgcd($x, $y); ok 2328 - is a valid object ok 2329 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("625"); Math::BigInt::bgcd($x, $y); ok 2330 - is a valid object ok 2331 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("81"); Math::BigInt::bgcd($x, $y); ok 2332 - is a valid object ok 2333 - $x = Math::BigInt->new("1034"); $y = Math::BigInt->new("804"); Math::BigInt::bgcd($x, $y); ok 2334 - is a valid object ok 2335 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("56"); Math::BigInt::bgcd($x, $y, $z); ok 2336 - is a valid object ok 2337 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("54"); Math::BigInt::bgcd($x, $y, $z); ok 2338 - is a valid object ok 2339 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 2340 - is a valid object ok 2341 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2342 - is a valid object ok 2343 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 2344 - is a valid object ok 2345 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2346 - is a valid object ok 2347 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2348 - is a valid object ok 2349 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::blcm($x, $y); ok 2350 - is a valid object ok 2351 - $x = Math::BigInt->new("+27"); $y = Math::BigInt->new("+90"); Math::BigInt::blcm($x, $y); ok 2352 - is a valid object ok 2353 - $x = Math::BigInt->new("+1034"); $y = Math::BigInt->new("+804"); Math::BigInt::blcm($x, $y); ok 2354 - is a valid object ok 2355 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x & $y; ok 2356 - is a valid object ok 2357 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x & $y; ok 2358 - is a valid object ok 2359 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x & $y; ok 2360 - is a valid object ok 2361 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x & $y; ok 2362 - is a valid object ok 2363 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x & $y; ok 2364 - is a valid object ok 2365 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x & $y; ok 2366 - is a valid object ok 2367 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x & $y; ok 2368 - is a valid object ok 2369 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x & $y; ok 2370 - is a valid object ok 2371 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+281474976710656"); $x & $y; ok 2372 - is a valid object ok 2373 - $x = Math::BigInt->new("281474976710656"); $y = Math::BigInt->new("-1"); $x & $y; ok 2374 - is a valid object ok 2375 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x & $y; ok 2376 - is a valid object ok 2377 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x & $y; ok 2378 - is a valid object ok 2379 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x & $y; ok 2380 - is a valid object ok 2381 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("-4"); $x & $y; ok 2382 - is a valid object ok 2383 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x & $y; ok 2384 - is a valid object ok 2385 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x & $y; ok 2386 - is a valid object ok 2387 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x & $y; ok 2388 - is a valid object ok 2389 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x & $y; ok 2390 - is a valid object ok 2391 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x & $y; ok 2392 - is a valid object ok 2393 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x & $y; ok 2394 - is a valid object ok 2395 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x & $y; ok 2396 - is a valid object ok 2397 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x & $y; ok 2398 - is a valid object ok 2399 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x & $y; ok 2400 - is a valid object ok 2401 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x & $y; ok 2402 - is a valid object ok 2403 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x & $y; ok 2404 - is a valid object ok 2405 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x & $y; ok 2406 - is a valid object ok 2407 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x & $y; ok 2408 - is a valid object ok 2409 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x & $y; ok 2410 - is a valid object ok 2411 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x & $y; ok 2412 - is a valid object ok 2413 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x & $y; ok 2414 - is a valid object ok 2415 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x & $y; ok 2416 - is a valid object ok 2417 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x & $y; ok 2418 - is a valid object ok 2419 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x & $y; ok 2420 - is a valid object ok 2421 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0x3F0F0F0F0F0F"); $x & $y; ok 2422 - is a valid object ok 2423 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x | $y; ok 2424 - is a valid object ok 2425 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x | $y; ok 2426 - is a valid object ok 2427 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x | $y; ok 2428 - is a valid object ok 2429 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x | $y; ok 2430 - is a valid object ok 2431 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x | $y; ok 2432 - is a valid object ok 2433 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x | $y; ok 2434 - is a valid object ok 2435 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x | $y; ok 2436 - is a valid object ok 2437 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x | $y; ok 2438 - is a valid object ok 2439 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x | $y; ok 2440 - is a valid object ok 2441 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x | $y; ok 2442 - is a valid object ok 2443 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x | $y; ok 2444 - is a valid object ok 2445 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x | $y; ok 2446 - is a valid object ok 2447 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x | $y; ok 2448 - is a valid object ok 2449 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("-1"); $x | $y; ok 2450 - is a valid object ok 2451 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x | $y; ok 2452 - is a valid object ok 2453 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x | $y; ok 2454 - is a valid object ok 2455 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x | $y; ok 2456 - is a valid object ok 2457 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x | $y; ok 2458 - is a valid object ok 2459 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2460 - is a valid object ok 2461 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2462 - is a valid object ok 2463 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2464 - is a valid object ok 2465 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2466 - is a valid object ok 2467 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2468 - is a valid object ok 2469 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2470 - is a valid object ok 2471 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2472 - is a valid object ok 2473 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2474 - is a valid object ok 2475 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2476 - is a valid object ok 2477 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2478 - is a valid object ok 2479 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2480 - is a valid object ok 2481 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2482 - is a valid object ok 2483 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2484 - is a valid object ok 2485 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2486 - is a valid object ok 2487 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2488 - is a valid object ok 2489 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x | $y; ok 2490 - is a valid object ok 2491 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2492 - is a valid object ok 2493 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2494 - is a valid object ok 2495 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2496 - is a valid object ok 2497 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x | $y; ok 2498 - is a valid object ok 2499 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2500 - is a valid object ok 2501 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2502 - is a valid object ok 2503 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x | $y; ok 2504 - is a valid object ok 2505 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2506 - is a valid object ok 2507 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2508 - is a valid object ok 2509 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x | $y; ok 2510 - is a valid object ok 2511 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2512 - is a valid object ok 2513 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2514 - is a valid object ok 2515 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x | $y; ok 2516 - is a valid object ok 2517 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2518 - is a valid object ok 2519 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2520 - is a valid object ok 2521 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2522 - is a valid object ok 2523 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2524 - is a valid object ok 2525 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2526 - is a valid object ok 2527 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ^ $y; ok 2528 - is a valid object ok 2529 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x ^ $y; ok 2530 - is a valid object ok 2531 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2532 - is a valid object ok 2533 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x ^ $y; ok 2534 - is a valid object ok 2535 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x ^ $y; ok 2536 - is a valid object ok 2537 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2538 - is a valid object ok 2539 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ^ $y; ok 2540 - is a valid object ok 2541 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x ^ $y; ok 2542 - is a valid object ok 2543 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x ^ $y; ok 2544 - is a valid object ok 2545 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x ^ $y; ok 2546 - is a valid object ok 2547 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2548 - is a valid object ok 2549 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2550 - is a valid object ok 2551 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2552 - is a valid object ok 2553 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x ^ $y; ok 2554 - is a valid object ok 2555 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x ^ $y; ok 2556 - is a valid object ok 2557 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x ^ $y; ok 2558 - is a valid object ok 2559 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2560 - is a valid object ok 2561 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2562 - is a valid object ok 2563 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2564 - is a valid object ok 2565 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2566 - is a valid object ok 2567 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2568 - is a valid object ok 2569 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2570 - is a valid object ok 2571 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2572 - is a valid object ok 2573 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2574 - is a valid object ok 2575 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2576 - is a valid object ok 2577 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2578 - is a valid object ok 2579 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2580 - is a valid object ok 2581 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2582 - is a valid object ok 2583 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2584 - is a valid object ok 2585 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2586 - is a valid object ok 2587 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2588 - is a valid object ok 2589 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x ^ $y; ok 2590 - is a valid object ok 2591 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2592 - is a valid object ok 2593 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2594 - is a valid object ok 2595 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2596 - is a valid object ok 2597 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x ^ $y; ok 2598 - is a valid object ok 2599 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2600 - is a valid object ok 2601 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2602 - is a valid object ok 2603 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x ^ $y; ok 2604 - is a valid object ok 2605 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2606 - is a valid object ok 2607 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2608 - is a valid object ok 2609 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x ^ $y; ok 2610 - is a valid object ok 2611 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2612 - is a valid object ok 2613 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2614 - is a valid object ok 2615 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 2616 - is a valid object ok 2617 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2618 - is a valid object ok 2619 - $x = Math::BigInt->new("abc"); $x->bnot(); ok 2620 - is a valid object ok 2621 - $x = Math::BigInt->new("+0"); $x->bnot(); ok 2622 - is a valid object ok 2623 - $x = Math::BigInt->new("+8"); $x->bnot(); ok 2624 - is a valid object ok 2625 - $x = Math::BigInt->new("+281474976710656"); $x->bnot(); ok 2626 - is a valid object ok 2627 - $x = Math::BigInt->new("-1"); $x->bnot(); ok 2628 - is a valid object ok 2629 - $x = Math::BigInt->new("-2"); $x->bnot(); ok 2630 - is a valid object ok 2631 - $x = Math::BigInt->new("-12"); $x->bnot(); ok 2632 - is a valid object ok 2633 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2634 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2635 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2636 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2637 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2638 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2639 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2640 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2641 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2642 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2643 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2644 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2645 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("3"); $x->digit($y); ok 2646 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); $x->digit($y); ok 2647 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); $x->digit($y); ok 2648 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2649 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2650 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2651 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2652 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2653 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2654 - $x = Math::BigInt->new("abc"); $x = $x->mantissa()->bstr(); ok 2655 - $x = Math::BigInt->new("1e4"); $x = $x->mantissa()->bstr(); ok 2656 - $x = Math::BigInt->new("2e0"); $x = $x->mantissa()->bstr(); ok 2657 - $x = Math::BigInt->new("123"); $x = $x->mantissa()->bstr(); ok 2658 - $x = Math::BigInt->new("-1"); $x = $x->mantissa()->bstr(); ok 2659 - $x = Math::BigInt->new("-2"); $x = $x->mantissa()->bstr(); ok 2660 - $x = Math::BigInt->new("+inf"); $x = $x->mantissa()->bstr(); ok 2661 - $x = Math::BigInt->new("-inf"); $x = $x->mantissa()->bstr(); ok 2662 - $x = Math::BigInt->new("abc"); $x = $x->exponent()->bstr(); ok 2663 - $x = Math::BigInt->new("1e4"); $x = $x->exponent()->bstr(); ok 2664 - $x = Math::BigInt->new("2e0"); $x = $x->exponent()->bstr(); ok 2665 - $x = Math::BigInt->new("123"); $x = $x->exponent()->bstr(); ok 2666 - $x = Math::BigInt->new("-1"); $x = $x->exponent()->bstr(); ok 2667 - $x = Math::BigInt->new("-2"); $x = $x->exponent()->bstr(); ok 2668 - $x = Math::BigInt->new("0"); $x = $x->exponent()->bstr(); ok 2669 - $x = Math::BigInt->new("+inf"); $x = $x->exponent()->bstr(); ok 2670 - $x = Math::BigInt->new("-inf"); $x = $x->exponent()->bstr(); ok 2671 - $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 2672 - $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 2673 - $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 2674 - $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 2675 - $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 2676 - $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 2677 - $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 2678 - $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 2679 - $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 2680 - $x = Math::BigInt->new("-1"); $x->bfac(); ok 2681 - is a valid object ok 2682 - $x = Math::BigInt->new("NaNfac"); $x->bfac(); ok 2683 - is a valid object ok 2684 - $x = Math::BigInt->new("+inf"); $x->bfac(); ok 2685 - is a valid object ok 2686 - $x = Math::BigInt->new("-inf"); $x->bfac(); ok 2687 - is a valid object ok 2688 - $x = Math::BigInt->new("0"); $x->bfac(); ok 2689 - is a valid object ok 2690 - $x = Math::BigInt->new("1"); $x->bfac(); ok 2691 - is a valid object ok 2692 - $x = Math::BigInt->new("2"); $x->bfac(); ok 2693 - is a valid object ok 2694 - $x = Math::BigInt->new("3"); $x->bfac(); ok 2695 - is a valid object ok 2696 - $x = Math::BigInt->new("4"); $x->bfac(); ok 2697 - is a valid object ok 2698 - $x = Math::BigInt->new("5"); $x->bfac(); ok 2699 - is a valid object ok 2700 - $x = Math::BigInt->new("6"); $x->bfac(); ok 2701 - is a valid object ok 2702 - $x = Math::BigInt->new("7"); $x->bfac(); ok 2703 - is a valid object ok 2704 - $x = Math::BigInt->new("8"); $x->bfac(); ok 2705 - is a valid object ok 2706 - $x = Math::BigInt->new("9"); $x->bfac(); ok 2707 - is a valid object ok 2708 - $x = Math::BigInt->new("10"); $x->bfac(); ok 2709 - is a valid object ok 2710 - $x = Math::BigInt->new("11"); $x->bfac(); ok 2711 - is a valid object ok 2712 - $x = Math::BigInt->new("12"); $x->bfac(); ok 2713 - is a valid object ok 2714 - $x = Math::BigInt->new("20"); $x->bfac(); ok 2715 - is a valid object ok 2716 - $x = Math::BigInt->new("22"); $x->bfac(); ok 2717 - is a valid object ok 2718 - $x = Math::BigInt->new("69"); $x->bfac(); ok 2719 - is a valid object ok 2720 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("12"); $x ** $y; ok 2721 - is a valid object ok 2722 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("abc"); $x ** $y; ok 2723 - is a valid object ok 2724 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x ** $y; ok 2725 - is a valid object ok 2726 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x ** $y; ok 2727 - is a valid object ok 2728 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x ** $y; ok 2729 - is a valid object ok 2730 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2731 - is a valid object ok 2732 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2733 - is a valid object ok 2734 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x ** $y; ok 2735 - is a valid object ok 2736 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x ** $y; ok 2737 - is a valid object ok 2738 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ** $y; ok 2739 - is a valid object ok 2740 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x ** $y; ok 2741 - is a valid object ok 2742 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2743 - is a valid object ok 2744 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2745 - is a valid object ok 2746 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 2747 - is a valid object ok 2748 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x ** $y; ok 2749 - is a valid object ok 2750 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x ** $y; ok 2751 - is a valid object ok 2752 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2753 - is a valid object ok 2754 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2755 - is a valid object ok 2756 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x ** $y; ok 2757 - is a valid object ok 2758 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2759 - is a valid object ok 2760 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2761 - is a valid object ok 2762 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 2763 - is a valid object ok 2764 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 2765 - is a valid object ok 2766 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2767 - is a valid object ok 2768 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2769 - is a valid object ok 2770 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2771 - is a valid object ok 2772 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2773 - is a valid object ok 2774 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 2775 - is a valid object ok 2776 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 2777 - is a valid object ok 2778 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500013"); $x ** $y; ok 2779 - is a valid object ok 2780 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 2781 - is a valid object ok 2782 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 2783 - is a valid object ok 2784 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x ** $y; ok 2785 - is a valid object ok 2786 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x ** $y; ok 2787 - is a valid object ok 2788 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2789 - is a valid object ok 2790 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2791 - is a valid object ok 2792 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2793 - is a valid object ok 2794 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2795 - is a valid object ok 2796 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2797 - is a valid object ok 2798 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2799 - is a valid object ok 2800 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2801 - is a valid object ok 2802 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2803 - is a valid object ok 2804 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2805 - is a valid object ok 2806 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2807 - is a valid object ok 2808 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2809 - is a valid object ok 2810 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2811 - is a valid object ok 2812 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 2813 - is a valid object ok 2814 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 2815 - is a valid object ok 2816 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2817 - is a valid object ok 2818 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2819 - is a valid object ok 2820 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2821 - is a valid object ok 2822 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x ** $y; ok 2823 - is a valid object ok 2824 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x ** $y; ok 2825 - is a valid object ok 2826 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x ** $y; ok 2827 - is a valid object ok 2828 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x ** $y; ok 2829 - is a valid object ok 2830 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x ** $y; ok 2831 - is a valid object ok 2832 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x ** $y; ok 2833 - is a valid object ok 2834 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x ** $y; ok 2835 - is a valid object ok 2836 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2837 - is a valid object ok 2838 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2839 - is a valid object ok 2840 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 2841 - is a valid object ok 2842 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-4"); $x ** $y; ok 2843 - is a valid object ok 2844 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x ** $y; ok 2845 - is a valid object ok 2846 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x ** $y; ok 2847 - is a valid object ok 2848 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x ** $y; ok 2849 - is a valid object ok 2850 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x ** $y; ok 2851 - is a valid object ok 2852 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("6"); $x ** $y; ok 2853 - is a valid object ok 2854 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("7"); $x ** $y; ok 2855 - is a valid object ok 2856 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("8"); $x ** $y; ok 2857 - is a valid object ok 2858 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("9"); $x ** $y; ok 2859 - is a valid object ok 2860 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("20"); $x ** $y; ok 2861 - is a valid object ok 2862 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x ** $y; ok 2863 - is a valid object ok 2864 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2865 - is a valid object ok 2866 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2867 - is a valid object ok 2868 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 2869 - is a valid object ok 2870 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 2871 - is a valid object ok 2872 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("2"); $x ** $y; ok 2873 - is a valid object ok 2874 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 2875 - is a valid object ok 2876 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x ** $y; ok 2877 - is a valid object ok 2878 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x ** $y; ok 2879 - is a valid object ok 2880 - $x = Math::BigInt->new("100"); $x->length(); ok 2881 - $x = Math::BigInt->new("10"); $x->length(); ok 2882 - $x = Math::BigInt->new("1"); $x->length(); ok 2883 - $x = Math::BigInt->new("0"); $x->length(); ok 2884 - $x = Math::BigInt->new("12345"); $x->length(); ok 2885 - $x = Math::BigInt->new("10000000000000000"); $x->length(); ok 2886 - $x = Math::BigInt->new("-123"); $x->length(); ok 2887 - $x = Math::BigInt->new("215960156869840440586892398248"); $x->length(); ok 2888 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2889 - is a valid object ok 2890 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2891 - is a valid object ok 2892 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2893 - is a valid object ok 2894 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2895 - is a valid object ok 2896 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2897 - is a valid object ok 2898 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2899 - is a valid object ok 2900 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2901 - is a valid object ok 2902 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2903 - is a valid object ok 2904 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2905 - is a valid object ok 2906 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2907 - is a valid object ok 2908 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2909 - is a valid object ok 2910 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2911 - is a valid object ok 2912 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2913 - is a valid object ok 2914 - $x = Math::BigInt->new("15241"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2915 - is a valid object ok 2916 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2917 - is a valid object ok 2918 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2919 - is a valid object ok 2920 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2921 - is a valid object ok 2922 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2923 - is a valid object ok 2924 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2925 - is a valid object ok 2926 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2927 - is a valid object ok 2928 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2929 - is a valid object ok 2930 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2931 - is a valid object ok 2932 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2933 - is a valid object ok 2934 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 2935 - is a valid object ok 2936 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 2937 - is a valid object ok 2938 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); $x->broot($y); ok 2939 - is a valid object ok 2940 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 2941 - is a valid object ok 2942 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2943 - is a valid object ok 2944 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2945 - is a valid object ok 2946 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2947 - is a valid object ok 2948 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2949 - is a valid object ok 2950 - $x = Math::BigInt->new("-123.45"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2951 - is a valid object ok 2952 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2953 - is a valid object ok 2954 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 2955 - is a valid object ok 2956 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 2957 - is a valid object ok 2958 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 2959 - is a valid object ok 2960 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 2961 - is a valid object ok 2962 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 2963 - is a valid object ok 2964 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 2965 - is a valid object ok 2966 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("4"); $x->broot($y); ok 2967 - is a valid object ok 2968 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("4"); $x->broot($y); ok 2969 - is a valid object ok 2970 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("4"); $x->broot($y); ok 2971 - is a valid object ok 2972 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("8"); $x->broot($y); ok 2973 - is a valid object ok 2974 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("16"); $x->broot($y); ok 2975 - is a valid object ok 2976 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("32"); $x->broot($y); ok 2977 - is a valid object ok 2978 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("64"); $x->broot($y); ok 2979 - is a valid object ok 2980 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("128"); $x->broot($y); ok 2981 - is a valid object ok 2982 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $y = Math::BigInt->new("15"); $x->broot($y); ok 2983 - is a valid object ok 2984 - $x = Math::BigInt->new("145"); $x->bsqrt(); ok 2985 - is a valid object ok 2986 - $x = Math::BigInt->new("144"); $x->bsqrt(); ok 2987 - is a valid object ok 2988 - $x = Math::BigInt->new("143"); $x->bsqrt(); ok 2989 - is a valid object ok 2990 - $x = Math::BigInt->new("16"); $x->bsqrt(); ok 2991 - is a valid object ok 2992 - $x = Math::BigInt->new("170"); $x->bsqrt(); ok 2993 - is a valid object ok 2994 - $x = Math::BigInt->new("169"); $x->bsqrt(); ok 2995 - is a valid object ok 2996 - $x = Math::BigInt->new("168"); $x->bsqrt(); ok 2997 - is a valid object ok 2998 - $x = Math::BigInt->new("4"); $x->bsqrt(); ok 2999 - is a valid object ok 3000 - $x = Math::BigInt->new("3"); $x->bsqrt(); ok 3001 - is a valid object ok 3002 - $x = Math::BigInt->new("2"); $x->bsqrt(); ok 3003 - is a valid object ok 3004 - $x = Math::BigInt->new("9"); $x->bsqrt(); ok 3005 - is a valid object ok 3006 - $x = Math::BigInt->new("12"); $x->bsqrt(); ok 3007 - is a valid object ok 3008 - $x = Math::BigInt->new("256"); $x->bsqrt(); ok 3009 - is a valid object ok 3010 - $x = Math::BigInt->new("100000000"); $x->bsqrt(); ok 3011 - is a valid object ok 3012 - $x = Math::BigInt->new("4000000000000"); $x->bsqrt(); ok 3013 - is a valid object ok 3014 - $x = Math::BigInt->new("152399026"); $x->bsqrt(); ok 3015 - is a valid object ok 3016 - $x = Math::BigInt->new("152399025"); $x->bsqrt(); ok 3017 - is a valid object ok 3018 - $x = Math::BigInt->new("152399024"); $x->bsqrt(); ok 3019 - is a valid object ok 3020 - $x = Math::BigInt->new("18446744073709551616"); $x->bsqrt(); ok 3021 - is a valid object ok 3022 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $x->bsqrt(); ok 3023 - is a valid object ok 3024 - $x = Math::BigInt->new("1"); $x->bsqrt(); ok 3025 - is a valid object ok 3026 - $x = Math::BigInt->new("0"); $x->bsqrt(); ok 3027 - is a valid object ok 3028 - $x = Math::BigInt->new("-2"); $x->bsqrt(); ok 3029 - is a valid object ok 3030 - $x = Math::BigInt->new("-123"); $x->bsqrt(); ok 3031 - is a valid object ok 3032 - $x = Math::BigInt->new("Nan"); $x->bsqrt(); ok 3033 - is a valid object ok 3034 - $x = Math::BigInt->new("+inf"); $x->bsqrt(); ok 3035 - is a valid object ok 3036 - $x = Math::BigInt->new("-inf"); $x->bsqrt(); ok 3037 - is a valid object ok 3038 - $x = Math::BigInt->new("NaN"); $x->bexp(); ok 3039 - is a valid object ok 3040 - $x = Math::BigInt->new("inf"); $x->bexp(); ok 3041 - is a valid object ok 3042 - $x = Math::BigInt->new("1"); $x->bexp(); ok 3043 - is a valid object ok 3044 - $x = Math::BigInt->new("2"); $x->bexp(); ok 3045 - is a valid object ok 3046 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3047 - is a valid object ok 3048 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3049 - is a valid object ok 3050 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3051 - is a valid object ok 3052 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3053 - is a valid object ok 3054 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3055 - is a valid object ok 3056 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3057 - is a valid object ok 3058 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3059 - is a valid object ok 3060 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3061 - is a valid object ok 3062 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->batan2($y); ok 3063 - is a valid object ok 3064 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3065 - is a valid object ok 3066 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3067 - is a valid object ok 3068 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3069 - is a valid object ok 3070 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3071 - is a valid object ok 3072 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3073 - is a valid object ok 3074 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3075 - is a valid object ok 3076 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3077 - is a valid object ok 3078 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3079 - is a valid object ok 3080 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->batan2($y); ok 3081 - is a valid object ok 3082 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3083 - is a valid object ok 3084 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3085 - is a valid object ok 3086 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3087 - is a valid object ok 3088 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3089 - is a valid object ok 3090 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3091 - is a valid object ok 3092 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3093 - is a valid object ok 3094 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3095 - is a valid object ok 3096 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3097 - is a valid object ok 3098 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3099 - is a valid object ok 3100 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3101 - is a valid object ok 3102 - $x = Math::BigInt->new("77"); Math::BigInt->bpi($x); ok 3103 - is a valid object ok 3104 - $x = Math::BigInt->new("+0"); Math::BigInt->bpi($x); ok 3105 - is a valid object ok 3106 - $x = Math::BigInt->new("11"); Math::BigInt->bpi($x); ok 3107 - is a valid object ok 3108 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("10"); $x->bnok($y); ok 3109 - is a valid object ok 3110 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3111 - is a valid object ok 3112 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3113 - is a valid object ok 3114 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3115 - is a valid object ok 3116 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3117 - is a valid object ok 3118 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bnok($y); ok 3119 - is a valid object ok 3120 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3121 - is a valid object ok 3122 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->bnok($y); ok 3123 - is a valid object ok 3124 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3125 - is a valid object ok 3126 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("6"); $x->bnok($y); ok 3127 - is a valid object ok 3128 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("90"); $x->bnok($y); ok 3129 - is a valid object ok 3130 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("95"); $x->bnok($y); ok 3131 - is a valid object ok 3132 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3133 - is a valid object ok 3134 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3135 - is a valid object ok 3136 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3137 - is a valid object ok 3138 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3139 - is a valid object ok 3140 - $x = Math::BigInt->new("NaNbround"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3141 - is a valid object ok 3142 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3143 - is a valid object ok 3144 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3145 - is a valid object ok 3146 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3147 - is a valid object ok 3148 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("2"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3149 - is a valid object ok 3150 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3151 - is a valid object ok 3152 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3153 - is a valid object ok 3154 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3155 - is a valid object ok 3156 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3157 - is a valid object ok 3158 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3159 - is a valid object ok 3160 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3161 - is a valid object ok 3162 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3163 - is a valid object ok 3164 - $x = Math::BigInt->new("+101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3165 - is a valid object ok 3166 - $x = Math::BigInt->new("-101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3167 - is a valid object ok 3168 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3169 - is a valid object ok 3170 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3171 - is a valid object ok 3172 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3173 - is a valid object ok 3174 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3175 - is a valid object ok 3176 - $x = Math::BigInt->new("+201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3177 - is a valid object ok 3178 - $x = Math::BigInt->new("-201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3179 - is a valid object ok 3180 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3181 - is a valid object ok 3182 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3183 - is a valid object ok 3184 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3185 - is a valid object ok 3186 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3187 - is a valid object ok 3188 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3189 - is a valid object ok 3190 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3191 - is a valid object ok 3192 - $x = Math::BigInt->new("+301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3193 - is a valid object ok 3194 - $x = Math::BigInt->new("-301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3195 - is a valid object ok 3196 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3197 - is a valid object ok 3198 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3199 - is a valid object ok 3200 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3201 - is a valid object ok 3202 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3203 - is a valid object ok 3204 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3205 - is a valid object ok 3206 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3207 - is a valid object ok 3208 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3209 - is a valid object ok 3210 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3211 - is a valid object ok 3212 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3213 - is a valid object ok 3214 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3215 - is a valid object ok 3216 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3217 - is a valid object ok 3218 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3219 - is a valid object ok 3220 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3221 - is a valid object ok 3222 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3223 - is a valid object ok 3224 - $x = Math::BigInt->new("+501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3225 - is a valid object ok 3226 - $x = Math::BigInt->new("-501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3227 - is a valid object ok 3228 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3229 - is a valid object ok 3230 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3231 - is a valid object ok 3232 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3233 - is a valid object ok 3234 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3235 - is a valid object ok 3236 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3237 - is a valid object ok 3238 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3239 - is a valid object ok 3240 - $x = Math::BigInt->new("+601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3241 - is a valid object ok 3242 - $x = Math::BigInt->new("-601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3243 - is a valid object ok 3244 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("7"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3245 - is a valid object ok 3246 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3247 - is a valid object ok 3248 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3249 - is a valid object ok 3250 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3251 - is a valid object ok 3252 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3253 - is a valid object ok 3254 - $x = Math::BigInt->new("+60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3255 - is a valid object ok 3256 - $x = Math::BigInt->new("+60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3257 - is a valid object ok 3258 - $x = Math::BigInt->new("+60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3259 - is a valid object ok 3260 - $x = Math::BigInt->new("+60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3261 - is a valid object ok 3262 - $x = Math::BigInt->new("+60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3263 - is a valid object ok 3264 - $x = Math::BigInt->new("+60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3265 - is a valid object ok 3266 - $x = Math::BigInt->new("+60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3267 - is a valid object ok 3268 - $x = Math::BigInt->new("+60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3269 - is a valid object ok 3270 - $x = Math::BigInt->new("+60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3271 - is a valid object ok 3272 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3273 - is a valid object ok 3274 - $x = Math::BigInt->new("-60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3275 - is a valid object ok 3276 - $x = Math::BigInt->new("-60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3277 - is a valid object ok 3278 - $x = Math::BigInt->new("-60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3279 - is a valid object ok 3280 - $x = Math::BigInt->new("-60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3281 - is a valid object ok 3282 - $x = Math::BigInt->new("-60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3283 - is a valid object ok 3284 - $x = Math::BigInt->new("-60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3285 - is a valid object ok 3286 - $x = Math::BigInt->new("-60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3287 - is a valid object ok 3288 - $x = Math::BigInt->new("-60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3289 - is a valid object ok 3290 - $x = Math::BigInt->new("-60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3291 - is a valid object ok 3292 - $x = Math::BigInt->new("0"); $x->is_zero() || 0; ok 3293 - $x = Math::BigInt->new("NaNzero"); $x->is_zero() || 0; ok 3294 - $x = Math::BigInt->new("+inf"); $x->is_zero() || 0; ok 3295 - $x = Math::BigInt->new("-inf"); $x->is_zero() || 0; ok 3296 - $x = Math::BigInt->new("123"); $x->is_zero() || 0; ok 3297 - $x = Math::BigInt->new("-1"); $x->is_zero() || 0; ok 3298 - $x = Math::BigInt->new("1"); $x->is_zero() || 0; ok 3299 - $x = Math::BigInt->new("0"); $x->is_one() || 0; ok 3300 - $x = Math::BigInt->new("NaNone"); $x->is_one() || 0; ok 3301 - $x = Math::BigInt->new("+inf"); $x->is_one() || 0; ok 3302 - $x = Math::BigInt->new("-inf"); $x->is_one() || 0; ok 3303 - $x = Math::BigInt->new("1"); $x->is_one() || 0; ok 3304 - $x = Math::BigInt->new("2"); $x->is_one() || 0; ok 3305 - $x = Math::BigInt->new("-1"); $x->is_one() || 0; ok 3306 - $x = Math::BigInt->new("-2"); $x->is_one() || 0; ok 3307 - $x = Math::BigInt->new("0"); $x->bfloor(); ok 3308 - is a valid object ok 3309 - $x = Math::BigInt->new("NaNfloor"); $x->bfloor(); ok 3310 - is a valid object ok 3311 - $x = Math::BigInt->new("+inf"); $x->bfloor(); ok 3312 - is a valid object ok 3313 - $x = Math::BigInt->new("-inf"); $x->bfloor(); ok 3314 - is a valid object ok 3315 - $x = Math::BigInt->new("-1"); $x->bfloor(); ok 3316 - is a valid object ok 3317 - $x = Math::BigInt->new("-2"); $x->bfloor(); ok 3318 - is a valid object ok 3319 - $x = Math::BigInt->new("2"); $x->bfloor(); ok 3320 - is a valid object ok 3321 - $x = Math::BigInt->new("3"); $x->bfloor(); ok 3322 - is a valid object ok 3323 - $x = Math::BigInt->new("abc"); $x->bfloor(); ok 3324 - is a valid object ok 3325 - $x = Math::BigInt->new("NaNceil"); $x->bceil(); ok 3326 - is a valid object ok 3327 - $x = Math::BigInt->new("+inf"); $x->bceil(); ok 3328 - is a valid object ok 3329 - $x = Math::BigInt->new("-inf"); $x->bceil(); ok 3330 - is a valid object ok 3331 - $x = Math::BigInt->new("0"); $x->bceil(); ok 3332 - is a valid object ok 3333 - $x = Math::BigInt->new("-1"); $x->bceil(); ok 3334 - is a valid object ok 3335 - $x = Math::BigInt->new("-2"); $x->bceil(); ok 3336 - is a valid object ok 3337 - $x = Math::BigInt->new("2"); $x->bceil(); ok 3338 - is a valid object ok 3339 - $x = Math::BigInt->new("3"); $x->bceil(); ok 3340 - is a valid object ok 3341 - $x = Math::BigInt->new("abc"); $x->bceil(); ok 3342 - is a valid object ok 3343 - $x = Math::BigInt->new("NaN"); $x->bint(); ok 3344 - is a valid object ok 3345 - $x = Math::BigInt->new("+inf"); $x->bint(); ok 3346 - is a valid object ok 3347 - $x = Math::BigInt->new("-inf"); $x->bint(); ok 3348 - is a valid object ok 3349 - $x = Math::BigInt->new("0"); $x->bint(); ok 3350 - is a valid object ok 3351 - $x = Math::BigInt->new("-1"); $x->bint(); ok 3352 - is a valid object ok 3353 - $x = Math::BigInt->new("-2"); $x->bint(); ok 3354 - is a valid object ok 3355 - $x = Math::BigInt->new("2"); $x->bint(); ok 3356 - is a valid object ok 3357 - $x = Math::BigInt->new("3"); $x->bint(); ok 3358 - is a valid object ok 3359 - $x = Math::BigInt->new("128"); $x->as_hex(); ok 3360 - $x = Math::BigInt->new("-128"); $x->as_hex(); ok 3361 - $x = Math::BigInt->new("0"); $x->as_hex(); ok 3362 - $x = Math::BigInt->new("-0"); $x->as_hex(); ok 3363 - $x = Math::BigInt->new("1"); $x->as_hex(); ok 3364 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_hex(); ok 3365 - $x = Math::BigInt->new("+inf"); $x->as_hex(); ok 3366 - $x = Math::BigInt->new("-inf"); $x->as_hex(); ok 3367 - $x = Math::BigInt->new("NaNas_hex"); $x->as_hex(); ok 3368 - $x = Math::BigInt->new("128"); $x->as_bin(); ok 3369 - $x = Math::BigInt->new("-128"); $x->as_bin(); ok 3370 - $x = Math::BigInt->new("0"); $x->as_bin(); ok 3371 - $x = Math::BigInt->new("-0"); $x->as_bin(); ok 3372 - $x = Math::BigInt->new("1"); $x->as_bin(); ok 3373 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 3374 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_bin(); ok 3375 - $x = Math::BigInt->new("+inf"); $x->as_bin(); ok 3376 - $x = Math::BigInt->new("-inf"); $x->as_bin(); ok 3377 - $x = Math::BigInt->new("NaNas_bin"); $x->as_bin(); ok 3378 - $x = Math::BigInt->new("128"); $x->as_oct(); ok 3379 - $x = Math::BigInt->new("-128"); $x->as_oct(); ok 3380 - $x = Math::BigInt->new("0"); $x->as_oct(); ok 3381 - $x = Math::BigInt->new("-0"); $x->as_oct(); ok 3382 - $x = Math::BigInt->new("1"); $x->as_oct(); ok 3383 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 3384 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_oct(); ok 3385 - $x = Math::BigInt->new("+inf"); $x->as_oct(); ok 3386 - $x = Math::BigInt->new("-inf"); $x->as_oct(); ok 3387 - $x = Math::BigInt->new("NaNas_oct"); $x->as_oct(); ok 3388 - $x = Math::BigInt->new("-1"); $x = log($x); ok 3389 - is a valid object ok 3390 - $x = Math::BigInt->new("0"); $x = log($x); ok 3391 - is a valid object ok 3392 - $x = Math::BigInt->new("1"); $x = log($x); ok 3393 - is a valid object ok 3394 - $x = Math::BigInt->new("2"); $x = log($x); ok 3395 - is a valid object ok 3396 - $x = Math::BigInt->new("3"); $x = log($x); ok 3397 - is a valid object ok 3398 - $x = Math::BigInt->new("123456789"); $x = log($x); ok 3399 - is a valid object ok 3400 - $x = Math::BigInt->new("1234567890987654321"); $x = log($x); ok 3401 - is a valid object ok 3402 - $x = Math::BigInt->new("-inf"); $x = log($x); ok 3403 - is a valid object ok 3404 - $x = Math::BigInt->new("inf"); $x = log($x); ok 3405 - is a valid object ok 3406 - $x = Math::BigInt->new("NaN"); $x = log($x); ok 3407 - is a valid object ok 3408 - $x = Math::BigInt->new("4294967296"); $a = $x->bmul($x); ok 3409 - $x = Math::BigInt->new(10); $a = $x->bpow($x); ok 3410 - $z = $x & $y; $x ok 3411 - $z = $x & $y; $y ok 3412 - $z = $x & $y; $z ok 3413 - $z = $x | $y; $x ok 3414 - $z = $x | $y; $y ok 3415 - $z = $x | $y; $z ok 3416 - $z = $x | $y; $x ok 3417 - $z = $x | $y; $y ok 3418 - $z = $x | $y; $z ok 3419 - $z = $x ^ $y; $x ok 3420 - $z = $x ^ $y; $y ok 3421 - $z = $x ^ $y; $z ok 3422 - $y = -$x; $x ok 3423 - $y = abs($x); $x ok 3424 - $x->copy()->bmodpow($y, $z); $u ok 3425 - $x->copy()->bmodpow($y, $z); $y ok 3426 - $x->copy()->bmodpow($y, $z); $z ok 3427 - $y = -$x; $x ok 3428 - $y = -$x; $y ok 3429 - $y = $x->copy()->bneg(); $x ok 3430 - $y = $x->copy()->bneg(); $y ok 3431 - $x->bmul($y); $x ok 3432 - $x->bmul($y); $y ok 3433 - $x->badd($y); $x ok 3434 - $x->badd($y); $y ok 3435 - $x->bsub($y); $x ok 3436 - $x->bsub($y); $y ok 3437 - $x->bdiv($y); $x ok 3438 - $x->bdiv($y); $y ok 3439 - $x->bmod($y); $x ok 3440 - $x->bmod($y); $y ok 3441 - $x->bmul($y); $x ok 3442 - $x->bmul($y); $y ok 3443 - $x->badd($y); $x ok 3444 - $x->badd($y); $y ok 3445 - $x->bsub($y); $x ok 3446 - $x->bsub($y); $y ok 3447 - $x->bdiv($y); $x ok 3448 - $x->bdiv($y); $y ok 3449 - $x->bmod($y); $x ok 3450 - $x->bmod($y); $y ok 3451 - $x->bmul($y); $x ok 3452 - $x->bmul($y); $y ok 3453 - $x->badd($y); $x ok 3454 - $x->badd($y); $y ok 3455 - $x->bsub($y); $x ok 3456 - $x->bsub($y); $y ok 3457 - $x->bdiv($y); $x ok 3458 - $x->bdiv($y); $y ok 3459 - $x->bmod($y); $x ok 3460 - $x->bmod($y); $y ok 3461 - overloading cmp works ok 3462 - $x = Math::BigInt->new(10); $x = 2 ** $x; $x == 1024; ok 3463 - $x = Math::BigInt->new(10); $x = 2 * $x; $x == 20; ok 3464 - $x = Math::BigInt->new(10); $x = 2 + $x; $x == 12; ok 3465 - $x = Math::BigInt->new(10); $x = 2 - $x; $x == -8; ok 3466 - $x = Math::BigInt->new(10); $x = 20 / $x; $x == 2; ok 3467 - $x = Math::BigInt->new(3); $x = 20 % $x; $x == 2; ok 3468 - $x = Math::BigInt->new(7); $x = 20 & $x; $x == 4; ok 3469 - $x = Math::BigInt->new(7); $x = 0x20 | $x; $x == 0x27; ok 3470 - $x = Math::BigInt->new(7); $x = 0x20 ^ $x; $x == 0x27; ok 3471 - $x = Math::BigInt->badd(4, 5); $x == 9; ok 3472 - $x = Math::BigInt->new(1); $x is true ok 3473 - $x = Math::BigInt->new(0); !$x is false ok 3474 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 3475 - first arg matches /^Math::BigInt/ ok 3476 - second arg is 4 ok 3477 - third arg is 5 ok 3478 - objectify(0, 4, 5) gives Math::BigInt, 4, 5 ok 3479 - first arg matches /^Math::BigInt/ ok 3480 - second arg is 4 ok 3481 - third arg is 5 ok 3482 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 3483 - first arg matches /^Math::BigInt/ ok 3484 - second arg is 4 ok 3485 - third arg is 5 ok 3486 - objectify(2, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 3487 - first arg matches /^Math::BigInt/ ok 3488 - second arg is 4 ok 3489 - second arg is a Math::BigInt object ok 3490 - third arg is 5 ok 3491 - third arg is a Math::BigInt object ok 3492 - fourth arg is 6 ok 3493 - fourth arg is a scalar ok 3494 - fifth arg is 7 ok 3495 - fifth arg is a scalar ok 3496 - objectify(2, Math::BigInt, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 3497 - first arg is Math::BigInt ok 3498 - second arg is 4 ok 3499 - second arg is a Math::BigInt object ok 3500 - third arg is 5 ok 3501 - third arg is a Math::BigInt object ok 3502 - fourth arg is 6 ok 3503 - fourth arg is a scalar ok 3504 - fifth arg is 7 ok 3505 - fifth arg is a scalar ok 3506 - Math::BigInt->new(123)->badd(123) = 246 ok 3507 - Math::BigInt->badd(123, 321) = 444 ok 3508 - Math::BigInt->badd(123, Math::BigInt->new(321)) = 444 ok 3509 - Math::BigInt->new(123)->bsub(122) = 1 ok 3510 - Math::BigInt->bsub(321, 123) = 198 ok 3511 - Math::BigInt->bsub(321, Math::BigInt->new(123)) = 198 ok 3512 - Math::BigInt->new(123)->bmul(123) = 15129 ok 3513 - Math::BigInt->bmul(123, 123) = 15129 ok 3514 - Math::BigInt->bmul(123, Math::BigInt->new(123)) = 15129 ok 3515 - Math::BigInt->new(15129)->bdiv(123) = 123 ok 3516 - Math::BigInt->bdiv(15129, 123) = 123 ok 3517 - Math::BigInt->bdiv(15129, Math::BigInt->new(123)) = 123 ok 3518 - Math::BigInt->new(15131)->bmod(123) = 2 ok 3519 - Math::BigInt->bmod(15131, 123) = 2 ok 3520 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) = 2 ok 3521 - Math::BigInt->new(2)->bpow(16) = 65536 ok 3522 - Math::BigInt->bpow(2, 16) = 65536 ok 3523 - Math::BigInt->bpow(2, Math::BigInt->new(16)) = 65536 ok 3524 - Math::BigInt->new(2**15)->brsft(1) = 2**14 ok 3525 - Math::BigInt->brsft(2**15, 1) = 2**14 ok 3526 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) = 2**14 ok 3527 - Math::BigInt->new(2**13)->blsft(1) = 2**14 ok 3528 - Math::BigInt->blsft(2**13, 1) = 2**14 ok 3529 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) = 2**14 ok 3530 - $x = Math::BigInt->new(1.05e+015); $x->bsstr() = "105e+13" ok 3531 - $x = Math::BigInt->new(1e+129); $x->bsstr() = "1e+129" ok 3532 - Math::BigInt->new("1") = 1 ok 3533 - Math::BigInt->new(" 1") = 1 ok 3534 - Math::BigInt->new("1 ") = 1 ok 3535 - Math::BigInt->new(" 1 ") = 1 ok 3536 - Math::BigInt->new("\n1") = 1 ok 3537 - Math::BigInt->new("1\n") = 1 ok 3538 - Math::BigInt->new("\n1\n") = 1 ok 3539 - Math::BigInt->new(" \n1\n") = 1 ok 3540 - Math::BigInt->new(" \n1 \n") = 1 ok 3541 - Math::BigInt->new(" \n1\n ") = 1 ok 3542 - Math::BigInt->new(" \n1\n1") = 'NaN' ok 3543 - Math::BigInt->new("1 \n1\n1") = 'NaN' ok 3544 - Math::BigInt->new("12") = 12 ok 3545 - Math::BigInt->new(" 12") = 12 ok 3546 - Math::BigInt->new("12 ") = 12 ok 3547 - Math::BigInt->new(" 12 ") = 12 ok 3548 - Math::BigInt->new("\n12") = 12 ok 3549 - Math::BigInt->new("12\n") = 12 ok 3550 - Math::BigInt->new("\n12\n") = 12 ok 3551 - Math::BigInt->new(" \n12\n") = 12 ok 3552 - Math::BigInt->new(" \n12 \n") = 12 ok 3553 - Math::BigInt->new(" \n12\n ") = 12 ok 3554 - Math::BigInt->new(" \n12\n1") = 'NaN' ok 3555 - Math::BigInt->new("1 \n12\n1") = 'NaN' ok 3556 - Math::BigInt->new("123") = 123 ok 3557 - Math::BigInt->new(" 123") = 123 ok 3558 - Math::BigInt->new("123 ") = 123 ok 3559 - Math::BigInt->new(" 123 ") = 123 ok 3560 - Math::BigInt->new("\n123") = 123 ok 3561 - Math::BigInt->new("123\n") = 123 ok 3562 - Math::BigInt->new("\n123\n") = 123 ok 3563 - Math::BigInt->new(" \n123\n") = 123 ok 3564 - Math::BigInt->new(" \n123 \n") = 123 ok 3565 - Math::BigInt->new(" \n123\n ") = 123 ok 3566 - Math::BigInt->new(" \n123\n1") = 'NaN' ok 3567 - Math::BigInt->new("1 \n123\n1") = 'NaN' ok 3568 - Math::BigInt->new("1234") = 1234 ok 3569 - Math::BigInt->new(" 1234") = 1234 ok 3570 - Math::BigInt->new("1234 ") = 1234 ok 3571 - Math::BigInt->new(" 1234 ") = 1234 ok 3572 - Math::BigInt->new("\n1234") = 1234 ok 3573 - Math::BigInt->new("1234\n") = 1234 ok 3574 - Math::BigInt->new("\n1234\n") = 1234 ok 3575 - Math::BigInt->new(" \n1234\n") = 1234 ok 3576 - Math::BigInt->new(" \n1234 \n") = 1234 ok 3577 - Math::BigInt->new(" \n1234\n ") = 1234 ok 3578 - Math::BigInt->new(" \n1234\n1") = 'NaN' ok 3579 - Math::BigInt->new("1 \n1234\n1") = 'NaN' ok 3580 - Math::BigInt->new("12345") = 12345 ok 3581 - Math::BigInt->new(" 12345") = 12345 ok 3582 - Math::BigInt->new("12345 ") = 12345 ok 3583 - Math::BigInt->new(" 12345 ") = 12345 ok 3584 - Math::BigInt->new("\n12345") = 12345 ok 3585 - Math::BigInt->new("12345\n") = 12345 ok 3586 - Math::BigInt->new("\n12345\n") = 12345 ok 3587 - Math::BigInt->new(" \n12345\n") = 12345 ok 3588 - Math::BigInt->new(" \n12345 \n") = 12345 ok 3589 - Math::BigInt->new(" \n12345\n ") = 12345 ok 3590 - Math::BigInt->new(" \n12345\n1") = 'NaN' ok 3591 - Math::BigInt->new("1 \n12345\n1") = 'NaN' ok 3592 - Math::BigInt->new("123456") = 123456 ok 3593 - Math::BigInt->new(" 123456") = 123456 ok 3594 - Math::BigInt->new("123456 ") = 123456 ok 3595 - Math::BigInt->new(" 123456 ") = 123456 ok 3596 - Math::BigInt->new("\n123456") = 123456 ok 3597 - Math::BigInt->new("123456\n") = 123456 ok 3598 - Math::BigInt->new("\n123456\n") = 123456 ok 3599 - Math::BigInt->new(" \n123456\n") = 123456 ok 3600 - Math::BigInt->new(" \n123456 \n") = 123456 ok 3601 - Math::BigInt->new(" \n123456\n ") = 123456 ok 3602 - Math::BigInt->new(" \n123456\n1") = 'NaN' ok 3603 - Math::BigInt->new("1 \n123456\n1") = 'NaN' ok 3604 - Math::BigInt->new("1234567") = 1234567 ok 3605 - Math::BigInt->new(" 1234567") = 1234567 ok 3606 - Math::BigInt->new("1234567 ") = 1234567 ok 3607 - Math::BigInt->new(" 1234567 ") = 1234567 ok 3608 - Math::BigInt->new("\n1234567") = 1234567 ok 3609 - Math::BigInt->new("1234567\n") = 1234567 ok 3610 - Math::BigInt->new("\n1234567\n") = 1234567 ok 3611 - Math::BigInt->new(" \n1234567\n") = 1234567 ok 3612 - Math::BigInt->new(" \n1234567 \n") = 1234567 ok 3613 - Math::BigInt->new(" \n1234567\n ") = 1234567 ok 3614 - Math::BigInt->new(" \n1234567\n1") = 'NaN' ok 3615 - Math::BigInt->new("1 \n1234567\n1") = 'NaN' ok 3616 - Math::BigInt->new("12345678") = 12345678 ok 3617 - Math::BigInt->new(" 12345678") = 12345678 ok 3618 - Math::BigInt->new("12345678 ") = 12345678 ok 3619 - Math::BigInt->new(" 12345678 ") = 12345678 ok 3620 - Math::BigInt->new("\n12345678") = 12345678 ok 3621 - Math::BigInt->new("12345678\n") = 12345678 ok 3622 - Math::BigInt->new("\n12345678\n") = 12345678 ok 3623 - Math::BigInt->new(" \n12345678\n") = 12345678 ok 3624 - Math::BigInt->new(" \n12345678 \n") = 12345678 ok 3625 - Math::BigInt->new(" \n12345678\n ") = 12345678 ok 3626 - Math::BigInt->new(" \n12345678\n1") = 'NaN' ok 3627 - Math::BigInt->new("1 \n12345678\n1") = 'NaN' ok 3628 - Math::BigInt->new("123456789") = 123456789 ok 3629 - Math::BigInt->new(" 123456789") = 123456789 ok 3630 - Math::BigInt->new("123456789 ") = 123456789 ok 3631 - Math::BigInt->new(" 123456789 ") = 123456789 ok 3632 - Math::BigInt->new("\n123456789") = 123456789 ok 3633 - Math::BigInt->new("123456789\n") = 123456789 ok 3634 - Math::BigInt->new("\n123456789\n") = 123456789 ok 3635 - Math::BigInt->new(" \n123456789\n") = 123456789 ok 3636 - Math::BigInt->new(" \n123456789 \n") = 123456789 ok 3637 - Math::BigInt->new(" \n123456789\n ") = 123456789 ok 3638 - Math::BigInt->new(" \n123456789\n1") = 'NaN' ok 3639 - Math::BigInt->new("1 \n123456789\n1") = 'NaN' ok 3640 - Math::BigInt->new("1234567890") = 1234567890 ok 3641 - Math::BigInt->new(" 1234567890") = 1234567890 ok 3642 - Math::BigInt->new("1234567890 ") = 1234567890 ok 3643 - Math::BigInt->new(" 1234567890 ") = 1234567890 ok 3644 - Math::BigInt->new("\n1234567890") = 1234567890 ok 3645 - Math::BigInt->new("1234567890\n") = 1234567890 ok 3646 - Math::BigInt->new("\n1234567890\n") = 1234567890 ok 3647 - Math::BigInt->new(" \n1234567890\n") = 1234567890 ok 3648 - Math::BigInt->new(" \n1234567890 \n") = 1234567890 ok 3649 - Math::BigInt->new(" \n1234567890\n ") = 1234567890 ok 3650 - Math::BigInt->new(" \n1234567890\n1") = 'NaN' ok 3651 - Math::BigInt->new("1 \n1234567890\n1") = 'NaN' ok 3652 - value of ((2^148)+1)/17 ok 3653 - number of digits in ((2^148)+1)/17 ok 3654 - value of 2^127-1 ok 3655 - number of digits in 2^127-1 ok 3656 - number of digits in fraction part of 2^127-1 ok 3657 - number of digits in 1_000_000_000_000 ok 3658 - number of digits in fraction part of 1_000_000_000_000 ok 3659 - 2 <<= 18 with Math::BigInt objects ok 3660 - 2 <<= 18 with Math::BigInt objects ok 3661 - 2 >>= 18 with Math::BigInt objects ok 3662 - 2 >>= 18 with Math::BigInt objects ok 3663 - $x = Math::Foo->new(5); $x = $x - 8; $x = 3 ok 3664 - $x is an object of class "Math::Foo" ok 3665 - $x = Math::Foo->new(5); $x = 8 - $x; $x = -3 ok 3666 - $x is an object of class "Math::Foo" ok 3667 - numify of +Inf ok 3668 - numify of -Inf ok 3669 - numify of NaN ok 3670 - Math::BigInt->new("+inf") = "inf" ok 3671 # skip no 64 bit integer support ok 3672 # skip no 64 bit integer support ok 3673 # skip no 64 bit integer support ok 3674 # skip no 64 bit integer support ok 3675 - is a valid object ok 3676 - $x == 10000000 ok 3677 - is a valid object ok 3678 - $x == 9999999 ok 3679 - is a valid object ok 3680 - $x->numify() = $BASE-1 ok 3681 - $x->numify() = -($BASE-1) ok 3682 - $x->numify()+0 = $BASE+0 ok 3683 - $x->numify() = -$BASE ok 3684 - $x->numify() = -($BASE*$BASE*1+$BASE*1+1)) ok 3685 - $x > $BASE ok 3686 - $x > $BASE ok 3687 - $x->length() = length($MAX) ok 3688 - Math::BigInt->digit(123, 2) = 1 ok 3689 - testing bug in sub ok 3690 - testing bug in sub ok 3691 - testing number with a zero-hole of BASE_LEN_SMALL ok 3692 - see if mul shortcut for small numbers works ok 3693 - -322056000 / -12882240 has remainder 0 ok 3694 - is a valid object ok 3695 - $x->bmod(5033) = 4404 ok 3696 - Math::BigInt->bzero() = 0 ok 3697 - Math::BigInt->bone() = 1 ok 3698 - Math::BigInt->bone("+") = 1 ok 3699 - Math::BigInt->bone("-") = -1 ok 3700 - Math::BigInt->bnan() = "NaN" ok 3701 - Math::BigInt->binf() = "inf" ok 3702 - Math::BigInt->binf("+") = "inf" ok 3703 - Math::BigInt->binf("-") = "-inf" ok 3704 - Math::BigInt->binf("-inf") = "-inf" ok 3705 - Math::BigInt->new(1)->is_one("-") = 0 ok 3706 - Math::BigInt->new(-1)->is_one("-") = 1 ok 3707 - Math::BigInt->new(1)->is_one() = 1 ok 3708 - Math::BigInt->new(-1)->is_one() = 0 ok 3709 - $x = Math::BigInt->new(3); $x -= $x; = 0 ok 3710 - $x = Math::BigInt->new(-3); $x -= $x; = 0 ok 3711 - $x = Math::BigInt->new("NaN"); $x -= $x; $x->is_nan() = 1 ok 3712 - $x = Math::BigInt->new("inf"); $x -= $x; $x->is_nan() = 1 ok 3713 - $x = Math::BigInt->new("-inf"); $x -= $x; $x->is_nan() = 1 ok 3714 - $x = Math::BigInt->new("NaN"); $x += $x; $x->is_nan() = 1 ok 3715 - $x = Math::BigInt->new("inf"); $x += $x; $x->is_inf() = 1 ok 3716 - $x = Math::BigInt->new("-inf"); $x += $x; $x->is_inf("-") = 1 ok 3717 - $x = Math::BigInt->new(3); $x += $x; $x = 6 ok 3718 - $x = Math::BigInt->new(-3); $x += $x; $x = -6 ok 3719 - $x = Math::BigInt->new(3); $x *= $x; $x = 9 ok 3720 - $x = Math::BigInt->new(-3); $x *= $x; $x = 9 ok 3721 - $x = Math::BigInt->new(3); $x /= $x; $x = 1 ok 3722 - $x = Math::BigInt->new(-3); $x /= $x; $x = 1 ok 3723 - $x = Math::BigInt->new(3); $x %= $x; $x = 0 ok 3724 - $x = Math::BigInt->new(-3); $x %= $x; $x = 0 ok t\bare_mif.t ........... 1..685 # BareCalc using Calc v1.999715 ok 1 - Math::BigInt->config()->{lib} ok 2 - ${"Math::BigInt::accuracy"} ok 3 - ${"Math::BigInt::precision"} ok 4 - Math::BigInt->accuracy() ok 5 - Math::BigInt->precision() ok 6 - ${"Math::BigInt::div_scale"} ok 7 - ${"Math::BigInt::round_mode"} ok 8 - Math::BigInt->round_mode() ok 9 - ${"Math::BigFloat::accuracy"} ok 10 - ${"Math::BigFloat::precision"} ok 11 - Math::BigFloat->precision() ok 12 - Math::BigFloat->precision() ok 13 - ${"Math::BigFloat::div_scale"} ok 14 - ${"Math::BigFloat::round_mode"} ok 15 - Math::BigFloat->round_mode() ok 16 - Math::BigInt->accuracy() ok 17 - Math::BigInt->precision() ok 18 - Math::BigInt->round_mode() ok 19 - Math::BigInt->div_scale() ok 20 - Math::BigInt->div_scale(20) ok 21 - Math::BigInt->div_scale() ok 22 - Math::BigInt->round_mode("odd") ok 23 - Math::BigInt->round_mode() ok 24 - Math::BigInt->accuracy(2) ok 25 - Math::BigInt->accuracy() ok 26 - Math::BigInt->accuracy(undef) ok 27 - Math::BigInt->precision(2) ok 28 - Math::BigInt->precision(-2) ok 29 - Math::BigInt->precision() ok 30 - Math::BigInt->precision(undef) ok 31 - Math::BigFloat->accuracy() ok 32 - Math::BigFloat->precision() ok 33 - Math::BigFloat->round_mode() ok 34 - Math::BigFloat->div_scale() ok 35 - Math::BigFloat->div_scale(20) ok 36 - Math::BigFloat->div_scale() ok 37 - Math::BigFloat->round_mode("odd") ok 38 - Math::BigFloat->round_mode() ok 39 - Math::BigFloat->accuracy(2) ok 40 - Math::BigFloat->accuracy() ok 41 - Math::BigFloat->accuracy(undef) ok 42 - Math::BigFloat->precision(2) ok 43 - Math::BigFloat->precision(-2) ok 44 - Math::BigFloat->precision() ok 45 - Math::BigFloat->precision(undef) ok 46 - ${"Math::BigFloat::accuracy"} = 5 ok 47 - ${"Math::BigInt::accuracy"} = 5 ok 48 - ${"Math::BigFloat::accuracy"} = 42 ok 49 - ${"Math::BigInt::accuracy"} = 42 ok 50 - ${"Math::BigFloat::accuracy"} = -1 ok 51 - ${"Math::BigInt::accuracy"} = -1 ok 52 - ${"Math::BigFloat::accuracy"} = 0 ok 53 - ${"Math::BigInt::accuracy"} = 0 ok 54 - ${"Math::BigFloat::accuracy"} = undef ok 55 - ${"Math::BigInt::accuracy"} = undef ok 56 - ${"Math::BigFloat::precision"} = 5 ok 57 - ${"Math::BigInt::precision"} = 5 ok 58 - ${"Math::BigFloat::precision"} = 42 ok 59 - ${"Math::BigInt::precision"} = 42 ok 60 - ${"Math::BigFloat::precision"} = -1 ok 61 - ${"Math::BigInt::precision"} = -1 ok 62 - ${"Math::BigFloat::precision"} = 0 ok 63 - ${"Math::BigInt::precision"} = 0 ok 64 - ${"Math::BigFloat::precision"} = undef ok 65 - ${"Math::BigInt::precision"} = undef ok 66 - ${"Math::BigFloat::div_scale"} = 5 ok 67 - ${"Math::BigInt::div_scale"} = 5 ok 68 - ${"Math::BigFloat::div_scale"} = 42 ok 69 - ${"Math::BigInt::div_scale"} = 42 ok 70 - ${"Math::BigFloat::div_scale"} = 1 ok 71 - ${"Math::BigInt::div_scale"} = 1 ok 72 - ${"Math::BigFloat::round_mode"} = "odd" ok 73 - ${"Math::BigInt::round_mode"} = "odd" ok 74 - ${"Math::BigFloat::round_mode"} = "even" ok 75 - ${"Math::BigInt::round_mode"} = "even" ok 76 - ${"Math::BigFloat::round_mode"} = "zero" ok 77 - ${"Math::BigInt::round_mode"} = "zero" ok 78 - ${"Math::BigFloat::round_mode"} = "trunc" ok 79 - ${"Math::BigInt::round_mode"} = "trunc" ok 80 - ${"Math::BigFloat::round_mode"} = "+inf" ok 81 - ${"Math::BigInt::round_mode"} = "+inf" ok 82 - ${"Math::BigFloat::round_mode"} = "-inf" ok 83 - ${"Math::BigInt::round_mode"} = "-inf" ok 84 - ${"Math::BigFloat::round_mode"} ok 85 - ${"Math::BigInt::round_mode"} ok 86 - $x->accuracy() ok 87 - $x->accuracy(5) ok 88 - $x->accuracy(undef) ok 89 - $x->precision() ok 90 - $x->precision(5) ok 91 - $x->precision(undef) ok 92 - ${"Math::BigInt::accuracy"} = 42 ok 93 - ${"Math::BigFloat::accuracy"} = 64 ok 94 - ${"Math::BigInt::accuracy"} = 42 ok 95 - ${"Math::BigFloat::accuracy"} = 64 ok 96 - Math::BigInt->new(123456) = 123500 ok 97 - Math::BigInt->new(123456) = 123000 ok 98 - Math::BigFloat->new("123.456") = 123.5 ok 99 - Math::BigFloat->new("123.456") = 123.5 ok 100 - Math::BigFloat->new("123.456") = 123.456 ok 101 - $x = Math::BigFloat->new("123.456"); $x->accuracy(4) ok 102 - $x = Math::BigFloat->new("123.456"); $x->precision(-2) ok 103 - $x = Math::BigInt->new(123456); $x->accuracy(4) ok 104 - $x = Math::BigInt->new(123456); $x->precision(2) ok 105 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5) ok 106 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(4) ok 107 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5, 2) ok 108 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, -2) ok 109 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, 2) ok 110 - $x = Math::BigInt->new("123"); $x->round(5, 2) ok 111 - $x = Math::BigFloat->new("123.45000"); $x->copy()->round(undef, -1, "odd") ok 112 - $x = Math::BigFloat->new("123.4567"); $y = $x->copy()->bround() ok 113 - $y = $x->copy()->round(5); $y->accuracy() ok 114 - $y = $x->copy()->round(5); $y->precision() ok 115 - $y = $x->copy()->round(undef, 2); $y->precision() ok 116 - $y = $x->copy()->round(undef, 2); $y->accuracy() ok 117 - $x = $mbf->new("123.4567") ok 118 - $x->accuracy(4) ok 119 - $x->precision(-2) ok 120 - $x->accuracy() ok 121 - $x = $mbf->new("123.4567") ok 122 - $x->precision(-2) ok 123 - $x->accuracy(4) ok 124 - $x->precision() ok 125 - $z = $x->copy(); $z->accuracy() ok 126 - $z = $x->copy(); $z->precision() ok 127 - $x->copy()->bdiv(3, 4) ok 128 - $x->copy()->bdiv(3, 8) ok 129 - $x->copy()->bdiv(3, 16) ok 130 - $x->copy()->bdiv(3, 32) ok 131 - $x = Math::BigInt->bzero(); $x->accuracy(5); $x->{_a} ok 132 - $x = Math::BigInt->bzero(); $x->precision(5); $x->{_p} ok 133 - $x = Math::BigInt->new(0); $x->accuracy(5); $x->{_a} ok 134 - $x = Math::BigInt->new(0); $x->precision(5); $x->{_p} ok 135 - $x = Math::BigInt->bzero(); $x->round(5); $x->{_a} ok 136 - $x = Math::BigInt->bzero(); $x->round(undef, 5); $x->{_p} ok 137 - $x = Math::BigInt->new(0); $x->round(5); $x->{_a} ok 138 - $x = Math::BigInt->new(0); $x->round(undef, 5); $x->{_p} ok 139 - $x = Math::BigInt->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 140 - $x = Math::BigFloat->bzero(); $x->accuracy(5); $x->{_a} ok 141 - $x = Math::BigFloat->bzero(); $x->precision(5); $x->{_p} ok 142 - $x = Math::BigFloat->new(0); $x->accuracy(5); $x->{_a} ok 143 - $x = Math::BigFloat->new(0); $x->precision(5); $x->{_p} ok 144 - $x = Math::BigFloat->bzero(); $x->round(5); $x->{_a} ok 145 - $x = Math::BigFloat->bzero(); $x->round(undef, 5); $x->{_p} ok 146 - $x = Math::BigFloat->new(0); $x->round(5); $x->{_a} ok 147 - $x = Math::BigFloat->new(0); $x->round(undef, 5); $x->{_p} ok 148 - $x = Math::BigFloat->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 149 - Math::BigInt->new(123)->badd(123) ok 150 - Math::BigInt->badd(123, 321) ok 151 - Math::BigInt->badd(123, Math::BigInt->new(321)) ok 152 - Math::BigInt->new(123)->bsub(122) ok 153 - Math::BigInt->bsub(321, 123) ok 154 - Math::BigInt->bsub(321, Math::BigInt->new(123)) ok 155 - Math::BigInt->new(123)->bmul(123) ok 156 - Math::BigInt->bmul(123, 123) ok 157 - Math::BigInt->bmul(123, Math::BigInt->new(123)) ok 158 - Math::BigInt->new(15131)->bmod(123) ok 159 - Math::BigInt->bmod(15131, 123) ok 160 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) ok 161 - Math::BigInt->new(2)->bpow(16) ok 162 - Math::BigInt->bpow(2, 16) ok 163 - Math::BigInt->bpow(2, Math::BigInt->new(16)) ok 164 - Math::BigInt->new(2**15)->brsft(1) ok 165 - Math::BigInt->brsft(2**15, 1) ok 166 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) ok 167 - Math::BigInt->new(2**13)->blsft(1) ok 168 - Math::BigInt->blsft(2**13, 1) ok 169 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) ok 170 - Math::BigFloat->new(123)->badd(123) ok 171 - Math::BigFloat->badd(123, 321) ok 172 - Math::BigFloat->badd(123, Math::BigFloat->new(321)) ok 173 - Math::BigFloat->new(123)->bsub(122) ok 174 - Math::BigFloat->bsub(321, 123) ok 175 - Math::BigFloat->bsub(321, Math::BigFloat->new(123)) ok 176 - Math::BigFloat->new(123)->bmul(123) ok 177 - Math::BigFloat->bmul(123, 123) ok 178 - Math::BigFloat->bmul(123, Math::BigFloat->new(123)) ok 179 - Math::BigFloat->new(15131)->bmod(123) ok 180 - Math::BigFloat->bmod(15131, 123) ok 181 - Math::BigFloat->bmod(15131, Math::BigFloat->new(123)) ok 182 - Math::BigFloat->new(2)->bpow(16) ok 183 - Math::BigFloat->bpow(2, 16) ok 184 - Math::BigFloat->bpow(2, Math::BigFloat->new(16)) ok 185 - Math::BigFloat->new(2**15)->brsft(1) ok 186 - Math::BigFloat->brsft(2**15, 1) ok 187 - Math::BigFloat->brsft(2**15, Math::BigFloat->new(1)) ok 188 - Math::BigFloat->new(2**13)->blsft(1) ok 189 - Math::BigFloat->blsft(2**13, 1) ok 190 - Math::BigFloat->blsft(2**13, Math::BigFloat->new(1)) ok 191 - $z = $x + $y ok 192 - $z = $y - $x ok 193 - $z = $y * $x ok 194 - $z = $x ** 2 ok 195 - $z = $x * $x ok 196 - $z = $z / 2 ok 197 - $z++ ok 198 - $z = $x + $y ok 199 - $z = $y - $x ok 200 - $z = $y * $x ok 201 - $z = $x ** 2 ok 202 - $z++ ok 203 - $z = $z / 2 ok 204 - $x->bnot() ok 205 - $x->babs() ok 206 - $x->bneg() ok 207 - $x ok 208 - $x->bdiv($y) ok 209 - $x->{_a} ok 210 - $x->bdiv($y) ok 211 - $x->{_a} ok 212 - $x->bdiv($y) ok 213 - $x->{_a} ok 214 - $x->bdiv($y) ok 215 - $x->{_a} ok 216 - $x->copy()->bsqrt(...) ok 217 - $x->copy->bsqrt(...) ok 218 - $x->{_a} ok 219 - $z = $x->bsqrt(); $z ok 220 - $z = $x->bsqrt(); $x ok 221 - $x->copy()->bpow(...) ok 222 - $x->copy()->bpow(...) vs. $x->copy()->bsqrt(...) ok 223 - $x->copy()->bpow('2', 0) ok 224 - $mbi->new(12)->bfac() ok 225 - $mbi->new(12)->bfac(2) ok 226 - $x = Math::BigInt->new(12); $x->accuracy(2); $x->bfac() ok 227 - $x = Math::BigInt->new(13); $x->accuracy(2); $x->bfac() ok 228 - $x = Math::BigInt->new(13); $x->accuracy(3); $x->bfac() ok 229 - $x = Math::BigInt->new(13); $x->accuracy(4); $x->bfac() ok 230 - $x = Math::BigInt->new(20); $x->accuracy(1); $x->bfac() ok 231 - $x = Math::BigInt->new("123456")->bsqrt(2, undef) ok 232 - $x->accuracy() ok 233 - $x = 360 ok 234 - $x = 400 ok 235 - $z = $x + $y; ok 236 - $z is a "Math::BigFloat" object ok 237 - $z = $x / $y; ok 238 - $z is a "Math::BigFloat" object ok 239 - $z = $u * $y; ok 240 - $z is a "Math::BigFloat" object ok 241 - $z = 31000 ok 242 - $z = 30900 ok 243 - $z = 30863 ok 244 - $z = 30863 ok 245 - $z = 30860 ok 246 - $z = 30900 ok 247 - $z = 30862.5 ok 248 - $z = "" ok 249 - "$z = $y >= 3.17" gives warning as expected ok 250 - $z = "" ok 251 - "$z = $y >= 3.17" gives warning as expected ok 252 - $x->bdiv(3) ok 253 - $x->{_a} ok 254 - $x->bdiv($y) ok 255 - $x->{_a} ok 256 - $x->bdiv(3) ok 257 - $x->bdiv(3, undef, -2) ok 258 - $x->bdiv(3, undef, -8) = "3.33333333" ok 259 - $x->bdiv($y) = '3.333' ok 260 - $x->{_a} = 4 ok 261 - $y->{_a} = 4 ok 262 - $x->{_p} = undef ok 263 - $y->{_p} = undef ok 264 - $x->bdiv($y) = '3.33' ok 265 - $x->{_p} = -2 ok 266 - $y->{_p} = -2 ok 267 - $x->{_a} = undef ok 268 - $y->{_a} = undef ok 269 - "$x->bround(-2)" gives warning as expected ok 270 - $x = "1.000" ok 271 - $x->{_a} = 4 ok 272 - $x = "1.000" ok 273 - $x = "1230" ok 274 - $x->{_a} = 3 ok 275 - $x = "1230" ok 276 - $x = "1200" ok 277 - $x->{_a} = 2 ok 278 - $x = "12300" ok 279 - $x->{_a} = 4 ok 280 - $x = "12000" ok 281 - $x->{_a} = 3 ok 282 - $x = "10000" ok 283 - $x->{_a} = 2 ok 284 - $x = "0" ok 285 - $x->{_a} = 1 ok 286 - $x = "0" ok 287 - $x->{_a} = 0 ok 288 - $x = "100000" ok 289 - $x->{_a} = 0 ok 290 - $x = "100000" ok 291 - $x->{_a} = 0 ok 292 - $x = "12345" ok 293 - $x->{_a} = 5 ok 294 - $x = "12345" ok 295 - $x = "0.01" ok 296 - $x = "0.00" ok 297 - $x = "0.00" ok 298 - $x = "12340" ok 299 - $x = "12340" ok 300 - $x->{_a} = undef ok 301 - $x = "0.000176118351532229658330398027474462839027826699542092286016203" ok 302 - $x = "0.000176118351532229658330398027474462839027826699542092286016202888340965128566396618527651" ok 303 - $x = "0.00017611835153222965833039802747446283902782669954209228601620288834096512856639662" ok 304 - $x = "1.00000" ok 305 - $x->bfround(-2) = "1.00" ok 306 - $x->{_p} = -2 ok 307 - $x->bround(2) = "12000" ok 308 - $x->{_a} = 2 ok 309 - $x->bround(2) = "1.2" ok 310 - $x->{_a} = 2 ok 311 - $x = "12350" ok 312 - $x->{_a} = 4 ok 313 - $x->{_p} = undef ok 314 - $x->{_a} = undef ok 315 - $x->{_p} = undef ok 316 - $x->{_a} = undef ok 317 - $x->{_p} = undef ok 318 - $y->{_a} = undef ok 319 - $y->{_p} = undef ok 320 - $x+$y = 24000 ok 321 - $x-$y = 42000 ok 322 - $x+$y = "2.46" ok 323 - scalar(@params) = 1 ok 324 - scalar(@params) = 4 ok 325 - $params[0] = $x ok 326 - $params[1] = 1 ok 327 - $params[2] = undef ok 328 - $params[3] = "odd" ok 329 - scalar(@params) = 4 ok 330 - $params[0] = $x ok 331 - $params[1] = undef ok 332 - $params[2] = 2 ok 333 - $params[3] = "odd" ok 334 - round mode "foo" gives a warning as expected ok 335 - scalar(@params) = 4 ok 336 - $params[0] = $x ok 337 - $params[1] = undef ok 338 - $params[2] = 2 ok 339 - $params[3] = "+inf" ok 340 - scalar(@params) = 1 ok 341 - $params[0] = $x ok 342 - scalar(@params) = 1 ok 343 - $params[0] = $x ok 344 - $x->is_nan() = 1 ok 345 - scalar(@params) = 1 ok 346 - $params[0] = $x ok 347 - $x->is_nan() = 1 ok 348 - $x->{_a} = undef ok 349 - $x->{_p} = undef ok 350 - $x->{_a} = undef ok 351 - $x->{_p} = undef ok 352 - $x->{_a} = undef ok 353 - $x->{_p} = undef ok 354 - $x->{_a} = undef ok 355 - $x->{_p} = undef ok 356 - $x->{_a} = undef ok 357 - $x->{_p} = undef ok 358 - $x->{_a} = undef ok 359 - $x->{_p} = undef ok 360 - $x->{_a} = 1 ok 361 - $x->{_p} = undef ok 362 - $x->{_a} = undef ok 363 - $x->{_p} = 1 ok 364 - $x->{_a} = 1 ok 365 - $x->{_p} = undef ok 366 - $x->{_a} = undef ok 367 - $x->{_p} = 1 ok 368 - $x->{_a} = 1 ok 369 - $x->{_p} = undef ok 370 - $x->{_a} = undef ok 371 - $x->{_p} = 1 ok 372 - $x->{_a} = 2 ok 373 - $x->{_p} = undef ok 374 - $x->{_a} = undef ok 375 - $x->{_p} = 2 ok 376 - $x->{_a} = 2 ok 377 - $x->{_p} = undef ok 378 - $x->{_a} = undef ok 379 - $x->{_p} = 2 ok 380 - $x->{_a} = 2 ok 381 - $x->{_p} = undef ok 382 - $x->{_a} = undef ok 383 - $x->{_p} = 2 ok 384 - $x->{_a} = undef ok 385 - $x->{_p} = undef ok 386 - $x->{_a} = undef ok 387 - $x->{_p} = undef ok 388 - $x->{_a} = undef ok 389 - $x->{_p} = undef ok 390 - $x->{_a} = undef ok 391 - $x->{_p} = undef ok 392 - $x->{_a} = undef ok 393 - $x->{_p} = undef ok 394 - $x->{_a} = undef ok 395 - $x->{_p} = undef ok 396 - $x->{_a} = 1 ok 397 - $x->{_p} = undef ok 398 - $x->{_a} = undef ok 399 - $x->{_p} = 1 ok 400 - $x->{_a} = 1 ok 401 - $x->{_p} = undef ok 402 - $x->{_a} = undef ok 403 - $x->{_p} = 1 ok 404 - $x->{_a} = 1 ok 405 - $x->{_p} = undef ok 406 - $x->{_a} = undef ok 407 - $x->{_p} = 1 ok 408 - $x->{_a} = 2 ok 409 - $x->{_p} = undef ok 410 - $x->{_a} = undef ok 411 - $x->{_p} = 2 ok 412 - $x->{_a} = 2 ok 413 - $x->{_p} = undef ok 414 - $x->{_a} = undef ok 415 - $x->{_p} = 2 ok 416 - $x->{_a} = 2 ok 417 - $x->{_p} = undef ok 418 - $x->{_a} = undef ok 419 - $x->{_p} = 2 ok 420 - $x->accuracy() = 2 ok 421 - $x->accuracy() = 2 ok 422 - $x->precision() = -2 ok 423 - $x->precision() = -2 ok 424 - $x->accuracy() = 2 ok 425 - $x->accuracy() = 2 ok 426 - $x->precision() = -2 ok 427 - $x->precision() = -2 ok 428 - mixing A and P creates a NaN ok 429 - $class->new(123) = "NaN" ok 430 - mixing A and P creates a NaN ok 431 - $class->new(123) = "NaN" ok 432 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->badd($y); ok 433 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bsub($y); ok 434 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bmul($y); ok 435 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bpow($y); ok 436 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bmod($y); ok 437 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->badd($y); ok 438 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bsub($y); ok 439 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bmul($y); ok 440 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bpow($y); ok 441 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bmod($y); ok 442 - my $x = Math::BigInt->new(1234, 5, -3); ok 443 - my $x = Math::BigInt->bsqrt(1234, 5, -3); ok 444 - $x = 120 ok 445 - $x = 120 ok 446 - $x = 120 ok 447 - $x = 120 ok 448 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->$f($y); ok 449 - is a valid object ok 450 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("0"); $x->$f($y); ok 451 - is a valid object ok 452 - $x->{_a} == 3 ok 453 - $x->{_p} is undef ok 454 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("0"); $x->$f($y); ok 455 - is a valid object ok 456 - $x->{_p} == -3 ok 457 - $x->{_a} is undef ok 458 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->accuracy(3); $x->$f($y); ok 459 - is a valid object ok 460 - $x->{_a} == 3 ok 461 - $x->{_p} is undef ok 462 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->precision(-3); $x->$f($y); ok 463 - is a valid object ok 464 - $x->{_p} == -3 ok 465 - $x->{_a} is undef ok 466 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->$f($y); ok 467 - is a valid object ok 468 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("0"); $x->$f($y); ok 469 - is a valid object ok 470 - $x->{_a} == 3 ok 471 - $x->{_p} is undef ok 472 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("0"); $x->$f($y); ok 473 - is a valid object ok 474 - $x->{_p} == -3 ok 475 - $x->{_a} is undef ok 476 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->accuracy(3); $x->$f($y); ok 477 - is a valid object ok 478 - $x->{_a} == 3 ok 479 - $x->{_p} is undef ok 480 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->precision(-3); $x->$f($y); ok 481 - is a valid object ok 482 - $x->{_p} == -3 ok 483 - $x->{_a} is undef ok 484 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("1"); $x->$f($y); ok 485 - is a valid object ok 486 - $x->{_a} == 3 ok 487 - $x->{_p} is undef ok 488 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("1"); $x->$f($y); ok 489 - is a valid object ok 490 - $x->{_p} == -3 ok 491 - $x->{_a} is undef ok 492 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->accuracy(3); $x->$f($y); ok 493 - is a valid object ok 494 - $x->{_a} == 3 ok 495 - $x->{_p} is undef ok 496 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->precision(-3); $x->$f($y); ok 497 - is a valid object ok 498 - $x->{_p} == -3 ok 499 - $x->{_a} is undef ok 500 - $x = Math::BigInt->new("1"); $x->accuracy(3); $y = Math::BigInt->new("123"); $x->$f($y); ok 501 - is a valid object ok 502 - $x->{_a} == 3 ok 503 - $x->{_p} is undef ok 504 - $x = Math::BigInt->new("1"); $x->precision(-3); $y = Math::BigInt->new("123"); $x->$f($y); ok 505 - is a valid object ok 506 - $x->{_p} == -3 ok 507 - $x->{_a} is undef ok 508 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->accuracy(3); $x->$f($y); ok 509 - is a valid object ok 510 - $x->{_a} == 3 ok 511 - $x->{_p} is undef ok 512 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->precision(-3); $x->$f($y); ok 513 - is a valid object ok 514 - $x->{_p} == -3 ok 515 - $x->{_a} is undef ok 516 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->$f($y); ok 517 - is a valid object ok 518 - $x = Math::BigInt->new("123"); $x->accuracy(4); $y = Math::BigInt->new("1"); $x->$f($y); ok 519 - is a valid object ok 520 - $x->{_a} == 4 ok 521 - $x->{_p} is undef ok 522 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->accuracy(4); $x->$f($y); ok 523 - is a valid object ok 524 - $x->{_a} == 4 ok 525 - $x->{_p} is undef ok 526 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->precision(-4); $x->$f($y); ok 527 - is a valid object ok 528 - $x->{_p} == -4 ok 529 - $x->{_a} is undef ok 530 - $x = Math::BigInt->new("123"); $x->precision(-4); $y = Math::BigInt->new("1"); $x->$f($y); ok 531 - is a valid object ok 532 - $x->{_p} == -4 ok 533 - $x->{_a} is undef ok 534 - $x = Math::BigInt->new("1"); $x->accuracy(4); $y = Math::BigInt->new("123"); $x->$f($y); ok 535 - is a valid object ok 536 - $x->{_a} == 4 ok 537 - $x->{_p} is undef ok 538 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->accuracy(4); $x->$f($y); ok 539 - is a valid object ok 540 - $x->{_a} == 4 ok 541 - $x->{_p} is undef ok 542 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->precision(-4); $x->$f($y); ok 543 - is a valid object ok 544 - $x->{_p} == -4 ok 545 - $x->{_a} is undef ok 546 - $x = Math::BigInt->new("1"); $x->precision(-4); $y = Math::BigInt->new("123"); $x->$f($y); ok 547 - is a valid object ok 548 - $x->{_p} == -4 ok 549 - $x->{_a} is undef ok 550 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->$f($y); ok 551 - is a valid object ok 552 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->$f($y); ok 553 - is a valid object ok 554 - $x->{_a} == 1 ok 555 - $x->{_p} is undef ok 556 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->$f($y); ok 557 - is a valid object ok 558 - $x->{_a} == 1 ok 559 - $x->{_p} is undef ok 560 - $x = Math::BigInt->new("1234"); $x->precision(-1); $y = Math::BigInt->new("0"); $x->$f($y); ok 561 - is a valid object ok 562 - $x->{_p} == -1 ok 563 - $x->{_a} is undef ok 564 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(-1); $x->$f($y); ok 565 - is a valid object ok 566 - $x->{_p} == -1 ok 567 - $x->{_a} is undef ok 568 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->$f($y); ok 569 - is a valid object ok 570 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 571 - is a valid object ok 572 - $x->{_a} == 2 ok 573 - $x->{_p} is undef ok 574 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->accuracy(2); $x->$f($y); ok 575 - is a valid object ok 576 - $x->{_a} == 2 ok 577 - $x->{_p} is undef ok 578 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 579 - is a valid object ok 580 - $x->{_p} == 1 ok 581 - $x->{_a} is undef ok 582 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->$f($y); ok 583 - is a valid object ok 584 - $x->{_p} == 1 ok 585 - $x->{_a} is undef ok 586 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->$f($y); ok 587 - is a valid object ok 588 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->$f($y); ok 589 - is a valid object ok 590 - $x->{_a} == 1 ok 591 - $x->{_p} is undef ok 592 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->$f($y); ok 593 - is a valid object ok 594 - $x->{_a} == 1 ok 595 - $x->{_p} is undef ok 596 - $x = Math::BigInt->new("1234"); $x->precision(3); $y = Math::BigInt->new("0"); $x->$f($y); ok 597 - is a valid object ok 598 - $x->{_p} == 3 ok 599 - $x->{_a} is undef ok 600 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(3); $x->$f($y); ok 601 - is a valid object ok 602 - $x->{_p} == 3 ok 603 - $x->{_a} is undef ok 604 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->$f($y); ok 605 - is a valid object ok 606 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 607 - is a valid object ok 608 - $x->{_a} == 2 ok 609 - $x->{_p} is undef ok 610 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->accuracy(2); $x->$f($y); ok 611 - is a valid object ok 612 - $x->{_a} == 2 ok 613 - $x->{_p} is undef ok 614 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 615 - is a valid object ok 616 - $x->{_p} == 1 ok 617 - $x->{_a} is undef ok 618 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->$f($y); ok 619 - is a valid object ok 620 - $x->{_p} == 1 ok 621 - $x->{_a} is undef ok 622 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFFF"); $x->$f($y); ok 623 - is a valid object ok 624 - $x->{_a} == 2 ok 625 - $x->{_p} is undef ok 626 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFFF"); $y->accuracy(2); $x->$f($y); ok 627 - is a valid object ok 628 - $x->{_a} == 2 ok 629 - $x->{_p} is undef ok 630 - $x = Math::BigInt->new("0xFF"); $x->precision(2); $y = Math::BigInt->new("0xFFF"); $x->$f($y); ok 631 - is a valid object ok 632 - $x->{_p} == 2 ok 633 - $x->{_a} is undef ok 634 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFFF"); $y->precision(2); $x->$f($y); ok 635 - is a valid object ok 636 - $x->{_p} == 2 ok 637 - $x->{_a} is undef ok 638 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->$f($y); ok 639 - is a valid object ok 640 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->$f($y); ok 641 - is a valid object ok 642 - $x->{_a} == 1 ok 643 - $x->{_p} is undef ok 644 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->$f($y); ok 645 - is a valid object ok 646 - $x->{_a} == 1 ok 647 - $x->{_p} is undef ok 648 - $x = Math::BigInt->new("1234"); $x->precision(3); $y = Math::BigInt->new("0"); $x->$f($y); ok 649 - is a valid object ok 650 - $x->{_p} == 3 ok 651 - $x->{_a} is undef ok 652 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(3); $x->$f($y); ok 653 - is a valid object ok 654 - $x->{_p} == 3 ok 655 - $x->{_a} is undef ok 656 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->$f($y); ok 657 - is a valid object ok 658 - $x = Math::BigInt->new("250"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 659 - is a valid object ok 660 - $x->{_a} == 2 ok 661 - $x->{_p} is undef ok 662 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("250"); $y->accuracy(2); $x->$f($y); ok 663 - is a valid object ok 664 - $x->{_a} == 2 ok 665 - $x->{_p} is undef ok 666 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 667 - is a valid object ok 668 - $x->{_p} == 1 ok 669 - $x->{_a} is undef ok 670 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->$f($y); ok 671 - is a valid object ok 672 - $x->{_p} == 1 ok 673 - $x->{_a} is undef ok 674 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->$f($y); ok 675 - is a valid object ok 676 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->$f($y); ok 677 - is a valid object ok 678 - $x = Math::BigInt->new("2"); $x->accuracy(2); $y = Math::BigInt->new("0"); $x->$f($y); ok 679 - is a valid object ok 680 - $x->{_a} == 2 ok 681 - $x->{_p} is undef ok 682 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $y->accuracy(2); $x->$f($y); ok 683 - is a valid object ok 684 - $x->{_a} == 2 ok 685 - $x->{_p} is undef ok t\big_pi_e.t ........... 1..8 ok 1 - A not set ok 2 - P not set ok 3 - A not set ok 4 - P not set ok 5 - A set ok 6 - P not set ok 7 - A not set ok 8 - P not set ok t\bigfltpm.t ........... 1..2414 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 - $e->{_e}->[0] is a scalar 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("0.008"); $y = Math::BigFloat->new(2); $x->bdiv(3, $y); ok 2369 - Math::BigFloat->new("12345e67")->numify() ok 2370 - Math::BigFloat->new("1e-9999")->numify() ok 2371 - Math::BigFloat->new("1e9999")->numify() ok 2372 - numify of +Inf ok 2373 - numify of -Inf ok 2374 - numify of NaN ok 2375 - $x = Math::BigFloat->new(12); Math::BigFloat->precision(-2); $x->bsqrt(); ok 2376 - Math::BigFloat->precision(undef); $x = Math::BigFloat->new(12); Math::BigFloat->precision(0); $x->bsqrt(); ok 2377 - Math::BigFloat->precision(-3); $x = Math::BigFloat->new(12); $x->bsqrt(); ok 2378 - A and P set => NaN ok 2379 - supplied arg overrides set global ok 2380 - @args = Math::BigFloat::objectify(2, Math::BigFloat, 4, 5); join(" ", @args); ok 2381 - Math::BigFloat->new(-1)->is_one() ok 2382 - Math::BigFloat->new(-1)->is_one("-") ok 2383 - Math::BigFloat->new(1)->bdiv("0.5")->bsstr() ok 2384 - $x = Math::BigFloat->new(3); $x -= $x; ok 2385 - $x = Math::BigFloat->new(-3); $x -= $x; ok 2386 - $x = Math::BigFloat->new(3); $x += $x; ok 2387 - $x = Math::BigFloat->new(-3); $x += $x; ok 2388 - $x = Math::BigFloat->new("NaN"); $x -= $x; ok 2389 - $x = Math::BigFloat->new("inf"); $x -= $x; ok 2390 - $x = Math::BigFloat->new("-inf"); $x -= $x; ok 2391 - $x = Math::BigFloat->new("NaN"); $x += $x; ok 2392 - $x = Math::BigFloat->new("inf"); $x += $x; ok 2393 - $x = Math::BigFloat->new("-inf"); $x += $x; ok 2394 - $x = Math::BigFloat->new("3.14"); $x -= $x; ok 2395 - $x = Math::BigFloat->new("-3.14"); $x -= $x; ok 2396 - 6.28 = Math::BigFloat->new("3.14"); 6.28 += 6.28; ok 2397 - -6.28 = Math::BigFloat->new("-3.14"); -6.28 += -6.28; ok 2398 - 9.8596 = Math::BigFloat->new("3.14"); 9.8596 *= 9.8596; ok 2399 - 9.8596 = Math::BigFloat->new("-3.14"); 9.8596 *= 9.8596; ok 2400 - 1 = Math::BigFloat->new("3.14"); 1 /= 1; ok 2401 - 1 = Math::BigFloat->new("-3.14"); 1 /= 1; ok 2402 - 0 = Math::BigFloat->new("3.14"); 0 %= 0; ok 2403 - 0 = Math::BigFloat->new("-3.14"); 0 %= 0; ok 2404 - $x = Math::BigFloat->new(0); $y = Math::BigFloat->new("0.1"); $x ** $y ok 2405 - 1 = Math::BigFloat->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 2406 - value of ((2**148)+1)/17 ok 2407 - number of digits in ((2**148)+1)/17 ok 2408 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y ok 2409 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x ok 2410 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y ok 2411 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y; $x ok 2412 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); ok 2413 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 2414 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y; $x ok t\bigintc.t ............ 1..379 # BASE_LEN = 7 # MAX_VAL = 9999999 # AND_BITS = 23 # XOR_BITS = 23 # IOR_BITS = 23 ok 1 - ref($x) is an ARRAY ok 2 - Math::BigInt::Calc->_str($x) = 123 ok 3 - Math::BigInt::Calc->_str($y) = 321 ok 4 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_add($x, $y)) = 444 ok 5 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_sub($x, $y)) = 123 ok 6 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_mul($x, $y)) = 39483 ok 7 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_div($x, $y)) = 123 ok 8 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_mul($x, $y)) = 39483 ok 9 - Math::BigInt::Calc->_str($x) = 39483 ok 10 - Math::BigInt::Calc->_str($y) = 321 ok 11 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_div($x, $y)) = 123 ok 12 - Math::BigInt::Calc->_str($x) = 123 ok 13 - Math::BigInt::Calc->_str($y) = 321 ok 14 - "$x1" = "$x" ok 15 - "$x1" = "$x" ok 16 - Math::BigInt::Calc->_str($r1) = "0" ok 17 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_add($x, $z)) = 39485 ok 18 - Math::BigInt::Calc->_str($re) = 123 ok 19 - Math::BigInt::Calc->_str($rr) = 2 ok 20 - Math::BigInt::Calc->_is_zero($x) || 0 = 0 ok 21 - Math::BigInt::Calc->_is_one($x) || 0 = 0 ok 22 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_zero()) = "0" ok 23 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_one()) = "1" ok 24 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_two()) = "2" ok 25 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_ten()) = "10" ok 26 - Math::BigInt::Calc->_is_ten(Math::BigInt::Calc->_two()) = 0 ok 27 - Math::BigInt::Calc->_is_two(Math::BigInt::Calc->_two()) = 1 ok 28 - Math::BigInt::Calc->_is_ten(Math::BigInt::Calc->_ten()) = 1 ok 29 - Math::BigInt::Calc->_is_two(Math::BigInt::Calc->_ten()) = 0 ok 30 - Math::BigInt::Calc->_is_one(Math::BigInt::Calc->_one()) = 1 ok 31 - Math::BigInt::Calc->_is_one(Math::BigInt::Calc->_two()) = 0 ok 32 - Math::BigInt::Calc->_is_one(Math::BigInt::Calc->_ten()) = 0 ok 33 - Math::BigInt::Calc->_is_one(Math::BigInt::Calc->_zero()) || 0 = 0 ok 34 - Math::BigInt::Calc->_is_zero(Math::BigInt::Calc->_zero()) = 1 ok 35 - Math::BigInt::Calc->_is_zero(Math::BigInt::Calc->_one()) || 0 = 0 ok 36 - Math::BigInt::Calc->_is_odd(Math::BigInt::Calc->_one()) = 1 ok 37 - Math::BigInt::Calc->_is_odd(Math::BigInt::Calc->_zero()) || 0 = 0 ok 38 - Math::BigInt::Calc->_is_even(Math::BigInt::Calc->_one()) || 0 = 0 ok 39 - Math::BigInt::Calc->_is_even(Math::BigInt::Calc->_zero()) = 1 ok 40 - Math::BigInt::Calc->_alen($x) = 1 ok 41 - Math::BigInt::Calc->_alen($x) = 2 ok 42 - Math::BigInt::Calc->_alen($x) = 3 ok 43 - Math::BigInt::Calc->_alen($x) = 4 ok 44 - Math::BigInt::Calc->_alen($x) = 5 ok 45 - Math::BigInt::Calc->_alen($x) = 6 ok 46 - Math::BigInt::Calc->_alen($x) = 7 ok 47 - Math::BigInt::Calc->_alen($x) = 8 ok 48 - Math::BigInt::Calc->_alen($x) = 9 ok 49 - Math::BigInt::Calc->_alen($x) = 1 ok 50 - Math::BigInt::Calc->_alen($x) = 2 ok 51 - Math::BigInt::Calc->_alen($x) = 3 ok 52 - Math::BigInt::Calc->_alen($x) = 4 ok 53 - Math::BigInt::Calc->_alen($x) = 5 ok 54 - Math::BigInt::Calc->_alen($x) = 6 ok 55 - Math::BigInt::Calc->_alen($x) = 7 ok 56 - Math::BigInt::Calc->_alen($x) = 8 ok 57 - Math::BigInt::Calc->_alen($x) = 9 ok 58 - Math::BigInt::Calc->_alen($x) = 1 ok 59 - Math::BigInt::Calc->_alen($x) = 2 ok 60 - Math::BigInt::Calc->_alen($x) = 3 ok 61 - Math::BigInt::Calc->_alen($x) = 4 ok 62 - Math::BigInt::Calc->_alen($x) = 5 ok 63 - Math::BigInt::Calc->_alen($x) = 6 ok 64 - Math::BigInt::Calc->_alen($x) = 7 ok 65 - Math::BigInt::Calc->_alen($x) = 8 ok 66 - Math::BigInt::Calc->_alen($x) = 9 ok 67 - Math::BigInt::Calc->_len($x) = 1 ok 68 - Math::BigInt::Calc->_len($x) = 2 ok 69 - Math::BigInt::Calc->_len($x) = 3 ok 70 - Math::BigInt::Calc->_len($x) = 4 ok 71 - Math::BigInt::Calc->_len($x) = 5 ok 72 - Math::BigInt::Calc->_len($x) = 6 ok 73 - Math::BigInt::Calc->_len($x) = 7 ok 74 - Math::BigInt::Calc->_len($x) = 8 ok 75 - Math::BigInt::Calc->_len($x) = 1 ok 76 - Math::BigInt::Calc->_len($x) = 2 ok 77 - Math::BigInt::Calc->_len($x) = 3 ok 78 - Math::BigInt::Calc->_len($x) = 4 ok 79 - Math::BigInt::Calc->_len($x) = 5 ok 80 - Math::BigInt::Calc->_len($x) = 6 ok 81 - Math::BigInt::Calc->_len($x) = 7 ok 82 - Math::BigInt::Calc->_len($x) = 8 ok 83 - Math::BigInt::Calc->_len($x) = 9 ok 84 - Math::BigInt::Calc->_len($x) = 1 ok 85 - Math::BigInt::Calc->_len($x) = 2 ok 86 - Math::BigInt::Calc->_len($x) = 3 ok 87 - Math::BigInt::Calc->_len($x) = 4 ok 88 - Math::BigInt::Calc->_len($x) = 5 ok 89 - Math::BigInt::Calc->_len($x) = 6 ok 90 - Math::BigInt::Calc->_len($x) = 7 ok 91 - Math::BigInt::Calc->_len($x) = 8 ok 92 - Math::BigInt::Calc->_len($x) = 9 ok 93 - Math::BigInt::Calc->_len($x) = 1 ok 94 - Math::BigInt::Calc->_len($x) = 2 ok 95 - Math::BigInt::Calc->_len($x) = 3 ok 96 - Math::BigInt::Calc->_len($x) = 4 ok 97 - Math::BigInt::Calc->_len($x) = 5 ok 98 - Math::BigInt::Calc->_len($x) = 6 ok 99 - Math::BigInt::Calc->_len($x) = 7 ok 100 - Math::BigInt::Calc->_len($x) = 8 ok 101 - Math::BigInt::Calc->_len($x) = 9 ok 102 - Math::BigInt::Calc->_len($x) = 1 ok 103 - Math::BigInt::Calc->_len($x) = 2 ok 104 - Math::BigInt::Calc->_len($x) = 3 ok 105 - Math::BigInt::Calc->_len($x) = 4 ok 106 - Math::BigInt::Calc->_len($x) = 5 ok 107 - Math::BigInt::Calc->_len($x) = 6 ok 108 - Math::BigInt::Calc->_len($x) = 7 ok 109 - Math::BigInt::Calc->_len($x) = 8 ok 110 - Math::BigInt::Calc->_digit($x, 0) = 9 ok 111 - Math::BigInt::Calc->_digit($x, 1) = 8 ok 112 - Math::BigInt::Calc->_digit($x, 2) = 7 ok 113 - Math::BigInt::Calc->_digit($x, 8) = 1 ok 114 - Math::BigInt::Calc->_digit($x, 9) = 0 ok 115 - Math::BigInt::Calc->_digit($x, -1) = 1 ok 116 - Math::BigInt::Calc->_digit($x, -2) = 2 ok 117 - Math::BigInt::Calc->_digit($x, -3) = 3 ok 118 - Math::BigInt::Calc->_digit($x, -9) = 9 ok 119 - Math::BigInt::Calc->_digit($x, -10) = 0 ok 120 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "1" ok 121 - Math::BigInt::Calc->_str($x) = "1" ok 122 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "12" ok 123 - Math::BigInt::Calc->_str($x) = "12" ok 124 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "123" ok 125 - Math::BigInt::Calc->_str($x) = "123" ok 126 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "1234" ok 127 - Math::BigInt::Calc->_str($x) = "1234" ok 128 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "12345" ok 129 - Math::BigInt::Calc->_str($x) = "12345" ok 130 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "123456" ok 131 - Math::BigInt::Calc->_str($x) = "123456" ok 132 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "1234567" ok 133 - Math::BigInt::Calc->_str($x) = "1234567" ok 134 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "12345678" ok 135 - Math::BigInt::Calc->_str($x) = "12345678" ok 136 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "123456789" ok 137 - Math::BigInt::Calc->_str($x) = "123456789" ok 138 - Math::BigInt::Calc->_zeros($x) = 6 ok 139 - Math::BigInt::Calc->_zeros($x) = 0 ok 140 - Math::BigInt::Calc->_zeros($x) = 3 ok 141 - Math::BigInt::Calc->_zeros($x) = 0 ok 142 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft($x, $y, 10)) = 10000 ok 143 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft($x, $y, 10)) = 20000 ok 144 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft($x, $y, 2)) = 128 << 4 ok 145 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_rsft($x, $y, 10)) = 1 ok 146 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_rsft($x, $y, 10)) = 20 ok 147 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_rsft($x, $y, 2)) = 256 >> 4 ok 148 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_rsft($x, $y, 10)) = 0 ok 149 - Math::BigInt::Calc->_acmp($x, $y) = -1 ok 150 - Math::BigInt::Calc->_acmp($y, $x) = 1 ok 151 - Math::BigInt::Calc->_acmp($x, $x) = 0 ok 152 - Math::BigInt::Calc->_acmp($y, $y) = 0 ok 153 - Math::BigInt::Calc->_acmp($x, $y) = 0 ok 154 - Math::BigInt::Calc->_acmp($x, $y) = 1 ok 155 - Math::BigInt::Calc->_acmp($y, $x) = -1 ok 156 - Math::BigInt::Calc->_acmp($x, $y) = -1 ok 157 - Math::BigInt::Calc->_acmp($y, $x) = +1 ok 158 - Math::BigInt::Calc->_acmp($x, $y) = 1 ok 159 - Math::BigInt::Calc->_acmp($y, $x) = -1 ok 160 - Math::BigInt::Calc->_acmp($x, $x) = 0 ok 161 - Math::BigInt::Calc->_acmp($y, $y) = 0 ok 162 - Math::BigInt::Calc->_acmp($x, $y) = -1 ok 163 - Math::BigInt::Calc->_acmp($y, $x) = 1 ok 164 - Math::BigInt::Calc->_acmp($x, $x) = 0 ok 165 - Math::BigInt::Calc->_acmp($y, $y) = 0 ok 166 - Math::BigInt::Calc->_str($xmod) = "629" ok 167 - $sign = "-" ok 168 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_div($x, $y))) = 3 ok 169 - Math::BigInt::Calc->_str($x) = 30 ok 170 - Math::BigInt::Calc->_str($y) = 3 ok 171 - Math::BigInt::Calc->_str($x) = 0 ok 172 - Math::BigInt::Calc->_str($y) = 123 ok 173 - ref($x) = "ARRAY" ok 174 - Math::BigInt::Calc->_str($x) = "1" ok 175 - ref($x) = "" ok 176 - $x = 1 ok 177 - ref($x) = "ARRAY" ok 178 - Math::BigInt::Calc->_str($x) = "12" ok 179 - ref($x) = "" ok 180 - $x = 12 ok 181 - ref($x) = "ARRAY" ok 182 - Math::BigInt::Calc->_str($x) = "123" ok 183 - ref($x) = "" ok 184 - $x = 123 ok 185 - ref($x) = "ARRAY" ok 186 - Math::BigInt::Calc->_str($x) = "1234" ok 187 - ref($x) = "" ok 188 - $x = 1234 ok 189 - ref($x) = "ARRAY" ok 190 - Math::BigInt::Calc->_str($x) = "12345" ok 191 - ref($x) = "" ok 192 - $x = 12345 ok 193 - ref($x) = "ARRAY" ok 194 - Math::BigInt::Calc->_str($x) = "1234567" ok 195 - ref($x) = "" ok 196 - $x = 1234567 ok 197 - ref($x) = "ARRAY" ok 198 - Math::BigInt::Calc->_str($x) = "12345678" ok 199 - ref($x) = "" ok 200 - $x = 12345678 ok 201 - ref($x) = "ARRAY" ok 202 - Math::BigInt::Calc->_str($x) = "123456789" ok 203 - ref($x) = "" ok 204 - $x = 123456789 ok 205 - ref($x) = "ARRAY" ok 206 - Math::BigInt::Calc->_str($x) = "1234567890" ok 207 - ref($x) = "" ok 208 - $x = 1234567890 ok 209 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_sqrt($x)) = "12" ok 210 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_sqrt($x)) = "12000000" ok 211 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "4" ok 212 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "3" ok 213 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 0 ok 214 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 1 ok 215 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 1 ok 216 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 5 ok 217 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 81 ** 3 ok 218 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 81 ok 219 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 81 ** 3 ok 220 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = "150094635296999121" ok 221 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "531441" ok 222 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "81" ok 223 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = "523347633027360537213511521" ok 224 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "81" ok 225 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "80" ok 226 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "81" ok 227 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 9801 # _root( 99, 99) ok 228 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 229 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 9 ok 230 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 998001 # _root( 999, 999) ok 231 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 232 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 31 ok 233 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 99980001 # _root( 9999, 9999) ok 234 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 235 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 99 ok 236 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 9999800001 # _root( 99999, 99999) ok 237 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 238 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 316 ok 239 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 999998000001 # _root( 999999, 999999) ok 240 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 241 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 999 ok 242 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 99999980000001 # _root( 9999999, 9999999) ok 243 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 244 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 3162 ok 245 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 9999999800000001 ok 246 # skip 8 > 7 ok 247 # skip 8 > 7 ok 248 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 999999998000000001 ok 249 # skip 9 > 7 ok 250 # skip 9 > 7 ok 251 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "1" ok 252 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "1" ok 253 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "2" ok 254 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "6" ok 255 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "24" ok 256 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "120" ok 257 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "3628800" ok 258 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "39916800" ok 259 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "479001600" ok 260 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "6227020800" ok 261 - Math::BigInt::Calc->_str($x) = "6" ok 262 - Math::BigInt::Calc->_str($x) = "6227020800" ok 263 - Math::BigInt::Calc->_str($x) = 2 ok 264 - Math::BigInt::Calc->_str($x) = 1 ok 265 - Math::BigInt::Calc->_str($x) = 12 ok 266 - Math::BigInt::Calc->_str($x) = 11 ok 267 - Math::BigInt::Calc->_str($x) = 122 ok 268 - Math::BigInt::Calc->_str($x) = 121 ok 269 - Math::BigInt::Calc->_str($x) = 1232 ok 270 - Math::BigInt::Calc->_str($x) = 1231 ok 271 - Math::BigInt::Calc->_str($x) = 12342 ok 272 - Math::BigInt::Calc->_str($x) = 12341 ok 273 - Math::BigInt::Calc->_str($x) = 1234562 ok 274 - Math::BigInt::Calc->_str($x) = 1234561 ok 275 - Math::BigInt::Calc->_str($x) = 12345672 ok 276 - Math::BigInt::Calc->_str($x) = 12345671 ok 277 - Math::BigInt::Calc->_str($x) = 123456782 ok 278 - Math::BigInt::Calc->_str($x) = 123456781 ok 279 - Math::BigInt::Calc->_str($x) = 1234567892 ok 280 - Math::BigInt::Calc->_str($x) = 1234567891 ok 281 - Math::BigInt::Calc->_str($x) = 20 ok 282 - Math::BigInt::Calc->_str($x) = 19 ok 283 - Math::BigInt::Calc->_str($x) = 120 ok 284 - Math::BigInt::Calc->_str($x) = 119 ok 285 - Math::BigInt::Calc->_str($x) = 1220 ok 286 - Math::BigInt::Calc->_str($x) = 1219 ok 287 - Math::BigInt::Calc->_str($x) = 12320 ok 288 - Math::BigInt::Calc->_str($x) = 12319 ok 289 - Math::BigInt::Calc->_str($x) = 1234520 ok 290 - Math::BigInt::Calc->_str($x) = 1234519 ok 291 - Math::BigInt::Calc->_str($x) = 12345620 ok 292 - Math::BigInt::Calc->_str($x) = 12345619 ok 293 - Math::BigInt::Calc->_str($x) = 123456720 ok 294 - Math::BigInt::Calc->_str($x) = 123456719 ok 295 - Math::BigInt::Calc->_str($x) = 1234567820 ok 296 - Math::BigInt::Calc->_str($x) = 1234567819 ok 297 - Math::BigInt::Calc->_str($x) = 1000 ok 298 - Math::BigInt::Calc->_str($x) = 999 ok 299 - Math::BigInt::Calc->_str($x) = 10000 ok 300 - Math::BigInt::Calc->_str($x) = 9999 ok 301 - Math::BigInt::Calc->_str($x) = 100000 ok 302 - Math::BigInt::Calc->_str($x) = 99999 ok 303 - Math::BigInt::Calc->_str($x) = 10000000 ok 304 - Math::BigInt::Calc->_str($x) = 9999999 ok 305 - Math::BigInt::Calc->_str($x) = 100000000 ok 306 - Math::BigInt::Calc->_str($x) = 99999999 ok 307 - Math::BigInt::Calc->_str($x) = 1000000000 ok 308 - Math::BigInt::Calc->_str($x) = 999999999 ok 309 - Math::BigInt::Calc->_str($x) = 10000000000 ok 310 - Math::BigInt::Calc->_str($x) = 9999999999 ok 311 - Math::BigInt::Calc->_str($x) = 100000000000 ok 312 - Math::BigInt::Calc->_str($x) = 99999999999 ok 313 - Math::BigInt::Calc->_str($x) = "1001" ok 314 - Math::BigInt::Calc->_str($x) = "1000" ok 315 - Math::BigInt::Calc->_str($x) = 10000001 ok 316 - Math::BigInt::Calc->_str($x) = 9999999 ok 317 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_mod($x, $y))) = 1 ok 318 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_mod($x, $y))) = 0 ok 319 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_xor($x, $y))) = 7 ok 320 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_or($x, $y))) = 7 ok 321 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_and($x, $y))) = 1 ok 322 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_hex("0xFf")) = 255 ok 323 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_bin("0b10101011")) = 160+11 ok 324 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct("0100")) = 8*8 ok 325 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct("01000")) = 8*8*8 ok 326 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct("010001")) = 8*8*8*8+1 ok 327 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct("010007")) = 8*8*8*8+7 ok 328 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_hex(Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("128")))) = 128 ok 329 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_bin(Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("128")))) = 128 ok 330 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("128")))) = 128 ok 331 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("123456")))) = 123456 ok 332 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("123456789")))) = "123456789" ok 333 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("1234567890123")))) = "1234567890123" ok 334 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_hex(Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("123456789012345678901234567890")))) = "123456789012345678901234567890" ok 335 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_bin(Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("123456789012345678901234567890")))) = "123456789012345678901234567890" ok 336 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("123456789012345678901234567890")))) = "123456789012345678901234567890" ok 337 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_hex(Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("0")))) = 0 ok 338 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_bin(Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("0")))) = 0 ok 339 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("0")))) = 0 ok 340 - Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("0")) = "0x0" ok 341 - Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("0")) = "0b0" ok 342 - Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("0")) = "00" ok 343 - Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("12")) = "0xc" ok 344 - Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("12")) = "0b1100" ok 345 - Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("64")) = "0100" ok 346 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(0)) = "1" ok 347 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(1)) = "10" ok 348 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(2)) = "100" ok 349 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(12)) = "1000000000000" ok 350 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(16)) = "10000000000000000" ok 351 - Math::BigInt::Calc->_check($x) = 0 ok 352 - Math::BigInt::Calc->_check(123) = "123 is not a reference" ok 353 - @$x = 1 ok 354 - $x->[0] = 0 ok 355 - @$x = 1 ok 356 - $x->[0] = 0 ok 357 - @$x = 1 ok 358 - $x->[0] = 1 ok 359 - @$x = 2 ok 360 - $x->[0] = 0 ok 361 - $x->[1] = 1 ok 362 - @$x = 3 ok 363 - $x->[0] = 0 ok 364 - $x->[1] = 1 ok 365 - $x->[2] = 2 ok 366 - @$x = 3 ok 367 - $x->[0] = 0 ok 368 - $x->[1] = 1 ok 369 - $x->[2] = 2 ok 370 - @$x = 3 ok 371 - $x->[0] = 0 ok 372 - $x->[1] = 1 ok 373 - $x->[2] = 2 ok 374 - @$x = 3 ok 375 - $x->[0] = 0 ok 376 - $x->[1] = 1 ok 377 - $x->[2] = 2 ok 378 - @$x = 1 ok 379 - $x->[0] = 0 ok t\bigintpm.t ........... 1..3730 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 + $y; ok 922 - is a valid object ok 923 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x + $y; ok 924 - is a valid object ok 925 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x + $y; ok 926 - is a valid object ok 927 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x + $y; ok 928 - is a valid object ok 929 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x + $y; ok 930 - is a valid object ok 931 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x + $y; ok 932 - is a valid object ok 933 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x + $y; ok 934 - is a valid object ok 935 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x + $y; ok 936 - is a valid object ok 937 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x + $y; ok 938 - is a valid object ok 939 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("baddNaN"); $x + $y; ok 940 - is a valid object ok 941 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("baddNaN"); $x + $y; ok 942 - is a valid object ok 943 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x + $y; ok 944 - is a valid object ok 945 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x + $y; ok 946 - is a valid object ok 947 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x + $y; ok 948 - is a valid object ok 949 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x + $y; ok 950 - is a valid object ok 951 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x + $y; ok 952 - is a valid object ok 953 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x + $y; ok 954 - is a valid object ok 955 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x + $y; ok 956 - is a valid object ok 957 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x + $y; ok 958 - is a valid object ok 959 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x + $y; ok 960 - is a valid object ok 961 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x + $y; ok 962 - is a valid object ok 963 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x + $y; ok 964 - is a valid object ok 965 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x + $y; ok 966 - is a valid object ok 967 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x + $y; ok 968 - is a valid object ok 969 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x + $y; ok 970 - is a valid object ok 971 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 972 - is a valid object ok 973 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 974 - is a valid object ok 975 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 976 - is a valid object ok 977 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 978 - is a valid object ok 979 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 980 - is a valid object ok 981 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 982 - is a valid object ok 983 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x + $y; ok 984 - is a valid object ok 985 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x + $y; ok 986 - is a valid object ok 987 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x + $y; ok 988 - is a valid object ok 989 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x + $y; ok 990 - is a valid object ok 991 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x + $y; ok 992 - is a valid object ok 993 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 994 - is a valid object ok 995 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 996 - is a valid object ok 997 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 998 - is a valid object ok 999 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 1000 - is a valid object ok 1001 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 1002 - is a valid object ok 1003 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("987654321"); $x + $y; ok 1004 - is a valid object ok 1005 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x + $y; ok 1006 - is a valid object ok 1007 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x + $y; ok 1008 - is a valid object ok 1009 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x + $y; ok 1010 - is a valid object ok 1011 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10001"); $x + $y; ok 1012 - is a valid object ok 1013 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100001"); $x + $y; ok 1014 - is a valid object ok 1015 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000001"); $x + $y; ok 1016 - is a valid object ok 1017 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000001"); $x + $y; ok 1018 - is a valid object ok 1019 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000001"); $x + $y; ok 1020 - is a valid object ok 1021 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000001"); $x + $y; ok 1022 - is a valid object ok 1023 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000001"); $x + $y; ok 1024 - is a valid object ok 1025 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000000001"); $x + $y; ok 1026 - is a valid object ok 1027 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000000001"); $x + $y; ok 1028 - is a valid object ok 1029 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000000001"); $x + $y; ok 1030 - is a valid object ok 1031 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10001"); $x + $y; ok 1032 - is a valid object ok 1033 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100001"); $x + $y; ok 1034 - is a valid object ok 1035 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000001"); $x + $y; ok 1036 - is a valid object ok 1037 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000001"); $x + $y; ok 1038 - is a valid object ok 1039 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000001"); $x + $y; ok 1040 - is a valid object ok 1041 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000001"); $x + $y; ok 1042 - is a valid object ok 1043 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000001"); $x + $y; ok 1044 - is a valid object ok 1045 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000000001"); $x + $y; ok 1046 - is a valid object ok 1047 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000000001"); $x + $y; ok 1048 - is a valid object ok 1049 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000000001"); $x + $y; ok 1050 - is a valid object ok 1051 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x - $y; ok 1052 - is a valid object ok 1053 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x - $y; ok 1054 - is a valid object ok 1055 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x - $y; ok 1056 - is a valid object ok 1057 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x - $y; ok 1058 - is a valid object ok 1059 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x - $y; ok 1060 - is a valid object ok 1061 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x - $y; ok 1062 - is a valid object ok 1063 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x - $y; ok 1064 - is a valid object ok 1065 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x - $y; ok 1066 - is a valid object ok 1067 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x - $y; ok 1068 - is a valid object ok 1069 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x - $y; ok 1070 - is a valid object ok 1071 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x - $y; ok 1072 - is a valid object ok 1073 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x - $y; ok 1074 - is a valid object ok 1075 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x - $y; ok 1076 - is a valid object ok 1077 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x - $y; ok 1078 - is a valid object ok 1079 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x - $y; ok 1080 - is a valid object ok 1081 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x - $y; ok 1082 - is a valid object ok 1083 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x - $y; ok 1084 - is a valid object ok 1085 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x - $y; ok 1086 - is a valid object ok 1087 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1088 - is a valid object ok 1089 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1090 - is a valid object ok 1091 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1092 - is a valid object ok 1093 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1094 - is a valid object ok 1095 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1096 - is a valid object ok 1097 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1098 - is a valid object ok 1099 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1100 - is a valid object ok 1101 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1102 - is a valid object ok 1103 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 1104 - is a valid object ok 1105 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x - $y; ok 1106 - is a valid object ok 1107 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x - $y; ok 1108 - is a valid object ok 1109 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1110 - is a valid object ok 1111 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1112 - is a valid object ok 1113 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1114 - is a valid object ok 1115 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1116 - is a valid object ok 1117 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1118 - is a valid object ok 1119 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1120 - is a valid object ok 1121 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1122 - is a valid object ok 1123 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 1124 - is a valid object ok 1125 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("+987654321"); $x - $y; ok 1126 - is a valid object ok 1127 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x - $y; ok 1128 - is a valid object ok 1129 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x - $y; ok 1130 - is a valid object ok 1131 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x - $y; ok 1132 - is a valid object ok 1133 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("1"); $x - $y; ok 1134 - is a valid object ok 1135 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("1"); $x - $y; ok 1136 - is a valid object ok 1137 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1138 - is a valid object ok 1139 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1140 - is a valid object ok 1141 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1142 - is a valid object ok 1143 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1144 - is a valid object ok 1145 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1146 - is a valid object ok 1147 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1148 - is a valid object ok 1149 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1150 - is a valid object ok 1151 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("1"); $x - $y; ok 1152 - is a valid object ok 1153 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1154 - is a valid object ok 1155 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1156 - is a valid object ok 1157 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1158 - is a valid object ok 1159 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1160 - is a valid object ok 1161 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1162 - is a valid object ok 1163 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1164 - is a valid object ok 1165 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1166 - is a valid object ok 1167 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1168 - is a valid object ok 1169 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("-1"); $x - $y; ok 1170 - is a valid object ok 1171 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("-1"); $x - $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 * $y; ok 1292 - is a valid object ok 1293 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x * $y; ok 1294 - is a valid object ok 1295 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x * $y; ok 1296 - is a valid object ok 1297 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("+inf"); $x * $y; ok 1298 - is a valid object ok 1299 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("-inf"); $x * $y; ok 1300 - is a valid object ok 1301 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaNmul"); $x * $y; ok 1302 - is a valid object ok 1303 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaNmul"); $x * $y; ok 1304 - is a valid object ok 1305 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x * $y; ok 1306 - is a valid object ok 1307 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x * $y; ok 1308 - is a valid object ok 1309 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x * $y; ok 1310 - is a valid object ok 1311 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x * $y; ok 1312 - is a valid object ok 1313 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x * $y; ok 1314 - is a valid object ok 1315 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x * $y; ok 1316 - is a valid object ok 1317 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x * $y; ok 1318 - is a valid object ok 1319 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x * $y; ok 1320 - is a valid object ok 1321 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x * $y; ok 1322 - is a valid object ok 1323 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $x * $y; ok 1324 - is a valid object ok 1325 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $x * $y; ok 1326 - is a valid object ok 1327 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x * $y; ok 1328 - is a valid object ok 1329 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x * $y; ok 1330 - is a valid object ok 1331 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x * $y; ok 1332 - is a valid object ok 1333 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x * $y; ok 1334 - is a valid object ok 1335 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $x * $y; ok 1336 - is a valid object ok 1337 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $x * $y; ok 1338 - is a valid object ok 1339 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $x * $y; ok 1340 - is a valid object ok 1341 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x * $y; ok 1342 - is a valid object ok 1343 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $x * $y; ok 1344 - is a valid object ok 1345 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $x * $y; ok 1346 - is a valid object ok 1347 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $x * $y; ok 1348 - is a valid object ok 1349 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $x * $y; ok 1350 - is a valid object ok 1351 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $x * $y; ok 1352 - is a valid object ok 1353 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $x * $y; ok 1354 - is a valid object ok 1355 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $x * $y; ok 1356 - is a valid object ok 1357 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $x * $y; ok 1358 - is a valid object ok 1359 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $x * $y; ok 1360 - is a valid object ok 1361 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $x * $y; ok 1362 - is a valid object ok 1363 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $x * $y; ok 1364 - is a valid object ok 1365 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $x * $y; ok 1366 - is a valid object ok 1367 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $x * $y; ok 1368 - is a valid object ok 1369 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $x * $y; ok 1370 - is a valid object ok 1371 - $x = Math::BigInt->new("+25"); $y = Math::BigInt->new("+25"); $x * $y; ok 1372 - is a valid object ok 1373 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("+12345"); $x * $y; ok 1374 - is a valid object ok 1375 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+11111"); $x * $y; ok 1376 - is a valid object ok 1377 - $x = Math::BigInt->new("9999"); $y = Math::BigInt->new("10000"); $x * $y; ok 1378 - is a valid object ok 1379 - $x = Math::BigInt->new("99999"); $y = Math::BigInt->new("100000"); $x * $y; ok 1380 - is a valid object ok 1381 - $x = Math::BigInt->new("999999"); $y = Math::BigInt->new("1000000"); $x * $y; ok 1382 - is a valid object ok 1383 - $x = Math::BigInt->new("9999999"); $y = Math::BigInt->new("10000000"); $x * $y; ok 1384 - is a valid object ok 1385 - $x = Math::BigInt->new("99999999"); $y = Math::BigInt->new("100000000"); $x * $y; ok 1386 - is a valid object ok 1387 - $x = Math::BigInt->new("999999999"); $y = Math::BigInt->new("1000000000"); $x * $y; ok 1388 - is a valid object ok 1389 - $x = Math::BigInt->new("9999999999"); $y = Math::BigInt->new("10000000000"); $x * $y; ok 1390 - is a valid object ok 1391 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("100000000000"); $x * $y; ok 1392 - is a valid object ok 1393 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("1000000000000"); $x * $y; ok 1394 - is a valid object ok 1395 - $x = Math::BigInt->new("9999999999999"); $y = Math::BigInt->new("10000000000000"); $x * $y; ok 1396 - is a valid object ok 1397 - $x = Math::BigInt->new("99999999999999"); $y = Math::BigInt->new("100000000000000"); $x * $y; ok 1398 - is a valid object ok 1399 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("1000000000000000"); $x * $y; ok 1400 - is a valid object ok 1401 - $x = Math::BigInt->new("9999999999999999"); $y = Math::BigInt->new("10000000000000000"); $x * $y; ok 1402 - is a valid object ok 1403 - $x = Math::BigInt->new("99999999999999999"); $y = Math::BigInt->new("100000000000000000"); $x * $y; ok 1404 - is a valid object ok 1405 - $x = Math::BigInt->new("999999999999999999"); $y = Math::BigInt->new("1000000000000000000"); $x * $y; ok 1406 - is a valid object ok 1407 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $x * $y; ok 1408 - is a valid object ok 1409 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("20"); join (",", $x->bdiv($y)); ok 1410 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); join (",", $x->bdiv($y)); ok 1411 - $x = Math::BigInt->new("-4095"); $y = Math::BigInt->new("-4095"); join (",", $x->bdiv($y)); ok 1412 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("-4095"); join (",", $x->bdiv($y)); ok 1413 - $x = Math::BigInt->new("-4095"); $y = Math::BigInt->new("4095"); join (",", $x->bdiv($y)); ok 1414 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1415 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1416 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("4"); join (",", $x->bdiv($y)); ok 1417 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("8"); join (",", $x->bdiv($y)); ok 1418 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("8"); join (",", $x->bdiv($y)); ok 1419 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1420 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1421 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1422 - $x = Math::BigInt->new("0"); $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("-5"); $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("inf"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1429 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1430 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1431 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1432 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); 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("inf"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1435 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1436 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1437 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1438 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1439 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1440 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1441 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1442 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1443 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); join (",", $x->bdiv($y)); ok 1444 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); join (",", $x->bdiv($y)); ok 1445 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); join (",", $x->bdiv($y)); ok 1446 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); join (",", $x->bdiv($y)); ok 1447 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); join (",", $x->bdiv($y)); ok 1448 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); join (",", $x->bdiv($y)); ok 1449 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); join (",", $x->bdiv($y)); ok 1450 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); join (",", $x->bdiv($y)); ok 1451 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); join (",", $x->bdiv($y)); ok 1452 - $x = Math::BigInt->new("1267650600228229401496703205375"); $y = Math::BigInt->new("1267650600228229401496703205376"); join (",", $x->bdiv($y)); ok 1453 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); join (",", $x->bdiv($y)); ok 1454 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); join (",", $x->bdiv($y)); ok 1455 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); join (",", $x->bdiv($y)); ok 1456 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); join (",", $x->bdiv($y)); ok 1457 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); join (",", $x->bdiv($y)); ok 1458 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); join (",", $x->bdiv($y)); ok 1459 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); join (",", $x->bdiv($y)); ok 1460 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); join (",", $x->bdiv($y)); ok 1461 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); join (",", $x->bdiv($y)); ok 1462 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); join (",", $x->bdiv($y)); ok 1463 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1464 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1465 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1466 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1467 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1468 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1469 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1470 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1471 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1472 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1473 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x / $y; ok 1474 - is a valid object ok 1475 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("1"); $x / $y; ok 1476 - is a valid object ok 1477 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("abc"); $x / $y; ok 1478 - is a valid object ok 1479 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x / $y; ok 1480 - is a valid object ok 1481 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x / $y; ok 1482 - is a valid object ok 1483 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1484 - is a valid object ok 1485 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x / $y; ok 1486 - is a valid object ok 1487 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1488 - is a valid object ok 1489 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x / $y; ok 1490 - is a valid object ok 1491 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1492 - is a valid object ok 1493 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x / $y; ok 1494 - is a valid object ok 1495 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x / $y; ok 1496 - is a valid object ok 1497 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x / $y; ok 1498 - is a valid object ok 1499 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x / $y; ok 1500 - is a valid object ok 1501 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x / $y; ok 1502 - is a valid object ok 1503 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x / $y; ok 1504 - is a valid object ok 1505 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x / $y; ok 1506 - is a valid object ok 1507 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1508 - is a valid object ok 1509 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x / $y; ok 1510 - is a valid object ok 1511 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1512 - is a valid object ok 1513 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); $x / $y; ok 1514 - is a valid object ok 1515 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x / $y; ok 1516 - is a valid object ok 1517 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); $x / $y; ok 1518 - is a valid object ok 1519 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x / $y; ok 1520 - is a valid object ok 1521 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x / $y; ok 1522 - is a valid object ok 1523 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); $x / $y; ok 1524 - is a valid object ok 1525 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("-2"); $x / $y; ok 1526 - is a valid object ok 1527 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); $x / $y; ok 1528 - is a valid object ok 1529 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); $x / $y; ok 1530 - is a valid object ok 1531 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x / $y; ok 1532 - is a valid object ok 1533 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x / $y; ok 1534 - is a valid object ok 1535 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x / $y; ok 1536 - is a valid object ok 1537 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x / $y; ok 1538 - is a valid object ok 1539 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x / $y; ok 1540 - is a valid object ok 1541 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x / $y; ok 1542 - is a valid object ok 1543 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x / $y; ok 1544 - is a valid object ok 1545 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x / $y; ok 1546 - is a valid object ok 1547 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("26"); $x / $y; ok 1548 - is a valid object ok 1549 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1550 - is a valid object ok 1551 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1552 - is a valid object ok 1553 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1554 - is a valid object ok 1555 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1556 - is a valid object ok 1557 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1558 - is a valid object ok 1559 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1560 - is a valid object ok 1561 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1562 - is a valid object ok 1563 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1564 - is a valid object ok 1565 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1566 - is a valid object ok 1567 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x / $y; ok 1568 - is a valid object ok 1569 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x / $y; ok 1570 - is a valid object ok 1571 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x / $y; ok 1572 - is a valid object ok 1573 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x / $y; ok 1574 - is a valid object ok 1575 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("+5"); $x / $y; ok 1576 - is a valid object ok 1577 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("+4"); $x / $y; ok 1578 - is a valid object ok 1579 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("+8"); $x / $y; ok 1580 - is a valid object ok 1581 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("+16"); $x / $y; ok 1582 - is a valid object ok 1583 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x / $y; ok 1584 - is a valid object ok 1585 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x / $y; ok 1586 - is a valid object ok 1587 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x / $y; ok 1588 - is a valid object ok 1589 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x / $y; ok 1590 - is a valid object ok 1591 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x / $y; ok 1592 - is a valid object ok 1593 - $x = Math::BigInt->new("+1111088889"); $y = Math::BigInt->new("99999"); $x / $y; ok 1594 - is a valid object ok 1595 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x / $y; ok 1596 - is a valid object ok 1597 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x / $y; ok 1598 - is a valid object ok 1599 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x / $y; ok 1600 - is a valid object ok 1601 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x / $y; ok 1602 - is a valid object ok 1603 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x / $y; ok 1604 - is a valid object ok 1605 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x / $y; ok 1606 - is a valid object ok 1607 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x / $y; ok 1608 - is a valid object ok 1609 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x / $y; ok 1610 - is a valid object ok 1611 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x / $y; ok 1612 - is a valid object ok 1613 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x / $y; ok 1614 - is a valid object ok 1615 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("-3"); $x / $y; ok 1616 - is a valid object ok 1617 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("3"); $x / $y; ok 1618 - is a valid object ok 1619 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("-3"); $x / $y; ok 1620 - is a valid object ok 1621 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("3"); $x / $y; ok 1622 - is a valid object ok 1623 - $x = Math::BigInt->new("10000000000000000000000000000000000000000000000000000000000000000000000000000000000"); $y = Math::BigInt->new("10000000375084540248994272022843165711074"); $x / $y; ok 1624 - is a valid object ok 1625 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); $x / $y; ok 1626 - is a valid object ok 1627 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); $x / $y; ok 1628 - is a valid object ok 1629 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); $x / $y; ok 1630 - is a valid object ok 1631 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); $x / $y; ok 1632 - is a valid object ok 1633 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); $x / $y; ok 1634 - is a valid object ok 1635 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); $x / $y; ok 1636 - is a valid object ok 1637 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); $x / $y; ok 1638 - is a valid object ok 1639 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); $x / $y; ok 1640 - is a valid object ok 1641 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); $x / $y; ok 1642 - is a valid object ok 1643 - $x = Math::BigInt->new("84696969696969696956565656566184292929292929292847474747436308080808080808086765396464646464646465"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1644 - is a valid object ok 1645 - $x = Math::BigInt->new("84696969696969696943434343434871161616161616161452525252486813131313131313143230042929292929292930"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1646 - is a valid object ok 1647 - $x = Math::BigInt->new("84696969696969696969696969697497424242424242424242424242385803030303030303030300750000000000000000"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1648 - is a valid object ok 1649 - $x = Math::BigInt->new("84696969696969696930303030303558030303030303030057575757537318181818181818199694689393939393939395"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1650 - is a valid object ok 1651 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); $x / $y; ok 1652 - is a valid object ok 1653 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); $x / $y; ok 1654 - is a valid object ok 1655 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); $x / $y; ok 1656 - is a valid object ok 1657 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); $x / $y; ok 1658 - is a valid object ok 1659 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); $x / $y; ok 1660 - is a valid object ok 1661 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); $x / $y; ok 1662 - is a valid object ok 1663 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); $x / $y; ok 1664 - is a valid object ok 1665 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); $x / $y; ok 1666 - is a valid object ok 1667 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); $x / $y; ok 1668 - is a valid object ok 1669 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); $x / $y; ok 1670 - is a valid object ok 1671 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); $x / $y; ok 1672 - is a valid object ok 1673 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); $x / $y; ok 1674 - is a valid object ok 1675 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); $x / $y; ok 1676 - is a valid object ok 1677 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); $x / $y; ok 1678 - is a valid object ok 1679 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); $x / $y; ok 1680 - is a valid object ok 1681 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); $x / $y; ok 1682 - is a valid object ok 1683 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); $x / $y; ok 1684 - is a valid object ok 1685 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); $x / $y; ok 1686 - is a valid object ok 1687 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); $x / $y; ok 1688 - is a valid object ok 1689 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); $x / $y; ok 1690 - is a valid object ok 1691 - $x = Math::BigInt->new("949418181818187070707070707070707070"); $y = Math::BigInt->new("181818181853535353535353535353535353"); $x / $y; ok 1692 - is a valid object ok 1693 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1694 - is a valid object ok 1695 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1696 - is a valid object ok 1697 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1698 - is a valid object ok 1699 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1700 - is a valid object ok 1701 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1702 - is a valid object ok 1703 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-5"); $x->bmodinv($y); ok 1704 - is a valid object ok 1705 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1706 - is a valid object ok 1707 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5033"); $x->bmodinv($y); ok 1708 - is a valid object ok 1709 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1710 - is a valid object ok 1711 - $x = Math::BigInt->new("-1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1712 - is a valid object ok 1713 - $x = Math::BigInt->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigInt->new("2348249874968739"); $x->bmodinv($y); ok 1714 - is a valid object ok 1715 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1716 - is a valid object ok 1717 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1718 - is a valid object ok 1719 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1720 - is a valid object ok 1721 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1722 - is a valid object ok 1723 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1724 - is a valid object ok 1725 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1726 - is a valid object ok 1727 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1728 - is a valid object ok 1729 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1730 - is a valid object ok 1731 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1732 - is a valid object ok 1733 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1734 - is a valid object ok 1735 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1736 - is a valid object ok 1737 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1738 - is a valid object ok 1739 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1740 - is a valid object ok 1741 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1742 - is a valid object ok 1743 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1744 - is a valid object ok 1745 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1746 - is a valid object ok 1747 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1748 - is a valid object ok 1749 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1750 - is a valid object ok 1751 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1752 - is a valid object ok 1753 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1754 - is a valid object ok 1755 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1756 - is a valid object ok 1757 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1758 - is a valid object ok 1759 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bmodinv($y); ok 1760 - is a valid object ok 1761 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1762 - is a valid object ok 1763 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->bmodinv($y); ok 1764 - is a valid object ok 1765 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1766 - is a valid object ok 1767 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1768 - is a valid object ok 1769 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1770 - is a valid object ok 1771 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1772 - is a valid object ok 1773 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1774 - is a valid object ok 1775 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1776 - is a valid object ok 1777 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1778 - is a valid object ok 1779 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("0"); $x->bmodpow($y, $z); ok 1780 - is a valid object ok 1781 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1782 - is a valid object ok 1783 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1784 - is a valid object ok 1785 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1786 - is a valid object ok 1787 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1788 - is a valid object ok 1789 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1790 - is a valid object ok 1791 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1792 - is a valid object ok 1793 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1794 - is a valid object ok 1795 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1796 - is a valid object ok 1797 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1798 - is a valid object ok 1799 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1800 - is a valid object ok 1801 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1802 - is a valid object ok 1803 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1804 - is a valid object ok 1805 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1806 - is a valid object ok 1807 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1808 - is a valid object ok 1809 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1810 - is a valid object ok 1811 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1812 - is a valid object ok 1813 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1814 - is a valid object ok 1815 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1816 - is a valid object ok 1817 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1818 - is a valid object ok 1819 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1820 - is a valid object ok 1821 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1822 - is a valid object ok 1823 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1824 - is a valid object ok 1825 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1826 - is a valid object ok 1827 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1828 - is a valid object ok 1829 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1830 - is a valid object ok 1831 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1832 - is a valid object ok 1833 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1834 - is a valid object ok 1835 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1836 - is a valid object ok 1837 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1838 - is a valid object ok 1839 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1840 - is a valid object ok 1841 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1842 - is a valid object ok 1843 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1844 - is a valid object ok 1845 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1846 - is a valid object ok 1847 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1848 - is a valid object ok 1849 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1850 - is a valid object ok 1851 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1852 - is a valid object ok 1853 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1854 - is a valid object ok 1855 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1856 - is a valid object ok 1857 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1858 - is a valid object ok 1859 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1860 - is a valid object ok 1861 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1862 - is a valid object ok 1863 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1864 - is a valid object ok 1865 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1866 - is a valid object ok 1867 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1868 - is a valid object ok 1869 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1870 - is a valid object ok 1871 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1872 - is a valid object ok 1873 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1874 - is a valid object ok 1875 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1876 - is a valid object ok 1877 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1878 - is a valid object ok 1879 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1880 - is a valid object ok 1881 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1882 - is a valid object ok 1883 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1884 - is a valid object ok 1885 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1886 - is a valid object ok 1887 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1888 - is a valid object ok 1889 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1890 - is a valid object ok 1891 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1892 - is a valid object ok 1893 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1894 - is a valid object ok 1895 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1896 - is a valid object ok 1897 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1898 - is a valid object ok 1899 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1900 - is a valid object ok 1901 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1902 - is a valid object ok 1903 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1904 - is a valid object ok 1905 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1906 - is a valid object ok 1907 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1908 - is a valid object ok 1909 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1910 - is a valid object ok 1911 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1912 - is a valid object ok 1913 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1914 - is a valid object ok 1915 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1916 - is a valid object ok 1917 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1918 - is a valid object ok 1919 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1920 - is a valid object ok 1921 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1922 - is a valid object ok 1923 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1924 - is a valid object ok 1925 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1926 - is a valid object ok 1927 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1928 - is a valid object ok 1929 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1930 - is a valid object ok 1931 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1932 - is a valid object ok 1933 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1934 - is a valid object ok 1935 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1936 - is a valid object ok 1937 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1938 - is a valid object ok 1939 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1940 - is a valid object ok 1941 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1942 - is a valid object ok 1943 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1944 - is a valid object ok 1945 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1946 - is a valid object ok 1947 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1948 - is a valid object ok 1949 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1950 - is a valid object ok 1951 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1952 - is a valid object ok 1953 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1954 - is a valid object ok 1955 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1956 - is a valid object ok 1957 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1958 - is a valid object ok 1959 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1960 - is a valid object ok 1961 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1962 - is a valid object ok 1963 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1964 - is a valid object ok 1965 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1966 - is a valid object ok 1967 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1968 - is a valid object ok 1969 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1970 - is a valid object ok 1971 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1972 - is a valid object ok 1973 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1974 - is a valid object ok 1975 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1976 - is a valid object ok 1977 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1978 - is a valid object ok 1979 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1980 - is a valid object ok 1981 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 1982 - is a valid object ok 1983 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1984 - is a valid object ok 1985 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1986 - is a valid object ok 1987 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1988 - is a valid object ok 1989 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1990 - is a valid object ok 1991 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1992 - is a valid object ok 1993 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1994 - is a valid object ok 1995 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1996 - is a valid object ok 1997 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 1998 - is a valid object ok 1999 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2000 - is a valid object ok 2001 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2002 - is a valid object ok 2003 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2004 - is a valid object ok 2005 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2006 - is a valid object ok 2007 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2008 - is a valid object ok 2009 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2010 - is a valid object ok 2011 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2012 - is a valid object ok 2013 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2014 - is a valid object ok 2015 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2016 - is a valid object ok 2017 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2018 - is a valid object ok 2019 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2020 - is a valid object ok 2021 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2022 - is a valid object ok 2023 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2024 - is a valid object ok 2025 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2026 - is a valid object ok 2027 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2028 - is a valid object ok 2029 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2030 - is a valid object ok 2031 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2032 - is a valid object ok 2033 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2034 - is a valid object ok 2035 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2036 - is a valid object ok 2037 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2044 - is a valid object ok 2045 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2046 - is a valid object ok 2047 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2048 - is a valid object ok 2049 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2050 - is a valid object ok 2051 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2058 - is a valid object ok 2059 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2072 - is a valid object ok 2073 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("16"); $x->bmodpow($y, $z); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("5033"); $x->bmodpow($y, $z); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("7"); $z = Math::BigInt->new("5032"); $x->bmodpow($y, $z); ok 2086 - is a valid object ok 2087 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("8"); $z = Math::BigInt->new("-5"); $x->bmodpow($y, $z); ok 2088 - is a valid object ok 2089 - $x = Math::BigInt->new("1e50"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2090 - is a valid object ok 2091 - $x = Math::BigInt->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigInt->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigInt->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 2092 - is a valid object ok 2093 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2094 - is a valid object ok 2095 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2096 - is a valid object ok 2097 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x % $y; ok 2098 - is a valid object ok 2099 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2100 - is a valid object ok 2101 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2102 - is a valid object ok 2103 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2104 - is a valid object ok 2105 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2106 - is a valid object ok 2107 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2108 - is a valid object ok 2109 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2110 - is a valid object ok 2111 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2112 - is a valid object ok 2113 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2114 - is a valid object ok 2115 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2116 - is a valid object ok 2117 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x % $y; ok 2118 - is a valid object ok 2119 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x % $y; ok 2120 - is a valid object ok 2121 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2122 - is a valid object ok 2123 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2124 - is a valid object ok 2125 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2126 - is a valid object ok 2127 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2128 - is a valid object ok 2129 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); $x % $y; ok 2130 - is a valid object ok 2131 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2132 - is a valid object ok 2133 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2134 - is a valid object ok 2135 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); $x % $y; ok 2136 - is a valid object ok 2137 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x % $y; ok 2138 - is a valid object ok 2139 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x % $y; ok 2140 - is a valid object ok 2141 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("1"); $x % $y; ok 2142 - is a valid object ok 2143 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("abc"); $x % $y; ok 2144 - is a valid object ok 2145 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x % $y; ok 2146 - is a valid object ok 2147 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x % $y; ok 2148 - is a valid object ok 2149 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x % $y; ok 2150 - is a valid object ok 2151 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x % $y; ok 2152 - is a valid object ok 2153 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x % $y; ok 2154 - is a valid object ok 2155 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2156 - is a valid object ok 2157 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2158 - is a valid object ok 2159 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x % $y; ok 2160 - is a valid object ok 2161 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x % $y; ok 2162 - is a valid object ok 2163 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x % $y; ok 2164 - is a valid object ok 2165 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2166 - is a valid object ok 2167 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2168 - is a valid object ok 2169 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2170 - is a valid object ok 2171 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2172 - is a valid object ok 2173 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2174 - is a valid object ok 2175 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2176 - is a valid object ok 2177 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2178 - is a valid object ok 2179 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2180 - is a valid object ok 2181 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2182 - is a valid object ok 2183 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x % $y; ok 2184 - is a valid object ok 2185 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x % $y; ok 2186 - is a valid object ok 2187 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x % $y; ok 2188 - is a valid object ok 2189 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x % $y; ok 2190 - is a valid object ok 2191 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x % $y; ok 2192 - is a valid object ok 2193 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("4"); $x % $y; ok 2194 - is a valid object ok 2195 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("8"); $x % $y; ok 2196 - is a valid object ok 2197 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("16"); $x % $y; ok 2198 - is a valid object ok 2199 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x % $y; ok 2200 - is a valid object ok 2201 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x % $y; ok 2202 - is a valid object ok 2203 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x % $y; ok 2204 - is a valid object ok 2205 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x % $y; ok 2206 - is a valid object ok 2207 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x % $y; ok 2208 - is a valid object ok 2209 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("+5"); $x % $y; ok 2210 - is a valid object ok 2211 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2212 - is a valid object ok 2213 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2214 - is a valid object ok 2215 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x % $y; ok 2216 - is a valid object ok 2217 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x % $y; ok 2218 - is a valid object ok 2219 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x % $y; ok 2220 - is a valid object ok 2221 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x % $y; ok 2222 - is a valid object ok 2223 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x % $y; ok 2224 - is a valid object ok 2225 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x % $y; ok 2226 - is a valid object ok 2227 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x % $y; ok 2228 - is a valid object ok 2229 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x % $y; ok 2230 - is a valid object ok 2231 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); $x % $y; ok 2232 - is a valid object ok 2233 - $x = Math::BigInt->new("100041000510123"); $y = Math::BigInt->new("3"); $x % $y; ok 2234 - is a valid object ok 2235 - $x = Math::BigInt->new("152403346"); $y = Math::BigInt->new("12345"); $x % $y; ok 2236 - is a valid object ok 2237 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x % $y; ok 2238 - is a valid object ok 2239 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("9"); $x % $y; ok 2240 - is a valid object ok 2241 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("9"); $x % $y; ok 2242 - is a valid object ok 2243 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("9"); $x % $y; ok 2244 - is a valid object ok 2245 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("9"); $x % $y; ok 2246 - is a valid object ok 2247 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("9"); $x % $y; ok 2248 - is a valid object ok 2249 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("9"); $x % $y; ok 2250 - is a valid object ok 2251 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("9"); $x % $y; ok 2252 - is a valid object ok 2253 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("9"); $x % $y; ok 2254 - is a valid object ok 2255 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("10"); $x % $y; ok 2256 - is a valid object ok 2257 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("10"); $x % $y; ok 2258 - is a valid object ok 2259 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("10"); $x % $y; ok 2260 - is a valid object ok 2261 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("10"); $x % $y; ok 2262 - is a valid object ok 2263 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("10"); $x % $y; ok 2264 - is a valid object ok 2265 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("10"); $x % $y; ok 2266 - is a valid object ok 2267 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("10"); $x % $y; ok 2268 - is a valid object ok 2269 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("10"); $x % $y; ok 2270 - is a valid object ok 2271 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("113"); $x % $y; ok 2272 - is a valid object ok 2273 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("113"); $x % $y; ok 2274 - is a valid object ok 2275 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("113"); $x % $y; ok 2276 - is a valid object ok 2277 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("113"); $x % $y; ok 2278 - is a valid object ok 2279 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("113"); $x % $y; ok 2280 - is a valid object ok 2281 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("113"); $x % $y; ok 2282 - is a valid object ok 2283 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("113"); $x % $y; ok 2284 - is a valid object ok 2285 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("113"); $x % $y; ok 2286 - is a valid object ok 2287 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x % $y; ok 2288 - is a valid object ok 2289 - $x = Math::BigInt->new("111111111111111111111111111111"); $y = Math::BigInt->new("111111111111111111111111111111"); $x % $y; ok 2290 - is a valid object ok 2291 - $x = Math::BigInt->new("12345678901234567890"); $y = Math::BigInt->new("12345678901234567890"); $x % $y; ok 2292 - is a valid object ok 2293 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("12"); Math::BigInt::bgcd($x, $y); ok 2294 - is a valid object ok 2295 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt::bgcd($x, $y); ok 2296 - is a valid object ok 2297 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); Math::BigInt::bgcd($x, $y); ok 2298 - is a valid object ok 2299 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2300 - is a valid object ok 2301 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); Math::BigInt::bgcd($x, $y); ok 2302 - is a valid object ok 2303 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2304 - is a valid object ok 2305 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2306 - is a valid object ok 2307 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 2308 - is a valid object ok 2309 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2310 - is a valid object ok 2311 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 2312 - is a valid object ok 2313 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2314 - is a valid object ok 2315 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 2316 - is a valid object ok 2317 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2318 - is a valid object ok 2319 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 2320 - is a valid object ok 2321 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); Math::BigInt::bgcd($x, $y); ok 2322 - is a valid object ok 2323 - $x = Math::BigInt->new("+3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 2324 - is a valid object ok 2325 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 2326 - is a valid object ok 2327 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-2"); Math::BigInt::bgcd($x, $y); ok 2328 - is a valid object ok 2329 - $x = Math::BigInt->new("-144"); $y = Math::BigInt->new("-60"); Math::BigInt::bgcd($x, $y); ok 2330 - is a valid object ok 2331 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("-60"); Math::BigInt::bgcd($x, $y); ok 2332 - is a valid object ok 2333 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("60"); Math::BigInt::bgcd($x, $y); ok 2334 - is a valid object ok 2335 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("625"); Math::BigInt::bgcd($x, $y); ok 2336 - is a valid object ok 2337 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("81"); Math::BigInt::bgcd($x, $y); ok 2338 - is a valid object ok 2339 - $x = Math::BigInt->new("1034"); $y = Math::BigInt->new("804"); Math::BigInt::bgcd($x, $y); ok 2340 - is a valid object ok 2341 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("56"); Math::BigInt::bgcd($x, $y, $z); ok 2342 - is a valid object ok 2343 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("54"); Math::BigInt::bgcd($x, $y, $z); ok 2344 - is a valid object ok 2345 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 2346 - is a valid object ok 2347 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2348 - is a valid object ok 2349 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 2350 - is a valid object ok 2351 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2352 - is a valid object ok 2353 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2354 - is a valid object ok 2355 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::blcm($x, $y); ok 2356 - is a valid object ok 2357 - $x = Math::BigInt->new("+27"); $y = Math::BigInt->new("+90"); Math::BigInt::blcm($x, $y); ok 2358 - is a valid object ok 2359 - $x = Math::BigInt->new("+1034"); $y = Math::BigInt->new("+804"); Math::BigInt::blcm($x, $y); ok 2360 - is a valid object ok 2361 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x & $y; ok 2362 - is a valid object ok 2363 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x & $y; ok 2364 - is a valid object ok 2365 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x & $y; ok 2366 - is a valid object ok 2367 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x & $y; ok 2368 - is a valid object ok 2369 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x & $y; ok 2370 - is a valid object ok 2371 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x & $y; ok 2372 - is a valid object ok 2373 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x & $y; ok 2374 - is a valid object ok 2375 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x & $y; ok 2376 - is a valid object ok 2377 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+281474976710656"); $x & $y; ok 2378 - is a valid object ok 2379 - $x = Math::BigInt->new("281474976710656"); $y = Math::BigInt->new("-1"); $x & $y; ok 2380 - is a valid object ok 2381 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x & $y; ok 2382 - is a valid object ok 2383 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x & $y; ok 2384 - is a valid object ok 2385 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x & $y; ok 2386 - is a valid object ok 2387 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("-4"); $x & $y; ok 2388 - is a valid object ok 2389 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x & $y; ok 2390 - is a valid object ok 2391 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x & $y; ok 2392 - is a valid object ok 2393 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x & $y; ok 2394 - is a valid object ok 2395 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x & $y; ok 2396 - is a valid object ok 2397 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x & $y; ok 2398 - is a valid object ok 2399 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x & $y; ok 2400 - is a valid object ok 2401 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x & $y; ok 2402 - is a valid object ok 2403 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x & $y; ok 2404 - is a valid object ok 2405 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x & $y; ok 2406 - is a valid object ok 2407 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x & $y; ok 2408 - is a valid object ok 2409 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x & $y; ok 2410 - is a valid object ok 2411 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x & $y; ok 2412 - is a valid object ok 2413 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x & $y; ok 2414 - is a valid object ok 2415 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x & $y; ok 2416 - is a valid object ok 2417 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x & $y; ok 2418 - is a valid object ok 2419 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x & $y; ok 2420 - is a valid object ok 2421 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x & $y; ok 2422 - is a valid object ok 2423 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x & $y; ok 2424 - is a valid object ok 2425 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x & $y; ok 2426 - is a valid object ok 2427 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0x3F0F0F0F0F0F"); $x & $y; ok 2428 - is a valid object ok 2429 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x | $y; ok 2430 - is a valid object ok 2431 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x | $y; ok 2432 - is a valid object ok 2433 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x | $y; ok 2434 - is a valid object ok 2435 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x | $y; ok 2436 - is a valid object ok 2437 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x | $y; ok 2438 - is a valid object ok 2439 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x | $y; ok 2440 - is a valid object ok 2441 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x | $y; ok 2442 - is a valid object ok 2443 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x | $y; ok 2444 - is a valid object ok 2445 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x | $y; ok 2446 - is a valid object ok 2447 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x | $y; ok 2448 - is a valid object ok 2449 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x | $y; ok 2450 - is a valid object ok 2451 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x | $y; ok 2452 - is a valid object ok 2453 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x | $y; ok 2454 - is a valid object ok 2455 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("-1"); $x | $y; ok 2456 - is a valid object ok 2457 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x | $y; ok 2458 - is a valid object ok 2459 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x | $y; ok 2460 - is a valid object ok 2461 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x | $y; ok 2462 - is a valid object ok 2463 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x | $y; ok 2464 - is a valid object ok 2465 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2466 - is a valid object ok 2467 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2468 - is a valid object ok 2469 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2470 - is a valid object ok 2471 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2472 - is a valid object ok 2473 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2474 - is a valid object ok 2475 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2476 - is a valid object ok 2477 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2478 - is a valid object ok 2479 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2480 - is a valid object ok 2481 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2482 - is a valid object ok 2483 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2484 - is a valid object ok 2485 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2486 - is a valid object ok 2487 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2488 - is a valid object ok 2489 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2490 - is a valid object ok 2491 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2492 - is a valid object ok 2493 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2494 - is a valid object ok 2495 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x | $y; ok 2496 - is a valid object ok 2497 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2498 - is a valid object ok 2499 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2500 - is a valid object ok 2501 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2502 - is a valid object ok 2503 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x | $y; ok 2504 - is a valid object ok 2505 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2506 - is a valid object ok 2507 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2508 - is a valid object ok 2509 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x | $y; ok 2510 - is a valid object ok 2511 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2512 - is a valid object ok 2513 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2514 - is a valid object ok 2515 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x | $y; ok 2516 - is a valid object ok 2517 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2518 - is a valid object ok 2519 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2520 - is a valid object ok 2521 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x | $y; ok 2522 - is a valid object ok 2523 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2524 - is a valid object ok 2525 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2526 - is a valid object ok 2527 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2528 - is a valid object ok 2529 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2530 - is a valid object ok 2531 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2532 - is a valid object ok 2533 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ^ $y; ok 2534 - is a valid object ok 2535 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x ^ $y; ok 2536 - is a valid object ok 2537 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2538 - is a valid object ok 2539 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x ^ $y; ok 2540 - is a valid object ok 2541 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x ^ $y; ok 2542 - is a valid object ok 2543 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2544 - is a valid object ok 2545 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ^ $y; ok 2546 - is a valid object ok 2547 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x ^ $y; ok 2548 - is a valid object ok 2549 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x ^ $y; ok 2550 - is a valid object ok 2551 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x ^ $y; ok 2552 - is a valid object ok 2553 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2554 - is a valid object ok 2555 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2556 - is a valid object ok 2557 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2558 - is a valid object ok 2559 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x ^ $y; ok 2560 - is a valid object ok 2561 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x ^ $y; ok 2562 - is a valid object ok 2563 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x ^ $y; ok 2564 - is a valid object ok 2565 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2566 - is a valid object ok 2567 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2568 - is a valid object ok 2569 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2570 - is a valid object ok 2571 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2572 - is a valid object ok 2573 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2574 - is a valid object ok 2575 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2576 - is a valid object ok 2577 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2578 - is a valid object ok 2579 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2580 - is a valid object ok 2581 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2582 - is a valid object ok 2583 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2584 - is a valid object ok 2585 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2586 - is a valid object ok 2587 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2588 - is a valid object ok 2589 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2590 - is a valid object ok 2591 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2592 - is a valid object ok 2593 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2594 - is a valid object ok 2595 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x ^ $y; ok 2596 - is a valid object ok 2597 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2598 - is a valid object ok 2599 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2600 - is a valid object ok 2601 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2602 - is a valid object ok 2603 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x ^ $y; ok 2604 - is a valid object ok 2605 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $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("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2612 - is a valid object ok 2613 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2614 - is a valid object ok 2615 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x ^ $y; ok 2616 - is a valid object ok 2617 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2618 - is a valid object ok 2619 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2620 - is a valid object ok 2621 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 2622 - is a valid object ok 2623 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2624 - is a valid object ok 2625 - $x = Math::BigInt->new("abc"); $x->bnot(); ok 2626 - is a valid object ok 2627 - $x = Math::BigInt->new("+0"); $x->bnot(); ok 2628 - is a valid object ok 2629 - $x = Math::BigInt->new("+8"); $x->bnot(); ok 2630 - is a valid object ok 2631 - $x = Math::BigInt->new("+281474976710656"); $x->bnot(); ok 2632 - is a valid object ok 2633 - $x = Math::BigInt->new("-1"); $x->bnot(); ok 2634 - is a valid object ok 2635 - $x = Math::BigInt->new("-2"); $x->bnot(); ok 2636 - is a valid object ok 2637 - $x = Math::BigInt->new("-12"); $x->bnot(); ok 2638 - is a valid object ok 2639 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2640 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2641 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2642 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2643 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2644 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2645 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2646 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2647 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2648 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2649 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2650 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2651 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("3"); $x->digit($y); ok 2652 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); $x->digit($y); ok 2653 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); $x->digit($y); ok 2654 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2655 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2656 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2657 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2658 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2659 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2660 - $x = Math::BigInt->new("abc"); $x = $x->mantissa()->bstr(); ok 2661 - $x = Math::BigInt->new("1e4"); $x = $x->mantissa()->bstr(); ok 2662 - $x = Math::BigInt->new("2e0"); $x = $x->mantissa()->bstr(); ok 2663 - $x = Math::BigInt->new("123"); $x = $x->mantissa()->bstr(); ok 2664 - $x = Math::BigInt->new("-1"); $x = $x->mantissa()->bstr(); ok 2665 - $x = Math::BigInt->new("-2"); $x = $x->mantissa()->bstr(); ok 2666 - $x = Math::BigInt->new("+inf"); $x = $x->mantissa()->bstr(); ok 2667 - $x = Math::BigInt->new("-inf"); $x = $x->mantissa()->bstr(); ok 2668 - $x = Math::BigInt->new("abc"); $x = $x->exponent()->bstr(); ok 2669 - $x = Math::BigInt->new("1e4"); $x = $x->exponent()->bstr(); ok 2670 - $x = Math::BigInt->new("2e0"); $x = $x->exponent()->bstr(); ok 2671 - $x = Math::BigInt->new("123"); $x = $x->exponent()->bstr(); ok 2672 - $x = Math::BigInt->new("-1"); $x = $x->exponent()->bstr(); ok 2673 - $x = Math::BigInt->new("-2"); $x = $x->exponent()->bstr(); ok 2674 - $x = Math::BigInt->new("0"); $x = $x->exponent()->bstr(); ok 2675 - $x = Math::BigInt->new("+inf"); $x = $x->exponent()->bstr(); ok 2676 - $x = Math::BigInt->new("-inf"); $x = $x->exponent()->bstr(); ok 2677 - $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 2678 - $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 2679 - $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 2680 - $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 2681 - $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 2682 - $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 2683 - $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 2684 - $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 2685 - $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 2686 - $x = Math::BigInt->new("-1"); $x->bfac(); ok 2687 - is a valid object ok 2688 - $x = Math::BigInt->new("NaNfac"); $x->bfac(); ok 2689 - is a valid object ok 2690 - $x = Math::BigInt->new("+inf"); $x->bfac(); ok 2691 - is a valid object ok 2692 - $x = Math::BigInt->new("-inf"); $x->bfac(); ok 2693 - is a valid object ok 2694 - $x = Math::BigInt->new("0"); $x->bfac(); ok 2695 - is a valid object ok 2696 - $x = Math::BigInt->new("1"); $x->bfac(); ok 2697 - is a valid object ok 2698 - $x = Math::BigInt->new("2"); $x->bfac(); ok 2699 - is a valid object ok 2700 - $x = Math::BigInt->new("3"); $x->bfac(); ok 2701 - is a valid object ok 2702 - $x = Math::BigInt->new("4"); $x->bfac(); ok 2703 - is a valid object ok 2704 - $x = Math::BigInt->new("5"); $x->bfac(); ok 2705 - is a valid object ok 2706 - $x = Math::BigInt->new("6"); $x->bfac(); ok 2707 - is a valid object ok 2708 - $x = Math::BigInt->new("7"); $x->bfac(); ok 2709 - is a valid object ok 2710 - $x = Math::BigInt->new("8"); $x->bfac(); ok 2711 - is a valid object ok 2712 - $x = Math::BigInt->new("9"); $x->bfac(); ok 2713 - is a valid object ok 2714 - $x = Math::BigInt->new("10"); $x->bfac(); ok 2715 - is a valid object ok 2716 - $x = Math::BigInt->new("11"); $x->bfac(); ok 2717 - is a valid object ok 2718 - $x = Math::BigInt->new("12"); $x->bfac(); ok 2719 - is a valid object ok 2720 - $x = Math::BigInt->new("20"); $x->bfac(); ok 2721 - is a valid object ok 2722 - $x = Math::BigInt->new("22"); $x->bfac(); ok 2723 - is a valid object ok 2724 - $x = Math::BigInt->new("69"); $x->bfac(); ok 2725 - is a valid object ok 2726 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("12"); $x ** $y; ok 2727 - is a valid object ok 2728 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("abc"); $x ** $y; ok 2729 - is a valid object ok 2730 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x ** $y; ok 2731 - is a valid object ok 2732 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x ** $y; ok 2733 - is a valid object ok 2734 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x ** $y; ok 2735 - is a valid object ok 2736 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2737 - is a valid object ok 2738 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2739 - is a valid object ok 2740 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x ** $y; ok 2741 - is a valid object ok 2742 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x ** $y; ok 2743 - is a valid object ok 2744 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ** $y; ok 2745 - is a valid object ok 2746 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x ** $y; ok 2747 - is a valid object ok 2748 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2749 - is a valid object ok 2750 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2751 - is a valid object ok 2752 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 2753 - is a valid object ok 2754 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x ** $y; ok 2755 - is a valid object ok 2756 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x ** $y; ok 2757 - is a valid object ok 2758 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2759 - is a valid object ok 2760 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2761 - is a valid object ok 2762 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x ** $y; ok 2763 - is a valid object ok 2764 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2765 - is a valid object ok 2766 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2767 - is a valid object ok 2768 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 2769 - is a valid object ok 2770 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 2771 - is a valid object ok 2772 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2773 - is a valid object ok 2774 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2775 - is a valid object ok 2776 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2777 - is a valid object ok 2778 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2779 - is a valid object ok 2780 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 2781 - is a valid object ok 2782 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 2783 - is a valid object ok 2784 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500013"); $x ** $y; ok 2785 - is a valid object ok 2786 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 2787 - is a valid object ok 2788 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 2789 - is a valid object ok 2790 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x ** $y; ok 2791 - is a valid object ok 2792 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x ** $y; ok 2793 - is a valid object ok 2794 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2795 - is a valid object ok 2796 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2797 - is a valid object ok 2798 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2799 - is a valid object ok 2800 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2801 - is a valid object ok 2802 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2803 - is a valid object ok 2804 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2805 - is a valid object ok 2806 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2807 - is a valid object ok 2808 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2809 - is a valid object ok 2810 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2811 - is a valid object ok 2812 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2813 - is a valid object ok 2814 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2815 - is a valid object ok 2816 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2817 - is a valid object ok 2818 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 2819 - is a valid object ok 2820 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 2821 - is a valid object ok 2822 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2823 - is a valid object ok 2824 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2825 - is a valid object ok 2826 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2827 - is a valid object ok 2828 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x ** $y; ok 2829 - is a valid object ok 2830 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x ** $y; ok 2831 - is a valid object ok 2832 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x ** $y; ok 2833 - is a valid object ok 2834 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x ** $y; ok 2835 - is a valid object ok 2836 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x ** $y; ok 2837 - is a valid object ok 2838 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x ** $y; ok 2839 - is a valid object ok 2840 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x ** $y; ok 2841 - is a valid object ok 2842 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2843 - is a valid object ok 2844 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2845 - is a valid object ok 2846 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 2847 - is a valid object ok 2848 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-4"); $x ** $y; ok 2849 - is a valid object ok 2850 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x ** $y; ok 2851 - is a valid object ok 2852 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x ** $y; ok 2853 - is a valid object ok 2854 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x ** $y; ok 2855 - is a valid object ok 2856 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x ** $y; ok 2857 - is a valid object ok 2858 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("6"); $x ** $y; ok 2859 - is a valid object ok 2860 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("7"); $x ** $y; ok 2861 - is a valid object ok 2862 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("8"); $x ** $y; ok 2863 - is a valid object ok 2864 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("9"); $x ** $y; ok 2865 - is a valid object ok 2866 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("20"); $x ** $y; ok 2867 - is a valid object ok 2868 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x ** $y; ok 2869 - is a valid object ok 2870 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2871 - is a valid object ok 2872 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2873 - is a valid object ok 2874 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 2875 - is a valid object ok 2876 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 2877 - is a valid object ok 2878 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("2"); $x ** $y; ok 2879 - is a valid object ok 2880 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 2881 - is a valid object ok 2882 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x ** $y; ok 2883 - is a valid object ok 2884 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x ** $y; ok 2885 - is a valid object ok 2886 - $x = Math::BigInt->new("100"); $x->length(); ok 2887 - $x = Math::BigInt->new("10"); $x->length(); ok 2888 - $x = Math::BigInt->new("1"); $x->length(); ok 2889 - $x = Math::BigInt->new("0"); $x->length(); ok 2890 - $x = Math::BigInt->new("12345"); $x->length(); ok 2891 - $x = Math::BigInt->new("10000000000000000"); $x->length(); ok 2892 - $x = Math::BigInt->new("-123"); $x->length(); ok 2893 - $x = Math::BigInt->new("215960156869840440586892398248"); $x->length(); ok 2894 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2895 - is a valid object ok 2896 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2897 - is a valid object ok 2898 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2899 - is a valid object ok 2900 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2901 - is a valid object ok 2902 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2903 - is a valid object ok 2904 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2905 - is a valid object ok 2906 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2907 - is a valid object ok 2908 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2909 - is a valid object ok 2910 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2911 - is a valid object ok 2912 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2913 - is a valid object ok 2914 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2915 - is a valid object ok 2916 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2917 - is a valid object ok 2918 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2919 - is a valid object ok 2920 - $x = Math::BigInt->new("15241"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2921 - is a valid object ok 2922 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2923 - is a valid object ok 2924 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2925 - is a valid object ok 2926 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2927 - is a valid object ok 2928 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2929 - is a valid object ok 2930 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2931 - is a valid object ok 2932 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2933 - is a valid object ok 2934 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 2935 - is a valid object ok 2936 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2937 - is a valid object ok 2938 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x->broot($y); ok 2939 - is a valid object ok 2940 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 2941 - is a valid object ok 2942 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 2943 - is a valid object ok 2944 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); $x->broot($y); ok 2945 - is a valid object ok 2946 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 2947 - is a valid object ok 2948 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2949 - is a valid object ok 2950 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2951 - is a valid object ok 2952 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2953 - is a valid object ok 2954 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2955 - is a valid object ok 2956 - $x = Math::BigInt->new("-123.45"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2957 - is a valid object ok 2958 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("0"); $x->broot($y); ok 2959 - is a valid object ok 2960 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 2961 - is a valid object ok 2962 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 2963 - is a valid object ok 2964 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 2965 - is a valid object ok 2966 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 2967 - is a valid object ok 2968 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 2969 - is a valid object ok 2970 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 2971 - is a valid object ok 2972 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("4"); $x->broot($y); ok 2973 - is a valid object ok 2974 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("4"); $x->broot($y); ok 2975 - is a valid object ok 2976 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("4"); $x->broot($y); ok 2977 - is a valid object ok 2978 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("8"); $x->broot($y); ok 2979 - is a valid object ok 2980 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("16"); $x->broot($y); ok 2981 - is a valid object ok 2982 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("32"); $x->broot($y); ok 2983 - is a valid object ok 2984 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("64"); $x->broot($y); ok 2985 - is a valid object ok 2986 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("128"); $x->broot($y); ok 2987 - is a valid object ok 2988 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $y = Math::BigInt->new("15"); $x->broot($y); ok 2989 - is a valid object ok 2990 - $x = Math::BigInt->new("145"); $x->bsqrt(); ok 2991 - is a valid object ok 2992 - $x = Math::BigInt->new("144"); $x->bsqrt(); ok 2993 - is a valid object ok 2994 - $x = Math::BigInt->new("143"); $x->bsqrt(); ok 2995 - is a valid object ok 2996 - $x = Math::BigInt->new("16"); $x->bsqrt(); ok 2997 - is a valid object ok 2998 - $x = Math::BigInt->new("170"); $x->bsqrt(); ok 2999 - is a valid object ok 3000 - $x = Math::BigInt->new("169"); $x->bsqrt(); ok 3001 - is a valid object ok 3002 - $x = Math::BigInt->new("168"); $x->bsqrt(); ok 3003 - is a valid object ok 3004 - $x = Math::BigInt->new("4"); $x->bsqrt(); ok 3005 - is a valid object ok 3006 - $x = Math::BigInt->new("3"); $x->bsqrt(); ok 3007 - is a valid object ok 3008 - $x = Math::BigInt->new("2"); $x->bsqrt(); ok 3009 - is a valid object ok 3010 - $x = Math::BigInt->new("9"); $x->bsqrt(); ok 3011 - is a valid object ok 3012 - $x = Math::BigInt->new("12"); $x->bsqrt(); ok 3013 - is a valid object ok 3014 - $x = Math::BigInt->new("256"); $x->bsqrt(); ok 3015 - is a valid object ok 3016 - $x = Math::BigInt->new("100000000"); $x->bsqrt(); ok 3017 - is a valid object ok 3018 - $x = Math::BigInt->new("4000000000000"); $x->bsqrt(); ok 3019 - is a valid object ok 3020 - $x = Math::BigInt->new("152399026"); $x->bsqrt(); ok 3021 - is a valid object ok 3022 - $x = Math::BigInt->new("152399025"); $x->bsqrt(); ok 3023 - is a valid object ok 3024 - $x = Math::BigInt->new("152399024"); $x->bsqrt(); ok 3025 - is a valid object ok 3026 - $x = Math::BigInt->new("18446744073709551616"); $x->bsqrt(); ok 3027 - is a valid object ok 3028 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $x->bsqrt(); ok 3029 - is a valid object ok 3030 - $x = Math::BigInt->new("1"); $x->bsqrt(); ok 3031 - is a valid object ok 3032 - $x = Math::BigInt->new("0"); $x->bsqrt(); ok 3033 - is a valid object ok 3034 - $x = Math::BigInt->new("-2"); $x->bsqrt(); ok 3035 - is a valid object ok 3036 - $x = Math::BigInt->new("-123"); $x->bsqrt(); ok 3037 - is a valid object ok 3038 - $x = Math::BigInt->new("Nan"); $x->bsqrt(); ok 3039 - is a valid object ok 3040 - $x = Math::BigInt->new("+inf"); $x->bsqrt(); ok 3041 - is a valid object ok 3042 - $x = Math::BigInt->new("-inf"); $x->bsqrt(); ok 3043 - is a valid object ok 3044 - $x = Math::BigInt->new("NaN"); $x->bexp(); ok 3045 - is a valid object ok 3046 - $x = Math::BigInt->new("inf"); $x->bexp(); ok 3047 - is a valid object ok 3048 - $x = Math::BigInt->new("1"); $x->bexp(); ok 3049 - is a valid object ok 3050 - $x = Math::BigInt->new("2"); $x->bexp(); ok 3051 - is a valid object ok 3052 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3053 - is a valid object ok 3054 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3055 - is a valid object ok 3056 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3057 - is a valid object ok 3058 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3059 - is a valid object ok 3060 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3061 - is a valid object ok 3062 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3063 - is a valid object ok 3064 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3065 - is a valid object ok 3066 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3067 - is a valid object ok 3068 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->batan2($y); ok 3069 - is a valid object ok 3070 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3071 - is a valid object ok 3072 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3073 - is a valid object ok 3074 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3075 - is a valid object ok 3076 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3077 - is a valid object ok 3078 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3079 - is a valid object ok 3080 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3081 - is a valid object ok 3082 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3083 - is a valid object ok 3084 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3085 - is a valid object ok 3086 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->batan2($y); ok 3087 - is a valid object ok 3088 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3089 - is a valid object ok 3090 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3091 - is a valid object ok 3092 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3093 - is a valid object ok 3094 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3095 - is a valid object ok 3096 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3097 - is a valid object ok 3098 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3099 - is a valid object ok 3100 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3101 - is a valid object ok 3102 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3103 - is a valid object ok 3104 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3105 - is a valid object ok 3106 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3107 - is a valid object ok 3108 - $x = Math::BigInt->new("77"); Math::BigInt->bpi($x); ok 3109 - is a valid object ok 3110 - $x = Math::BigInt->new("+0"); Math::BigInt->bpi($x); ok 3111 - is a valid object ok 3112 - $x = Math::BigInt->new("11"); Math::BigInt->bpi($x); ok 3113 - is a valid object ok 3114 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("10"); $x->bnok($y); ok 3115 - is a valid object ok 3116 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3117 - is a valid object ok 3118 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3119 - is a valid object ok 3120 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3121 - is a valid object ok 3122 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3123 - is a valid object ok 3124 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bnok($y); ok 3125 - is a valid object ok 3126 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3127 - is a valid object ok 3128 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->bnok($y); ok 3129 - is a valid object ok 3130 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3131 - is a valid object ok 3132 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("6"); $x->bnok($y); ok 3133 - is a valid object ok 3134 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("90"); $x->bnok($y); ok 3135 - is a valid object ok 3136 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("95"); $x->bnok($y); ok 3137 - is a valid object ok 3138 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3139 - is a valid object ok 3140 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3141 - is a valid object ok 3142 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3143 - is a valid object ok 3144 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3145 - is a valid object ok 3146 - $x = Math::BigInt->new("NaNbround"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3147 - is a valid object ok 3148 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3149 - is a valid object ok 3150 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3151 - is a valid object ok 3152 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3153 - is a valid object ok 3154 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("2"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3155 - is a valid object ok 3156 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3157 - is a valid object ok 3158 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3159 - is a valid object ok 3160 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3161 - is a valid object ok 3162 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3163 - is a valid object ok 3164 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3165 - is a valid object ok 3166 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3167 - is a valid object ok 3168 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3169 - is a valid object ok 3170 - $x = Math::BigInt->new("+101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3171 - is a valid object ok 3172 - $x = Math::BigInt->new("-101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3173 - is a valid object ok 3174 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3175 - is a valid object ok 3176 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3177 - is a valid object ok 3178 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3179 - is a valid object ok 3180 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3181 - is a valid object ok 3182 - $x = Math::BigInt->new("+201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3183 - is a valid object ok 3184 - $x = Math::BigInt->new("-201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3185 - is a valid object ok 3186 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3187 - is a valid object ok 3188 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3189 - is a valid object ok 3190 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3191 - is a valid object ok 3192 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3193 - is a valid object ok 3194 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3195 - is a valid object ok 3196 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3197 - is a valid object ok 3198 - $x = Math::BigInt->new("+301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3199 - is a valid object ok 3200 - $x = Math::BigInt->new("-301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3201 - is a valid object ok 3202 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3203 - is a valid object ok 3204 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3205 - is a valid object ok 3206 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3207 - is a valid object ok 3208 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3209 - is a valid object ok 3210 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3211 - is a valid object ok 3212 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3213 - is a valid object ok 3214 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3215 - is a valid object ok 3216 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3217 - is a valid object ok 3218 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3219 - is a valid object ok 3220 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3221 - is a valid object ok 3222 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3223 - is a valid object ok 3224 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3225 - is a valid object ok 3226 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3227 - is a valid object ok 3228 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3229 - is a valid object ok 3230 - $x = Math::BigInt->new("+501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3231 - is a valid object ok 3232 - $x = Math::BigInt->new("-501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3233 - is a valid object ok 3234 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3235 - is a valid object ok 3236 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3237 - is a valid object ok 3238 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3239 - is a valid object ok 3240 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3241 - is a valid object ok 3242 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3243 - is a valid object ok 3244 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3245 - is a valid object ok 3246 - $x = Math::BigInt->new("+601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3247 - is a valid object ok 3248 - $x = Math::BigInt->new("-601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3249 - is a valid object ok 3250 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("7"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3251 - is a valid object ok 3252 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3253 - is a valid object ok 3254 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3255 - is a valid object ok 3256 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3257 - is a valid object ok 3258 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3259 - is a valid object ok 3260 - $x = Math::BigInt->new("+60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3261 - is a valid object ok 3262 - $x = Math::BigInt->new("+60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3263 - is a valid object ok 3264 - $x = Math::BigInt->new("+60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3265 - is a valid object ok 3266 - $x = Math::BigInt->new("+60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3267 - is a valid object ok 3268 - $x = Math::BigInt->new("+60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3269 - is a valid object ok 3270 - $x = Math::BigInt->new("+60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3271 - is a valid object ok 3272 - $x = Math::BigInt->new("+60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3273 - is a valid object ok 3274 - $x = Math::BigInt->new("+60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3275 - is a valid object ok 3276 - $x = Math::BigInt->new("+60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3277 - is a valid object ok 3278 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3279 - is a valid object ok 3280 - $x = Math::BigInt->new("-60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3281 - is a valid object ok 3282 - $x = Math::BigInt->new("-60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3283 - is a valid object ok 3284 - $x = Math::BigInt->new("-60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3285 - is a valid object ok 3286 - $x = Math::BigInt->new("-60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3287 - is a valid object ok 3288 - $x = Math::BigInt->new("-60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3289 - is a valid object ok 3290 - $x = Math::BigInt->new("-60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3291 - is a valid object ok 3292 - $x = Math::BigInt->new("-60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3293 - is a valid object ok 3294 - $x = Math::BigInt->new("-60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3295 - is a valid object ok 3296 - $x = Math::BigInt->new("-60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3297 - is a valid object ok 3298 - $x = Math::BigInt->new("0"); $x->is_zero() || 0; ok 3299 - $x = Math::BigInt->new("NaNzero"); $x->is_zero() || 0; ok 3300 - $x = Math::BigInt->new("+inf"); $x->is_zero() || 0; ok 3301 - $x = Math::BigInt->new("-inf"); $x->is_zero() || 0; ok 3302 - $x = Math::BigInt->new("123"); $x->is_zero() || 0; ok 3303 - $x = Math::BigInt->new("-1"); $x->is_zero() || 0; ok 3304 - $x = Math::BigInt->new("1"); $x->is_zero() || 0; ok 3305 - $x = Math::BigInt->new("0"); $x->is_one() || 0; ok 3306 - $x = Math::BigInt->new("NaNone"); $x->is_one() || 0; ok 3307 - $x = Math::BigInt->new("+inf"); $x->is_one() || 0; ok 3308 - $x = Math::BigInt->new("-inf"); $x->is_one() || 0; ok 3309 - $x = Math::BigInt->new("1"); $x->is_one() || 0; ok 3310 - $x = Math::BigInt->new("2"); $x->is_one() || 0; ok 3311 - $x = Math::BigInt->new("-1"); $x->is_one() || 0; ok 3312 - $x = Math::BigInt->new("-2"); $x->is_one() || 0; ok 3313 - $x = Math::BigInt->new("0"); $x->bfloor(); ok 3314 - is a valid object ok 3315 - $x = Math::BigInt->new("NaNfloor"); $x->bfloor(); ok 3316 - is a valid object ok 3317 - $x = Math::BigInt->new("+inf"); $x->bfloor(); ok 3318 - is a valid object ok 3319 - $x = Math::BigInt->new("-inf"); $x->bfloor(); ok 3320 - is a valid object ok 3321 - $x = Math::BigInt->new("-1"); $x->bfloor(); ok 3322 - is a valid object ok 3323 - $x = Math::BigInt->new("-2"); $x->bfloor(); ok 3324 - is a valid object ok 3325 - $x = Math::BigInt->new("2"); $x->bfloor(); ok 3326 - is a valid object ok 3327 - $x = Math::BigInt->new("3"); $x->bfloor(); ok 3328 - is a valid object ok 3329 - $x = Math::BigInt->new("abc"); $x->bfloor(); ok 3330 - is a valid object ok 3331 - $x = Math::BigInt->new("NaNceil"); $x->bceil(); ok 3332 - is a valid object ok 3333 - $x = Math::BigInt->new("+inf"); $x->bceil(); ok 3334 - is a valid object ok 3335 - $x = Math::BigInt->new("-inf"); $x->bceil(); ok 3336 - is a valid object ok 3337 - $x = Math::BigInt->new("0"); $x->bceil(); ok 3338 - is a valid object ok 3339 - $x = Math::BigInt->new("-1"); $x->bceil(); ok 3340 - is a valid object ok 3341 - $x = Math::BigInt->new("-2"); $x->bceil(); ok 3342 - is a valid object ok 3343 - $x = Math::BigInt->new("2"); $x->bceil(); ok 3344 - is a valid object ok 3345 - $x = Math::BigInt->new("3"); $x->bceil(); ok 3346 - is a valid object ok 3347 - $x = Math::BigInt->new("abc"); $x->bceil(); ok 3348 - is a valid object ok 3349 - $x = Math::BigInt->new("NaN"); $x->bint(); ok 3350 - is a valid object ok 3351 - $x = Math::BigInt->new("+inf"); $x->bint(); ok 3352 - is a valid object ok 3353 - $x = Math::BigInt->new("-inf"); $x->bint(); ok 3354 - is a valid object ok 3355 - $x = Math::BigInt->new("0"); $x->bint(); ok 3356 - is a valid object ok 3357 - $x = Math::BigInt->new("-1"); $x->bint(); ok 3358 - is a valid object ok 3359 - $x = Math::BigInt->new("-2"); $x->bint(); ok 3360 - is a valid object ok 3361 - $x = Math::BigInt->new("2"); $x->bint(); ok 3362 - is a valid object ok 3363 - $x = Math::BigInt->new("3"); $x->bint(); ok 3364 - is a valid object ok 3365 - $x = Math::BigInt->new("128"); $x->as_hex(); ok 3366 - $x = Math::BigInt->new("-128"); $x->as_hex(); ok 3367 - $x = Math::BigInt->new("0"); $x->as_hex(); ok 3368 - $x = Math::BigInt->new("-0"); $x->as_hex(); ok 3369 - $x = Math::BigInt->new("1"); $x->as_hex(); ok 3370 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_hex(); ok 3371 - $x = Math::BigInt->new("+inf"); $x->as_hex(); ok 3372 - $x = Math::BigInt->new("-inf"); $x->as_hex(); ok 3373 - $x = Math::BigInt->new("NaNas_hex"); $x->as_hex(); ok 3374 - $x = Math::BigInt->new("128"); $x->as_bin(); ok 3375 - $x = Math::BigInt->new("-128"); $x->as_bin(); ok 3376 - $x = Math::BigInt->new("0"); $x->as_bin(); ok 3377 - $x = Math::BigInt->new("-0"); $x->as_bin(); ok 3378 - $x = Math::BigInt->new("1"); $x->as_bin(); ok 3379 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 3380 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_bin(); ok 3381 - $x = Math::BigInt->new("+inf"); $x->as_bin(); ok 3382 - $x = Math::BigInt->new("-inf"); $x->as_bin(); ok 3383 - $x = Math::BigInt->new("NaNas_bin"); $x->as_bin(); ok 3384 - $x = Math::BigInt->new("128"); $x->as_oct(); ok 3385 - $x = Math::BigInt->new("-128"); $x->as_oct(); ok 3386 - $x = Math::BigInt->new("0"); $x->as_oct(); ok 3387 - $x = Math::BigInt->new("-0"); $x->as_oct(); ok 3388 - $x = Math::BigInt->new("1"); $x->as_oct(); ok 3389 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 3390 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_oct(); ok 3391 - $x = Math::BigInt->new("+inf"); $x->as_oct(); ok 3392 - $x = Math::BigInt->new("-inf"); $x->as_oct(); ok 3393 - $x = Math::BigInt->new("NaNas_oct"); $x->as_oct(); ok 3394 - $x = Math::BigInt->new("-1"); $x = log($x); ok 3395 - is a valid object ok 3396 - $x = Math::BigInt->new("0"); $x = log($x); ok 3397 - is a valid object ok 3398 - $x = Math::BigInt->new("1"); $x = log($x); ok 3399 - is a valid object ok 3400 - $x = Math::BigInt->new("2"); $x = log($x); ok 3401 - is a valid object ok 3402 - $x = Math::BigInt->new("3"); $x = log($x); ok 3403 - is a valid object ok 3404 - $x = Math::BigInt->new("123456789"); $x = log($x); ok 3405 - is a valid object ok 3406 - $x = Math::BigInt->new("1234567890987654321"); $x = log($x); ok 3407 - is a valid object ok 3408 - $x = Math::BigInt->new("-inf"); $x = log($x); ok 3409 - is a valid object ok 3410 - $x = Math::BigInt->new("inf"); $x = log($x); ok 3411 - is a valid object ok 3412 - $x = Math::BigInt->new("NaN"); $x = log($x); ok 3413 - is a valid object ok 3414 - $x = Math::BigInt->new("4294967296"); $a = $x->bmul($x); ok 3415 - $x = Math::BigInt->new(10); $a = $x->bpow($x); ok 3416 - $z = $x & $y; $x ok 3417 - $z = $x & $y; $y ok 3418 - $z = $x & $y; $z ok 3419 - $z = $x | $y; $x ok 3420 - $z = $x | $y; $y ok 3421 - $z = $x | $y; $z ok 3422 - $z = $x | $y; $x ok 3423 - $z = $x | $y; $y ok 3424 - $z = $x | $y; $z ok 3425 - $z = $x ^ $y; $x ok 3426 - $z = $x ^ $y; $y ok 3427 - $z = $x ^ $y; $z ok 3428 - $y = -$x; $x ok 3429 - $y = abs($x); $x ok 3430 - $x->copy()->bmodpow($y, $z); $u ok 3431 - $x->copy()->bmodpow($y, $z); $y ok 3432 - $x->copy()->bmodpow($y, $z); $z ok 3433 - $y = -$x; $x ok 3434 - $y = -$x; $y ok 3435 - $y = $x->copy()->bneg(); $x ok 3436 - $y = $x->copy()->bneg(); $y ok 3437 - $x->bmul($y); $x ok 3438 - $x->bmul($y); $y ok 3439 - $x->badd($y); $x ok 3440 - $x->badd($y); $y ok 3441 - $x->bsub($y); $x ok 3442 - $x->bsub($y); $y ok 3443 - $x->bdiv($y); $x ok 3444 - $x->bdiv($y); $y ok 3445 - $x->bmod($y); $x ok 3446 - $x->bmod($y); $y ok 3447 - $x->bmul($y); $x ok 3448 - $x->bmul($y); $y ok 3449 - $x->badd($y); $x ok 3450 - $x->badd($y); $y ok 3451 - $x->bsub($y); $x ok 3452 - $x->bsub($y); $y ok 3453 - $x->bdiv($y); $x ok 3454 - $x->bdiv($y); $y ok 3455 - $x->bmod($y); $x ok 3456 - $x->bmod($y); $y ok 3457 - $x->bmul($y); $x ok 3458 - $x->bmul($y); $y ok 3459 - $x->badd($y); $x ok 3460 - $x->badd($y); $y ok 3461 - $x->bsub($y); $x ok 3462 - $x->bsub($y); $y ok 3463 - $x->bdiv($y); $x ok 3464 - $x->bdiv($y); $y ok 3465 - $x->bmod($y); $x ok 3466 - $x->bmod($y); $y ok 3467 - overloading cmp works ok 3468 - $x = Math::BigInt->new(10); $x = 2 ** $x; $x == 1024; ok 3469 - $x = Math::BigInt->new(10); $x = 2 * $x; $x == 20; ok 3470 - $x = Math::BigInt->new(10); $x = 2 + $x; $x == 12; ok 3471 - $x = Math::BigInt->new(10); $x = 2 - $x; $x == -8; ok 3472 - $x = Math::BigInt->new(10); $x = 20 / $x; $x == 2; ok 3473 - $x = Math::BigInt->new(3); $x = 20 % $x; $x == 2; ok 3474 - $x = Math::BigInt->new(7); $x = 20 & $x; $x == 4; ok 3475 - $x = Math::BigInt->new(7); $x = 0x20 | $x; $x == 0x27; ok 3476 - $x = Math::BigInt->new(7); $x = 0x20 ^ $x; $x == 0x27; ok 3477 - $x = Math::BigInt->badd(4, 5); $x == 9; ok 3478 - $x = Math::BigInt->new(1); $x is true ok 3479 - $x = Math::BigInt->new(0); !$x is false ok 3480 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 3481 - first arg matches /^Math::BigInt/ ok 3482 - second arg is 4 ok 3483 - third arg is 5 ok 3484 - objectify(0, 4, 5) gives Math::BigInt, 4, 5 ok 3485 - first arg matches /^Math::BigInt/ ok 3486 - second arg is 4 ok 3487 - third arg is 5 ok 3488 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 3489 - first arg matches /^Math::BigInt/ ok 3490 - second arg is 4 ok 3491 - third arg is 5 ok 3492 - objectify(2, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 3493 - first arg matches /^Math::BigInt/ ok 3494 - second arg is 4 ok 3495 - second arg is a Math::BigInt object ok 3496 - third arg is 5 ok 3497 - third arg is a Math::BigInt object ok 3498 - fourth arg is 6 ok 3499 - fourth arg is a scalar ok 3500 - fifth arg is 7 ok 3501 - fifth arg is a scalar ok 3502 - objectify(2, Math::BigInt, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 3503 - first arg is Math::BigInt ok 3504 - second arg is 4 ok 3505 - second arg is a Math::BigInt object ok 3506 - third arg is 5 ok 3507 - third arg is a Math::BigInt object ok 3508 - fourth arg is 6 ok 3509 - fourth arg is a scalar ok 3510 - fifth arg is 7 ok 3511 - fifth arg is a scalar ok 3512 - Math::BigInt->new(123)->badd(123) = 246 ok 3513 - Math::BigInt->badd(123, 321) = 444 ok 3514 - Math::BigInt->badd(123, Math::BigInt->new(321)) = 444 ok 3515 - Math::BigInt->new(123)->bsub(122) = 1 ok 3516 - Math::BigInt->bsub(321, 123) = 198 ok 3517 - Math::BigInt->bsub(321, Math::BigInt->new(123)) = 198 ok 3518 - Math::BigInt->new(123)->bmul(123) = 15129 ok 3519 - Math::BigInt->bmul(123, 123) = 15129 ok 3520 - Math::BigInt->bmul(123, Math::BigInt->new(123)) = 15129 ok 3521 - Math::BigInt->new(15129)->bdiv(123) = 123 ok 3522 - Math::BigInt->bdiv(15129, 123) = 123 ok 3523 - Math::BigInt->bdiv(15129, Math::BigInt->new(123)) = 123 ok 3524 - Math::BigInt->new(15131)->bmod(123) = 2 ok 3525 - Math::BigInt->bmod(15131, 123) = 2 ok 3526 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) = 2 ok 3527 - Math::BigInt->new(2)->bpow(16) = 65536 ok 3528 - Math::BigInt->bpow(2, 16) = 65536 ok 3529 - Math::BigInt->bpow(2, Math::BigInt->new(16)) = 65536 ok 3530 - Math::BigInt->new(2**15)->brsft(1) = 2**14 ok 3531 - Math::BigInt->brsft(2**15, 1) = 2**14 ok 3532 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) = 2**14 ok 3533 - Math::BigInt->new(2**13)->blsft(1) = 2**14 ok 3534 - Math::BigInt->blsft(2**13, 1) = 2**14 ok 3535 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) = 2**14 ok 3536 - $x = Math::BigInt->new(1.05e+015); $x->bsstr() = "105e+13" ok 3537 - $x = Math::BigInt->new(1e+129); $x->bsstr() = "1e+129" ok 3538 - Math::BigInt->new("1") = 1 ok 3539 - Math::BigInt->new(" 1") = 1 ok 3540 - Math::BigInt->new("1 ") = 1 ok 3541 - Math::BigInt->new(" 1 ") = 1 ok 3542 - Math::BigInt->new("\n1") = 1 ok 3543 - Math::BigInt->new("1\n") = 1 ok 3544 - Math::BigInt->new("\n1\n") = 1 ok 3545 - Math::BigInt->new(" \n1\n") = 1 ok 3546 - Math::BigInt->new(" \n1 \n") = 1 ok 3547 - Math::BigInt->new(" \n1\n ") = 1 ok 3548 - Math::BigInt->new(" \n1\n1") = 'NaN' ok 3549 - Math::BigInt->new("1 \n1\n1") = 'NaN' ok 3550 - Math::BigInt->new("12") = 12 ok 3551 - Math::BigInt->new(" 12") = 12 ok 3552 - Math::BigInt->new("12 ") = 12 ok 3553 - Math::BigInt->new(" 12 ") = 12 ok 3554 - Math::BigInt->new("\n12") = 12 ok 3555 - Math::BigInt->new("12\n") = 12 ok 3556 - Math::BigInt->new("\n12\n") = 12 ok 3557 - Math::BigInt->new(" \n12\n") = 12 ok 3558 - Math::BigInt->new(" \n12 \n") = 12 ok 3559 - Math::BigInt->new(" \n12\n ") = 12 ok 3560 - Math::BigInt->new(" \n12\n1") = 'NaN' ok 3561 - Math::BigInt->new("1 \n12\n1") = 'NaN' ok 3562 - Math::BigInt->new("123") = 123 ok 3563 - Math::BigInt->new(" 123") = 123 ok 3564 - Math::BigInt->new("123 ") = 123 ok 3565 - Math::BigInt->new(" 123 ") = 123 ok 3566 - Math::BigInt->new("\n123") = 123 ok 3567 - Math::BigInt->new("123\n") = 123 ok 3568 - Math::BigInt->new("\n123\n") = 123 ok 3569 - Math::BigInt->new(" \n123\n") = 123 ok 3570 - Math::BigInt->new(" \n123 \n") = 123 ok 3571 - Math::BigInt->new(" \n123\n ") = 123 ok 3572 - Math::BigInt->new(" \n123\n1") = 'NaN' ok 3573 - Math::BigInt->new("1 \n123\n1") = 'NaN' ok 3574 - Math::BigInt->new("1234") = 1234 ok 3575 - Math::BigInt->new(" 1234") = 1234 ok 3576 - Math::BigInt->new("1234 ") = 1234 ok 3577 - Math::BigInt->new(" 1234 ") = 1234 ok 3578 - Math::BigInt->new("\n1234") = 1234 ok 3579 - Math::BigInt->new("1234\n") = 1234 ok 3580 - Math::BigInt->new("\n1234\n") = 1234 ok 3581 - Math::BigInt->new(" \n1234\n") = 1234 ok 3582 - Math::BigInt->new(" \n1234 \n") = 1234 ok 3583 - Math::BigInt->new(" \n1234\n ") = 1234 ok 3584 - Math::BigInt->new(" \n1234\n1") = 'NaN' ok 3585 - Math::BigInt->new("1 \n1234\n1") = 'NaN' ok 3586 - Math::BigInt->new("12345") = 12345 ok 3587 - Math::BigInt->new(" 12345") = 12345 ok 3588 - Math::BigInt->new("12345 ") = 12345 ok 3589 - Math::BigInt->new(" 12345 ") = 12345 ok 3590 - Math::BigInt->new("\n12345") = 12345 ok 3591 - Math::BigInt->new("12345\n") = 12345 ok 3592 - Math::BigInt->new("\n12345\n") = 12345 ok 3593 - Math::BigInt->new(" \n12345\n") = 12345 ok 3594 - Math::BigInt->new(" \n12345 \n") = 12345 ok 3595 - Math::BigInt->new(" \n12345\n ") = 12345 ok 3596 - Math::BigInt->new(" \n12345\n1") = 'NaN' ok 3597 - Math::BigInt->new("1 \n12345\n1") = 'NaN' ok 3598 - Math::BigInt->new("123456") = 123456 ok 3599 - Math::BigInt->new(" 123456") = 123456 ok 3600 - Math::BigInt->new("123456 ") = 123456 ok 3601 - Math::BigInt->new(" 123456 ") = 123456 ok 3602 - Math::BigInt->new("\n123456") = 123456 ok 3603 - Math::BigInt->new("123456\n") = 123456 ok 3604 - Math::BigInt->new("\n123456\n") = 123456 ok 3605 - Math::BigInt->new(" \n123456\n") = 123456 ok 3606 - Math::BigInt->new(" \n123456 \n") = 123456 ok 3607 - Math::BigInt->new(" \n123456\n ") = 123456 ok 3608 - Math::BigInt->new(" \n123456\n1") = 'NaN' ok 3609 - Math::BigInt->new("1 \n123456\n1") = 'NaN' ok 3610 - Math::BigInt->new("1234567") = 1234567 ok 3611 - Math::BigInt->new(" 1234567") = 1234567 ok 3612 - Math::BigInt->new("1234567 ") = 1234567 ok 3613 - Math::BigInt->new(" 1234567 ") = 1234567 ok 3614 - Math::BigInt->new("\n1234567") = 1234567 ok 3615 - Math::BigInt->new("1234567\n") = 1234567 ok 3616 - Math::BigInt->new("\n1234567\n") = 1234567 ok 3617 - Math::BigInt->new(" \n1234567\n") = 1234567 ok 3618 - Math::BigInt->new(" \n1234567 \n") = 1234567 ok 3619 - Math::BigInt->new(" \n1234567\n ") = 1234567 ok 3620 - Math::BigInt->new(" \n1234567\n1") = 'NaN' ok 3621 - Math::BigInt->new("1 \n1234567\n1") = 'NaN' ok 3622 - Math::BigInt->new("12345678") = 12345678 ok 3623 - Math::BigInt->new(" 12345678") = 12345678 ok 3624 - Math::BigInt->new("12345678 ") = 12345678 ok 3625 - Math::BigInt->new(" 12345678 ") = 12345678 ok 3626 - Math::BigInt->new("\n12345678") = 12345678 ok 3627 - Math::BigInt->new("12345678\n") = 12345678 ok 3628 - Math::BigInt->new("\n12345678\n") = 12345678 ok 3629 - Math::BigInt->new(" \n12345678\n") = 12345678 ok 3630 - Math::BigInt->new(" \n12345678 \n") = 12345678 ok 3631 - Math::BigInt->new(" \n12345678\n ") = 12345678 ok 3632 - Math::BigInt->new(" \n12345678\n1") = 'NaN' ok 3633 - Math::BigInt->new("1 \n12345678\n1") = 'NaN' ok 3634 - Math::BigInt->new("123456789") = 123456789 ok 3635 - Math::BigInt->new(" 123456789") = 123456789 ok 3636 - Math::BigInt->new("123456789 ") = 123456789 ok 3637 - Math::BigInt->new(" 123456789 ") = 123456789 ok 3638 - Math::BigInt->new("\n123456789") = 123456789 ok 3639 - Math::BigInt->new("123456789\n") = 123456789 ok 3640 - Math::BigInt->new("\n123456789\n") = 123456789 ok 3641 - Math::BigInt->new(" \n123456789\n") = 123456789 ok 3642 - Math::BigInt->new(" \n123456789 \n") = 123456789 ok 3643 - Math::BigInt->new(" \n123456789\n ") = 123456789 ok 3644 - Math::BigInt->new(" \n123456789\n1") = 'NaN' ok 3645 - Math::BigInt->new("1 \n123456789\n1") = 'NaN' ok 3646 - Math::BigInt->new("1234567890") = 1234567890 ok 3647 - Math::BigInt->new(" 1234567890") = 1234567890 ok 3648 - Math::BigInt->new("1234567890 ") = 1234567890 ok 3649 - Math::BigInt->new(" 1234567890 ") = 1234567890 ok 3650 - Math::BigInt->new("\n1234567890") = 1234567890 ok 3651 - Math::BigInt->new("1234567890\n") = 1234567890 ok 3652 - Math::BigInt->new("\n1234567890\n") = 1234567890 ok 3653 - Math::BigInt->new(" \n1234567890\n") = 1234567890 ok 3654 - Math::BigInt->new(" \n1234567890 \n") = 1234567890 ok 3655 - Math::BigInt->new(" \n1234567890\n ") = 1234567890 ok 3656 - Math::BigInt->new(" \n1234567890\n1") = 'NaN' ok 3657 - Math::BigInt->new("1 \n1234567890\n1") = 'NaN' ok 3658 - value of ((2^148)+1)/17 ok 3659 - number of digits in ((2^148)+1)/17 ok 3660 - value of 2^127-1 ok 3661 - number of digits in 2^127-1 ok 3662 - number of digits in fraction part of 2^127-1 ok 3663 - number of digits in 1_000_000_000_000 ok 3664 - number of digits in fraction part of 1_000_000_000_000 ok 3665 - 2 <<= 18 with Math::BigInt objects ok 3666 - 2 <<= 18 with Math::BigInt objects ok 3667 - 2 >>= 18 with Math::BigInt objects ok 3668 - 2 >>= 18 with Math::BigInt objects ok 3669 - $x = Math::Foo->new(5); $x = $x - 8; $x = 3 ok 3670 - $x is an object of class "Math::Foo" ok 3671 - $x = Math::Foo->new(5); $x = 8 - $x; $x = -3 ok 3672 - $x is an object of class "Math::Foo" ok 3673 - numify of +Inf ok 3674 - numify of -Inf ok 3675 - numify of NaN ok 3676 - Math::BigInt->new("+inf") = "inf" ok 3677 # skip no 64 bit integer support ok 3678 # skip no 64 bit integer support ok 3679 # skip no 64 bit integer support ok 3680 # skip no 64 bit integer support ok 3681 - is a valid object ok 3682 - $x == 10000000 ok 3683 - is a valid object ok 3684 - $x == 9999999 ok 3685 - is a valid object ok 3686 - $x->numify() = $BASE-1 ok 3687 - $x->numify() = -($BASE-1) ok 3688 - $x->numify()+0 = $BASE+0 ok 3689 - $x->numify() = -$BASE ok 3690 - $x->numify() = -($BASE*$BASE*1+$BASE*1+1)) ok 3691 - $x > $BASE ok 3692 - $x > $BASE ok 3693 - $x->length() = length($MAX) ok 3694 - Math::BigInt->digit(123, 2) = 1 ok 3695 - testing bug in sub ok 3696 - testing bug in sub ok 3697 - testing number with a zero-hole of BASE_LEN_SMALL ok 3698 - see if mul shortcut for small numbers works ok 3699 - -322056000 / -12882240 has remainder 0 ok 3700 - is a valid object ok 3701 - $x->bmod(5033) = 4404 ok 3702 - Math::BigInt->bzero() = 0 ok 3703 - Math::BigInt->bone() = 1 ok 3704 - Math::BigInt->bone("+") = 1 ok 3705 - Math::BigInt->bone("-") = -1 ok 3706 - Math::BigInt->bnan() = "NaN" ok 3707 - Math::BigInt->binf() = "inf" ok 3708 - Math::BigInt->binf("+") = "inf" ok 3709 - Math::BigInt->binf("-") = "-inf" ok 3710 - Math::BigInt->binf("-inf") = "-inf" ok 3711 - Math::BigInt->new(1)->is_one("-") = 0 ok 3712 - Math::BigInt->new(-1)->is_one("-") = 1 ok 3713 - Math::BigInt->new(1)->is_one() = 1 ok 3714 - Math::BigInt->new(-1)->is_one() = 0 ok 3715 - $x = Math::BigInt->new(3); $x -= $x; = 0 ok 3716 - $x = Math::BigInt->new(-3); $x -= $x; = 0 ok 3717 - $x = Math::BigInt->new("NaN"); $x -= $x; $x->is_nan() = 1 ok 3718 - $x = Math::BigInt->new("inf"); $x -= $x; $x->is_nan() = 1 ok 3719 - $x = Math::BigInt->new("-inf"); $x -= $x; $x->is_nan() = 1 ok 3720 - $x = Math::BigInt->new("NaN"); $x += $x; $x->is_nan() = 1 ok 3721 - $x = Math::BigInt->new("inf"); $x += $x; $x->is_inf() = 1 ok 3722 - $x = Math::BigInt->new("-inf"); $x += $x; $x->is_inf("-") = 1 ok 3723 - $x = Math::BigInt->new(3); $x += $x; $x = 6 ok 3724 - $x = Math::BigInt->new(-3); $x += $x; $x = -6 ok 3725 - $x = Math::BigInt->new(3); $x *= $x; $x = 9 ok 3726 - $x = Math::BigInt->new(-3); $x *= $x; $x = 9 ok 3727 - $x = Math::BigInt->new(3); $x /= $x; $x = 1 ok 3728 - $x = Math::BigInt->new(-3); $x /= $x; $x = 1 ok 3729 - $x = Math::BigInt->new(3); $x %= $x; $x = 0 ok 3730 - $x = Math::BigInt->new(-3); $x %= $x; $x = 0 ok t\bigints.t ............ 1..50 ok 1 - ref($x) ok 2 - Math::BigInt::Scalar->_str($x) ok 3 - Math::BigInt::Scalar->_str($y) ok 4 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_add($x, $y) ok 5 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_sub($x, $y) ok 6 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_mul($x, $y)) ok 7 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_div($x, $y) ok 8 - Math::BigInt::Scalar->_str($x) ok 9 - Math::BigInt::Scalar->_str($y) ok 10 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_add($x, $z) ok 11 - Math::BigInt::Scalar->_str($re) ok 12 - Math::BigInt::Scalar->_str($rr) ok 13 - Math::BigInt::Scalar->_is_zero(SCALAR(0x96a574)) ok 14 - Math::BigInt::Scalar->_is_one(SCALAR(0x96a574)) ok 15 - Math::BigInt::Scalar->_is_one(Math::BigInt::Scalar->_one()) ok 16 - Math::BigInt::Scalar->_is_one(Math::BigInt::Scalar->_zero()) ok 17 - Math::BigInt::Scalar->_is_zero(Math::BigInt::Scalar->_zero()) ok 18 - Math::BigInt::Scalar->_is_zero(Math::BigInt::Scalar->_one()) ok 19 - Math::BigInt::Scalar->_is_odd(Math::BigInt::Scalar->_one()) ok 20 - Math::BigInt::Scalar->_is_odd(Math::BigInt::Scalar->_zero()) ok 21 - Math::BigInt::Scalar->_is_even(Math::BigInt::Scalar->_one()) ok 22 - Math::BigInt::Scalar->_is_even(Math::BigInt::Scalar->_zero()) ok 23 - Math::BigInt::Scalar->_digit($x, 0) ok 24 - Math::BigInt::Scalar->_digit($x, 1) ok 25 - Math::BigInt::Scalar->_digit($x, 2) ok 26 - Math::BigInt::Scalar->_digit($x, -1) ok 27 - Math::BigInt::Scalar->_digit($x, -2) ok 28 - Math::BigInt::Scalar->_digit($x, -3) ok 29 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_copy($x)) ok 30 - Math::BigInt::Scalar->_acmp($x, $y) ok 31 - Math::BigInt::Scalar->_acmp($y, $x) ok 32 - Math::BigInt::Scalar->_acmp($x, $x) ok 33 - Math::BigInt::Scalar->_acmp($y, $y) ok 34 - Math::BigInt::Scalar->_str(scalar Math::BigInt::Scalar->_div($x, $y)) ok 35 - Math::BigInt::Scalar->_str($x) ok 36 - Math::BigInt::Scalar->_str($y) ok 37 - Math::BigInt::Scalar->_str($x) ok 38 - Math::BigInt::Scalar->_str($y) ok 39 - ref($x) || "" ok 40 - $x ok 41 - ref($x) || "" ok 42 - $x ok 43 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_or(SCALAR(0xaa02e4), SCALAR(0x3ab8c))) ok 44 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_xor(SCALAR(0xaaf3a4), SCALAR(0xa7dc9c))) ok 45 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_and(SCALAR(0xaa02e4), SCALAR(0x96a974))) ok 46 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_pow(SCALAR(0xaaf3a4), SCALAR(0xaa9d94))) ok 47 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_pow(SCALAR(0xaa02e4), SCALAR(0x3ab8c))) ok 48 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_pow(SCALAR(0xaaf3a4), SCALAR(0xa7dc9c))) ok 49 - Math::BigInt::Scalar->_check($x) ok 50 - Math::BigInt::Scalar->_check(123) ok t\biglog.t ............. 1..73 ok 1 - Math::BigInt->new(2)->blog() ok 2 - Math::BigInt->new(288)->blog() ok 3 - Math::BigInt->new(2000)->blog() ok 4 - Math::BigInt->new(1)->bexp() ok 5 - Math::BigInt->new(2)->bexp() ok 6 - Math::BigInt->new(3)->bexp() ok 7 - Math::BigFloat->new(5)->blog(undef, 71) ok 8 - Math::BigFloat->new(2)->blog(undef, 71) ok 9 - Math::BigFloat->new(11)->blog(undef, 71) ok 10 - Math::BigFloat->new(21)->blog(undef, 71) ok 11 - Math::BigFloat->new(-2)->blog() ok 12 - Math::BigFloat->new(-1)->blog() ok 13 - Math::BigFloat->new(-10)->blog() ok 14 - Math::BigFloat->new(-2, 2)->blog() ok 15 - Math::BigFloat->new(10)->blog() ok 16 - Math::BigFloat->new("0.1")->blog() ok 17 - Math::BigFloat->new("0.01")->blog() ok 18 - Math::BigFloat->new("0.001")->blog() ok 19 - Math::BigFloat->new("0.0001")->blog() ok 20 - Math::BigFloat->new(2)->blog() ok 21 - Math::BigFloat->new(4)->blog() ok 22 - Math::BigFloat->new("0.2")->blog(undef, 10) ok 23 - Math::BigFloat->new("0.3")->blog(undef, 10) ok 24 - Math::BigFloat->new("0.4")->blog(undef, 10) ok 25 - Math::BigFloat->new("0.5")->blog(undef, 10) ok 26 - Math::BigFloat->new("0.6")->blog(undef, 10) ok 27 - Math::BigFloat->new("0.7")->blog(undef, 10) ok 28 - Math::BigFloat->new("0.8")->blog(undef, 10) ok 29 - Math::BigFloat->new("0.9")->blog(undef, 10) ok 30 - Math::BigFloat->new("9")->blog(undef, 10) ok 31 - Math::BigFloat->new("10")->blog(10, 10) ok 32 - Math::BigFloat->new("20")->blog(20, 10) ok 33 - Math::BigFloat->new("100")->blog(100, 10) ok 34 - Math::BigFloat->new("100")->blog(10, 10) ok 35 - Math::BigFloat->new("400")->blog(20, 10) ok 36 - Math::BigFloat->new("4")->blog(2, 10) ok 37 - Math::BigFloat->new("16")->blog(2, 10) ok 38 - Math::BigFloat->new("1.2")->bpow("0.3", 10) ok 39 - Math::BigFloat->new("10")->bpow("0.6", 10) ok 40 - blog(100) ok 41 - 2 ** 32 ok 42 - 3 ** 32 ok 43 - 2 ** 65 ok 44 - blog(777**256, 12345678901234) ok 45 - blog(777**777, 777) ok 46 - Math::BigFloat->new(200)->bpow(0.5, 10) ok 47 - Math::BigFloat->new(20)->bpow(0.5, 10) ok 48 - Math::BigFloat->new(2)->bpow(0.5, 10) ok 49 - Math::BigFloat->new(0.2)->bpow(0.5, 10) ok 50 - Math::BigFloat->new(0.02)->bpow(0.5, 10) ok 51 - Math::BigFloat->new(0.49)->bpow(0.5, undef) ok 52 - Math::BigFloat->new(0.49)->bpow(0.5, 10) ok 53 - Math::BigFloat->new(0.002)->bpow(0.5, 10) ok 54 - Math::BigFloat->new(0.0002)->bpow(0.5, 10) ok 55 - Math::BigFloat->new(0.0049)->bpow(0.5, undef) ok 56 - Math::BigFloat->new(0.0049)->bpow(0.5, 10) ok 57 - Math::BigFloat->new(0.000002)->bpow(0.5, 10) ok 58 - Math::BigFloat->new(0.021)->bpow(0.5, 10) ok 59 - Math::BigFloat->new(1.2)->bpow(0.5, 10) ok 60 - Math::BigFloat->new(1.23)->bpow(0.5, 10) ok 61 - Math::BigFloat->new(12.3)->bpow(0.5, 10) ok 62 - Math::BigFloat->new(9.9)->bpow(0.5, 10) ok 63 - Math::BigFloat->new(9.86902225)->bpow(0.5, 10) ok 64 - Math::BigFloat->new(9.86902225)->bpow(0.5, undef) ok 65 - Math::BigFloat->new(0.2)->bpow(0.41, 10) ok 66 - Math::BigFloat->new("0.01")->bpow("28.4", 40)->bsstr() ok 67 - bexp(1) ok 68 - bexp(2) ok 69 - bexp(12.5) ok 70 - Math::BigFloat->new(1)->bexp(100) ok 71 - Math::BigFloat->new("12.5")->bexp(91) ok 72 - Math::BigFloat->new("-118.5")->bexp(20)->bsstr() ok 73 - Math::BigFloat->new("-118.5")->bexp(20)->bsstr() ok t\bigroot.t ............ 1..8 ok 1 - Try: Math::BigFloat->new(2)->bpow(120)->broot(8, undef) == 32768 ok 2 - Try: Math::BigInt->new(2)->bpow(120)->broot(8, undef) == 32768 ok 3 - Try: Math::BigFloat->new(2)->bpow(60)->broot(8, undef) == 181.0193359837561662466161566988413540569 ok 4 - Try: Math::BigInt->new(2)->bpow(60)->broot(8, undef) == 181 ok 5 - Try: Math::BigFloat->new(2)->bpow(60)->broot(9, undef) == 101.5936673259647663841091609134277286651 ok 6 - Try: Math::BigInt->new(2)->bpow(60)->broot(9, undef) == 101 ok 7 - Try: Math::BigFloat->new(2)->bpow(60)->broot(17, undef) == 11.54672461623965153271017217302844672562 ok 8 - Try: Math::BigInt->new(2)->bpow(60)->broot(17, undef) == 11 ok t\calling.t ............ 1..161 ok 1 - Math::BigInt->is_zero("1"); ok 2 - Math::BigFloat->is_zero("1"); ok 3 - Math::BigInt::Test->is_zero("1"); ok 4 - Math::BigFloat::Test->is_zero("1"); ok 5 - Math::BigInt->is_zero("0"); ok 6 - Math::BigFloat->is_zero("0"); ok 7 - Math::BigInt::Test->is_zero("0"); ok 8 - Math::BigFloat::Test->is_zero("0"); ok 9 - Math::BigInt->is_one("1"); ok 10 - Math::BigFloat->is_one("1"); ok 11 - Math::BigInt::Test->is_one("1"); ok 12 - Math::BigFloat::Test->is_one("1"); ok 13 - Math::BigInt->is_one("0"); ok 14 - Math::BigFloat->is_one("0"); ok 15 - Math::BigInt::Test->is_one("0"); ok 16 - Math::BigFloat::Test->is_one("0"); ok 17 - Math::BigInt->is_positive("1"); ok 18 - Math::BigFloat->is_positive("1"); ok 19 - Math::BigInt::Test->is_positive("1"); ok 20 - Math::BigFloat::Test->is_positive("1"); ok 21 - Math::BigInt->is_positive("-1"); ok 22 - Math::BigFloat->is_positive("-1"); ok 23 - Math::BigInt::Test->is_positive("-1"); ok 24 - Math::BigFloat::Test->is_positive("-1"); ok 25 - Math::BigInt->is_negative("1"); ok 26 - Math::BigFloat->is_negative("1"); ok 27 - Math::BigInt::Test->is_negative("1"); ok 28 - Math::BigFloat::Test->is_negative("1"); ok 29 - Math::BigInt->is_negative("-1"); ok 30 - Math::BigFloat->is_negative("-1"); ok 31 - Math::BigInt::Test->is_negative("-1"); ok 32 - Math::BigFloat::Test->is_negative("-1"); ok 33 - Math::BigInt->is_nan("abc"); ok 34 - Math::BigFloat->is_nan("abc"); ok 35 - Math::BigInt::Test->is_nan("abc"); ok 36 - Math::BigFloat::Test->is_nan("abc"); ok 37 - Math::BigInt->is_nan("1"); ok 38 - Math::BigFloat->is_nan("1"); ok 39 - Math::BigInt::Test->is_nan("1"); ok 40 - Math::BigFloat::Test->is_nan("1"); ok 41 - Math::BigInt->is_inf("inf"); ok 42 - Math::BigFloat->is_inf("inf"); ok 43 - Math::BigInt::Test->is_inf("inf"); ok 44 - Math::BigFloat::Test->is_inf("inf"); ok 45 - Math::BigInt->is_inf("0"); ok 46 - Math::BigFloat->is_inf("0"); ok 47 - Math::BigInt::Test->is_inf("0"); ok 48 - Math::BigFloat::Test->is_inf("0"); ok 49 - Math::BigInt->bstr("5"); ok 50 - Math::BigFloat->bstr("5"); ok 51 - Math::BigInt::Test->bstr("5"); ok 52 - Math::BigFloat::Test->bstr("5"); ok 53 - Math::BigInt->bstr("10"); ok 54 - Math::BigFloat->bstr("10"); ok 55 - Math::BigInt::Test->bstr("10"); ok 56 - Math::BigFloat::Test->bstr("10"); ok 57 - Math::BigInt->bstr("-10"); ok 58 - Math::BigFloat->bstr("-10"); ok 59 - Math::BigInt::Test->bstr("-10"); ok 60 - Math::BigFloat::Test->bstr("-10"); ok 61 - Math::BigInt->bstr("abc"); ok 62 - Math::BigFloat->bstr("abc"); ok 63 - Math::BigInt::Test->bstr("abc"); ok 64 - Math::BigFloat::Test->bstr("abc"); ok 65 - Math::BigInt->bstr("+inf"); ok 66 - Math::BigFloat->bstr("+inf"); ok 67 - Math::BigInt::Test->bstr("+inf"); ok 68 - Math::BigFloat::Test->bstr("+inf"); ok 69 - Math::BigInt->bstr("-inf"); ok 70 - Math::BigFloat->bstr("-inf"); ok 71 - Math::BigInt::Test->bstr("-inf"); ok 72 - Math::BigFloat::Test->bstr("-inf"); ok 73 - Math::BigInt->bsstr("1"); ok 74 - Math::BigFloat->bsstr("1"); ok 75 - Math::BigInt::Test->bsstr("1"); ok 76 - Math::BigFloat::Test->bsstr("1"); ok 77 - Math::BigInt->bsstr("0"); ok 78 - Math::BigFloat->bsstr("0"); ok 79 - Math::BigInt::Test->bsstr("0"); ok 80 - Math::BigFloat::Test->bsstr("0"); ok 81 - Math::BigInt->bsstr("2"); ok 82 - Math::BigFloat->bsstr("2"); ok 83 - Math::BigInt::Test->bsstr("2"); ok 84 - Math::BigFloat::Test->bsstr("2"); ok 85 - Math::BigInt->bsstr("200"); ok 86 - Math::BigFloat->bsstr("200"); ok 87 - Math::BigInt::Test->bsstr("200"); ok 88 - Math::BigFloat::Test->bsstr("200"); ok 89 - Math::BigInt->bsstr("-5"); ok 90 - Math::BigFloat->bsstr("-5"); ok 91 - Math::BigInt::Test->bsstr("-5"); ok 92 - Math::BigFloat::Test->bsstr("-5"); ok 93 - Math::BigInt->bsstr("-100"); ok 94 - Math::BigFloat->bsstr("-100"); ok 95 - Math::BigInt::Test->bsstr("-100"); ok 96 - Math::BigFloat::Test->bsstr("-100"); ok 97 - Math::BigInt->bsstr("abc"); ok 98 - Math::BigFloat->bsstr("abc"); ok 99 - Math::BigInt::Test->bsstr("abc"); ok 100 - Math::BigFloat::Test->bsstr("abc"); ok 101 - Math::BigInt->bsstr("+inf"); ok 102 - Math::BigFloat->bsstr("+inf"); ok 103 - Math::BigInt::Test->bsstr("+inf"); ok 104 - Math::BigFloat::Test->bsstr("+inf"); ok 105 - Math::BigInt->babs("-1"); ok 106 - Math::BigFloat->babs("-1"); ok 107 - Math::BigInt::Test->babs("-1"); ok 108 - Math::BigFloat::Test->babs("-1"); ok 109 - Math::BigInt->babs("1"); ok 110 - Math::BigFloat->babs("1"); ok 111 - Math::BigInt::Test->babs("1"); ok 112 - Math::BigFloat::Test->babs("1"); ok 113 - Math::BigInt->bnot("-2"); ok 114 - Math::BigFloat->bnot("-2"); ok 115 - Math::BigInt::Test->bnot("-2"); ok 116 - Math::BigFloat::Test->bnot("-2"); ok 117 - Math::BigInt->bnot("1"); ok 118 - Math::BigFloat->bnot("1"); ok 119 - Math::BigInt::Test->bnot("1"); ok 120 - Math::BigFloat::Test->bnot("1"); ok 121 - Math::BigInt->bzero(); ok 122 - Math::BigFloat->bzero(); ok 123 - Math::BigInt::Test->bzero(); ok 124 - Math::BigFloat::Test->bzero(); ok 125 - Math::BigInt->bnan(); ok 126 - Math::BigFloat->bnan(); ok 127 - Math::BigInt::Test->bnan(); ok 128 - Math::BigFloat::Test->bnan(); ok 129 - Math::BigInt->bnan("abc"); ok 130 - Math::BigFloat->bnan("abc"); ok 131 - Math::BigInt::Test->bnan("abc"); ok 132 - Math::BigFloat::Test->bnan("abc"); ok 133 - Math::BigInt->bone(); ok 134 - Math::BigFloat->bone(); ok 135 - Math::BigInt::Test->bone(); ok 136 - Math::BigFloat::Test->bone(); ok 137 - Math::BigInt->bone("+"); ok 138 - Math::BigFloat->bone("+"); ok 139 - Math::BigInt::Test->bone("+"); ok 140 - Math::BigFloat::Test->bone("+"); ok 141 - Math::BigInt->bone("-"); ok 142 - Math::BigFloat->bone("-"); ok 143 - Math::BigInt::Test->bone("-"); ok 144 - Math::BigFloat::Test->bone("-"); ok 145 - Math::BigInt->binf(); ok 146 - Math::BigFloat->binf(); ok 147 - Math::BigInt::Test->binf(); ok 148 - Math::BigFloat::Test->binf(); ok 149 - Math::BigInt->binf("+"); ok 150 - Math::BigFloat->binf("+"); ok 151 - Math::BigInt::Test->binf("+"); ok 152 - Math::BigFloat::Test->binf("+"); ok 153 - Math::BigInt->binf("-"); ok 154 - Math::BigFloat->binf("-"); ok 155 - Math::BigInt::Test->binf("-"); ok 156 - Math::BigFloat::Test->binf("-"); ok 157 - use Math::BigInt (1.9997151); $x = $class->new(123); $x = "$x"; ok 158 - use Math::BigInt (1.999715, "try", "foo, bar, "); Math::BigInt->config()->{lib}; ok 159 - use Math::BigInt (1.999715, "bgcd", ":constant"); $x = 2**150; bgcd($x); $x = "$x"; ok 160 - use Math::BigInt (1.999715, "lib", "Scalar"); $x = 2**10; $x = "$x"; ok 161 - use Math::BigInt (1.999715, "lib", "Math::BigInt::Scalar"); $x = 2**10; $x = "$x"; ok t\config.t ............. 1..55 ok 1 - Math::BigInt->can('config') ok 2 - ref() of output from $mbi->config() ok 3 - lib ok 4 - lib_version ok 5 - class ok 6 - upgrade ok 7 - div_Scale ok 8 - precision ok 9 - accuracy ok 10 - round_mode ok 11 - trap_nan ok 12 - trap_inf ok 13 - config("lib") ok 14 - can set "trap_nan" via hash ref ok 15 - Math::BigFloat->can('config') ok 16 - ref() of output from $mbf->config() ok 17 - lib ok 18 - with ok 19 - lib_version ok 20 - class ok 21 - upgrade ok 22 - div_Scale ok 23 - precision ok 24 - accuracy ok 25 - round_mode ok 26 - trap_nan ok 27 - trap_inf ok 28 - config("lib") ok 29 - can set "trap_nan" via hash ref ok 30 - trap_inf = 1 ok 31 - trap_inf ne $c->{trap_inf} ok 32 - trap_inf = 1 ok 33 - downgrade = Math::BigInt::SomeClass ok 34 - downgrade ne $c->{downgrade} ok 35 - downgrade = Math::BigInt::SomeClass ok 36 - div_scale = 100 ok 37 - div_scale ne $c->{div_scale} ok 38 - div_scale = 100 ok 39 - trap_nan = 1 ok 40 - trap_nan ne $c->{trap_nan} ok 41 - trap_nan = 1 ok 42 - round_mode = zero ok 43 - round_mode ne $c->{round_mode} ok 44 - round_mode = zero ok 45 - upgrade = Math::BigInt::SomeClass ok 46 - upgrade ne $c->{upgrade} ok 47 - upgrade = Math::BigInt::SomeClass ok 48 - precision = 3 ok 49 - precision ne $c->{precision} ok 50 - precision = 3 ok 51 - accuracy = 2 ok 52 - accuracy ne $c->{accuracy} ok 53 - accuracy = 2 ok 54 - Passing invalid key to Math::BigInt->config() causes an error. ok 55 - Passing invalid key to Math::BigFloat->config() causes an error. ok t\const_mbf.t .......... 1..2 ok 1 - 1.0 / 3.0 = 0.3333333333333333333333333333333333333333 ok 2 - 2 ** 2 is a scalar ok t\constant.t ........... 1..7 ok 1 - 2 ** 255 ok 2 - hexadecimal constant 0x123456789012345678901234567890 ok 3 - binary constant 0b01010100011001010110110001110011010010010110000101101101 ok 4 - 1.0 / 3.0 = 0.3333333333333333333333333333333333333333 ok 5 - Math::BigFloat->import(qw/:constant/); ok 6 - Math::BigFloat->import(qw/:constant upgrade Math::BigRat/); ok 7 - Math::BigFloat->import(qw/upgrade Math::BigRat :constant/); ok t\downgrade.t .......... 1..15 ok 1 - Math::BigFloat->downgrade() ok 2 - Math::BigFloat->upgrade() ok 3 - ref(Math::BigFloat->new("inf")) ok 4 - ref(Math::BigFloat->new("-inf")) ok 5 - ref(Math::BigFloat->new("NaN")) ok 6 - ref(Math::BigFloat->new("0")) ok 7 - ref(Math::BigFloat->new("1")) ok 8 - ref(Math::BigFloat->new("10")) ok 9 - ref(Math::BigFloat->new("-10")) ok 10 - ref(Math::BigFloat->new("-10.0E1")) ok 11 - Math::BigFloat->new("0.2E0") ok 12 - Math::BigFloat->new("0.2E1") ok 13 - Math::BigFloat->new("0.2E2") ok 14 - Math::BigFloat->upgrade() || "" ok 15 - Math::BigFloat->bpow("2", "0.5") ok t\from_hex-mbf.t ....... 1..27 ok 1 - use Math::BigFloat; # Subtest: $x = Math::BigFloat -> from_hex("0x1p+0"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 2 - $x = Math::BigFloat -> from_hex("0x1p+0"); # Subtest: $x = Math::BigFloat -> from_hex("0x.8p+1"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 3 - $x = Math::BigFloat -> from_hex("0x.8p+1"); # Subtest: $x = Math::BigFloat -> from_hex("0x.4p+2"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 4 - $x = Math::BigFloat -> from_hex("0x.4p+2"); # Subtest: $x = Math::BigFloat -> from_hex("0x.2p+3"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 5 - $x = Math::BigFloat -> from_hex("0x.2p+3"); # Subtest: $x = Math::BigFloat -> from_hex("0x.1p+4"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 6 - $x = Math::BigFloat -> from_hex("0x.1p+4"); # Subtest: $x = Math::BigFloat -> from_hex("0x2p-1"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 7 - $x = Math::BigFloat -> from_hex("0x2p-1"); # Subtest: $x = Math::BigFloat -> from_hex("0x4p-2"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 8 - $x = Math::BigFloat -> from_hex("0x4p-2"); # Subtest: $x = Math::BigFloat -> from_hex("0x8p-3"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 9 - $x = Math::BigFloat -> from_hex("0x8p-3"); # Subtest: $x = Math::BigFloat -> from_hex("-0x1p+0"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 10 - $x = Math::BigFloat -> from_hex("-0x1p+0"); # Subtest: $x = Math::BigFloat -> from_hex("0x0p+0"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 11 - $x = Math::BigFloat -> from_hex("0x0p+0"); # Subtest: $x = Math::BigFloat -> from_hex("0x0p+7"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 12 - $x = Math::BigFloat -> from_hex("0x0p+7"); # Subtest: $x = Math::BigFloat -> from_hex("0x0p-7"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 13 - $x = Math::BigFloat -> from_hex("0x0p-7"); # Subtest: $x = Math::BigFloat -> from_hex("0x0.p+0"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 14 - $x = Math::BigFloat -> from_hex("0x0.p+0"); # Subtest: $x = Math::BigFloat -> from_hex("0x.0p+0"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 15 - $x = Math::BigFloat -> from_hex("0x.0p+0"); # Subtest: $x = Math::BigFloat -> from_hex("0x0.0p+0"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 16 - $x = Math::BigFloat -> from_hex("0x0.0p+0"); # Subtest: $x = Math::BigFloat -> from_hex("0xcafe"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 17 - $x = Math::BigFloat -> from_hex("0xcafe"); # Subtest: $x = Math::BigFloat -> from_hex("xcafe"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 18 - $x = Math::BigFloat -> from_hex("xcafe"); # Subtest: $x = Math::BigFloat -> from_hex("cafe"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 19 - $x = Math::BigFloat -> from_hex("cafe"); # Subtest: $x = Math::BigFloat -> from_hex("0x1.9p+3"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 20 - $x = Math::BigFloat -> from_hex("0x1.9p+3"); # Subtest: $x = Math::BigFloat -> from_hex("0x12.34p-1"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 21 - $x = Math::BigFloat -> from_hex("0x12.34p-1"); # Subtest: $x = Math::BigFloat -> from_hex("-0x.789abcdefp+32"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 22 - $x = Math::BigFloat -> from_hex("-0x.789abcdefp+32"); # Subtest: $x = Math::BigFloat -> from_hex("0x12.3456789ap+31"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 23 - $x = Math::BigFloat -> from_hex("0x12.3456789ap+31"); # Subtest: $x = Math::BigFloat -> from_hex("NaN"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 24 - $x = Math::BigFloat -> from_hex("NaN"); # Subtest: $x = Math::BigFloat -> from_hex("+inf"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 25 - $x = Math::BigFloat -> from_hex("+inf"); # Subtest: $x = Math::BigFloat -> from_hex("-inf"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 26 - $x = Math::BigFloat -> from_hex("-inf"); # Subtest: $x = Math::BigFloat -> from_hex("0x.p+0"); ok 1 - output arg is a Math::BigFloat 1..2 ok 2 - output arg has the right value ok 27 - $x = Math::BigFloat -> from_hex("0x.p+0"); ok t\inf_nan.t ............ 1..2052 ok 1 - x Math::BigInt -inf + -inf ok 2 - r Math::BigInt -inf + -inf ok 3 - x Math::BigInt::Subclass -inf + -inf ok 4 - r Math::BigInt::Subclass -inf + -inf ok 5 - x Math::BigFloat -inf + -inf ok 6 - r Math::BigFloat -inf + -inf ok 7 - x Math::BigFloat::Subclass -inf + -inf ok 8 - r Math::BigFloat::Subclass -inf + -inf ok 9 - x Math::BigInt -1 + -inf ok 10 - r Math::BigInt -1 + -inf ok 11 - x Math::BigInt::Subclass -1 + -inf ok 12 - r Math::BigInt::Subclass -1 + -inf ok 13 - x Math::BigFloat -1 + -inf ok 14 - r Math::BigFloat -1 + -inf ok 15 - x Math::BigFloat::Subclass -1 + -inf ok 16 - r Math::BigFloat::Subclass -1 + -inf ok 17 - x Math::BigInt -0 + -inf ok 18 - r Math::BigInt -0 + -inf ok 19 - x Math::BigInt::Subclass -0 + -inf ok 20 - r Math::BigInt::Subclass -0 + -inf ok 21 - x Math::BigFloat -0 + -inf ok 22 - r Math::BigFloat -0 + -inf ok 23 - x Math::BigFloat::Subclass -0 + -inf ok 24 - r Math::BigFloat::Subclass -0 + -inf ok 25 - x Math::BigInt 0 + -inf ok 26 - r Math::BigInt 0 + -inf ok 27 - x Math::BigInt::Subclass 0 + -inf ok 28 - r Math::BigInt::Subclass 0 + -inf ok 29 - x Math::BigFloat 0 + -inf ok 30 - r Math::BigFloat 0 + -inf ok 31 - x Math::BigFloat::Subclass 0 + -inf ok 32 - r Math::BigFloat::Subclass 0 + -inf ok 33 - x Math::BigInt 1 + -inf ok 34 - r Math::BigInt 1 + -inf ok 35 - x Math::BigInt::Subclass 1 + -inf ok 36 - r Math::BigInt::Subclass 1 + -inf ok 37 - x Math::BigFloat 1 + -inf ok 38 - r Math::BigFloat 1 + -inf ok 39 - x Math::BigFloat::Subclass 1 + -inf ok 40 - r Math::BigFloat::Subclass 1 + -inf ok 41 - x Math::BigInt inf + -inf ok 42 - r Math::BigInt inf + -inf ok 43 - x Math::BigInt::Subclass inf + -inf ok 44 - r Math::BigInt::Subclass inf + -inf ok 45 - x Math::BigFloat inf + -inf ok 46 - r Math::BigFloat inf + -inf ok 47 - x Math::BigFloat::Subclass inf + -inf ok 48 - r Math::BigFloat::Subclass inf + -inf ok 49 - x Math::BigInt NaN + -inf ok 50 - r Math::BigInt NaN + -inf ok 51 - x Math::BigInt::Subclass NaN + -inf ok 52 - r Math::BigInt::Subclass NaN + -inf ok 53 - x Math::BigFloat NaN + -inf ok 54 - r Math::BigFloat NaN + -inf ok 55 - x Math::BigFloat::Subclass NaN + -inf ok 56 - r Math::BigFloat::Subclass NaN + -inf ok 57 - x Math::BigInt -inf + -1 ok 58 - r Math::BigInt -inf + -1 ok 59 - x Math::BigInt::Subclass -inf + -1 ok 60 - r Math::BigInt::Subclass -inf + -1 ok 61 - x Math::BigFloat -inf + -1 ok 62 - r Math::BigFloat -inf + -1 ok 63 - x Math::BigFloat::Subclass -inf + -1 ok 64 - r Math::BigFloat::Subclass -inf + -1 ok 65 - x Math::BigInt -1 + -1 ok 66 - r Math::BigInt -1 + -1 ok 67 - x Math::BigInt::Subclass -1 + -1 ok 68 - r Math::BigInt::Subclass -1 + -1 ok 69 - x Math::BigFloat -1 + -1 ok 70 - r Math::BigFloat -1 + -1 ok 71 - x Math::BigFloat::Subclass -1 + -1 ok 72 - r Math::BigFloat::Subclass -1 + -1 ok 73 - x Math::BigInt -0 + -1 ok 74 - r Math::BigInt -0 + -1 ok 75 - x Math::BigInt::Subclass -0 + -1 ok 76 - r Math::BigInt::Subclass -0 + -1 ok 77 - x Math::BigFloat -0 + -1 ok 78 - r Math::BigFloat -0 + -1 ok 79 - x Math::BigFloat::Subclass -0 + -1 ok 80 - r Math::BigFloat::Subclass -0 + -1 ok 81 - x Math::BigInt 0 + -1 ok 82 - r Math::BigInt 0 + -1 ok 83 - x Math::BigInt::Subclass 0 + -1 ok 84 - r Math::BigInt::Subclass 0 + -1 ok 85 - x Math::BigFloat 0 + -1 ok 86 - r Math::BigFloat 0 + -1 ok 87 - x Math::BigFloat::Subclass 0 + -1 ok 88 - r Math::BigFloat::Subclass 0 + -1 ok 89 - x Math::BigInt 1 + -1 ok 90 - r Math::BigInt 1 + -1 ok 91 - x Math::BigInt::Subclass 1 + -1 ok 92 - r Math::BigInt::Subclass 1 + -1 ok 93 - x Math::BigFloat 1 + -1 ok 94 - r Math::BigFloat 1 + -1 ok 95 - x Math::BigFloat::Subclass 1 + -1 ok 96 - r Math::BigFloat::Subclass 1 + -1 ok 97 - x Math::BigInt inf + -1 ok 98 - r Math::BigInt inf + -1 ok 99 - x Math::BigInt::Subclass inf + -1 ok 100 - r Math::BigInt::Subclass inf + -1 ok 101 - x Math::BigFloat inf + -1 ok 102 - r Math::BigFloat inf + -1 ok 103 - x Math::BigFloat::Subclass inf + -1 ok 104 - r Math::BigFloat::Subclass inf + -1 ok 105 - x Math::BigInt NaN + -1 ok 106 - r Math::BigInt NaN + -1 ok 107 - x Math::BigInt::Subclass NaN + -1 ok 108 - r Math::BigInt::Subclass NaN + -1 ok 109 - x Math::BigFloat NaN + -1 ok 110 - r Math::BigFloat NaN + -1 ok 111 - x Math::BigFloat::Subclass NaN + -1 ok 112 - r Math::BigFloat::Subclass NaN + -1 ok 113 - x Math::BigInt -inf + 0 ok 114 - r Math::BigInt -inf + 0 ok 115 - x Math::BigInt::Subclass -inf + 0 ok 116 - r Math::BigInt::Subclass -inf + 0 ok 117 - x Math::BigFloat -inf + 0 ok 118 - r Math::BigFloat -inf + 0 ok 119 - x Math::BigFloat::Subclass -inf + 0 ok 120 - r Math::BigFloat::Subclass -inf + 0 ok 121 - x Math::BigInt -1 + 0 ok 122 - r Math::BigInt -1 + 0 ok 123 - x Math::BigInt::Subclass -1 + 0 ok 124 - r Math::BigInt::Subclass -1 + 0 ok 125 - x Math::BigFloat -1 + 0 ok 126 - r Math::BigFloat -1 + 0 ok 127 - x Math::BigFloat::Subclass -1 + 0 ok 128 - r Math::BigFloat::Subclass -1 + 0 ok 129 - x Math::BigInt -0 + 0 ok 130 - r Math::BigInt -0 + 0 ok 131 - x Math::BigInt::Subclass -0 + 0 ok 132 - r Math::BigInt::Subclass -0 + 0 ok 133 - x Math::BigFloat -0 + 0 ok 134 - r Math::BigFloat -0 + 0 ok 135 - x Math::BigFloat::Subclass -0 + 0 ok 136 - r Math::BigFloat::Subclass -0 + 0 ok 137 - x Math::BigInt 0 + 0 ok 138 - r Math::BigInt 0 + 0 ok 139 - x Math::BigInt::Subclass 0 + 0 ok 140 - r Math::BigInt::Subclass 0 + 0 ok 141 - x Math::BigFloat 0 + 0 ok 142 - r Math::BigFloat 0 + 0 ok 143 - x Math::BigFloat::Subclass 0 + 0 ok 144 - r Math::BigFloat::Subclass 0 + 0 ok 145 - x Math::BigInt 1 + 0 ok 146 - r Math::BigInt 1 + 0 ok 147 - x Math::BigInt::Subclass 1 + 0 ok 148 - r Math::BigInt::Subclass 1 + 0 ok 149 - x Math::BigFloat 1 + 0 ok 150 - r Math::BigFloat 1 + 0 ok 151 - x Math::BigFloat::Subclass 1 + 0 ok 152 - r Math::BigFloat::Subclass 1 + 0 ok 153 - x Math::BigInt inf + 0 ok 154 - r Math::BigInt inf + 0 ok 155 - x Math::BigInt::Subclass inf + 0 ok 156 - r Math::BigInt::Subclass inf + 0 ok 157 - x Math::BigFloat inf + 0 ok 158 - r Math::BigFloat inf + 0 ok 159 - x Math::BigFloat::Subclass inf + 0 ok 160 - r Math::BigFloat::Subclass inf + 0 ok 161 - x Math::BigInt NaN + 0 ok 162 - r Math::BigInt NaN + 0 ok 163 - x Math::BigInt::Subclass NaN + 0 ok 164 - r Math::BigInt::Subclass NaN + 0 ok 165 - x Math::BigFloat NaN + 0 ok 166 - r Math::BigFloat NaN + 0 ok 167 - x Math::BigFloat::Subclass NaN + 0 ok 168 - r Math::BigFloat::Subclass NaN + 0 ok 169 - x Math::BigInt -inf + 1 ok 170 - r Math::BigInt -inf + 1 ok 171 - x Math::BigInt::Subclass -inf + 1 ok 172 - r Math::BigInt::Subclass -inf + 1 ok 173 - x Math::BigFloat -inf + 1 ok 174 - r Math::BigFloat -inf + 1 ok 175 - x Math::BigFloat::Subclass -inf + 1 ok 176 - r Math::BigFloat::Subclass -inf + 1 ok 177 - x Math::BigInt -1 + 1 ok 178 - r Math::BigInt -1 + 1 ok 179 - x Math::BigInt::Subclass -1 + 1 ok 180 - r Math::BigInt::Subclass -1 + 1 ok 181 - x Math::BigFloat -1 + 1 ok 182 - r Math::BigFloat -1 + 1 ok 183 - x Math::BigFloat::Subclass -1 + 1 ok 184 - r Math::BigFloat::Subclass -1 + 1 ok 185 - x Math::BigInt -0 + 1 ok 186 - r Math::BigInt -0 + 1 ok 187 - x Math::BigInt::Subclass -0 + 1 ok 188 - r Math::BigInt::Subclass -0 + 1 ok 189 - x Math::BigFloat -0 + 1 ok 190 - r Math::BigFloat -0 + 1 ok 191 - x Math::BigFloat::Subclass -0 + 1 ok 192 - r Math::BigFloat::Subclass -0 + 1 ok 193 - x Math::BigInt 0 + 1 ok 194 - r Math::BigInt 0 + 1 ok 195 - x Math::BigInt::Subclass 0 + 1 ok 196 - r Math::BigInt::Subclass 0 + 1 ok 197 - x Math::BigFloat 0 + 1 ok 198 - r Math::BigFloat 0 + 1 ok 199 - x Math::BigFloat::Subclass 0 + 1 ok 200 - r Math::BigFloat::Subclass 0 + 1 ok 201 - x Math::BigInt 1 + 1 ok 202 - r Math::BigInt 1 + 1 ok 203 - x Math::BigInt::Subclass 1 + 1 ok 204 - r Math::BigInt::Subclass 1 + 1 ok 205 - x Math::BigFloat 1 + 1 ok 206 - r Math::BigFloat 1 + 1 ok 207 - x Math::BigFloat::Subclass 1 + 1 ok 208 - r Math::BigFloat::Subclass 1 + 1 ok 209 - x Math::BigInt inf + 1 ok 210 - r Math::BigInt inf + 1 ok 211 - x Math::BigInt::Subclass inf + 1 ok 212 - r Math::BigInt::Subclass inf + 1 ok 213 - x Math::BigFloat inf + 1 ok 214 - r Math::BigFloat inf + 1 ok 215 - x Math::BigFloat::Subclass inf + 1 ok 216 - r Math::BigFloat::Subclass inf + 1 ok 217 - x Math::BigInt NaN + 1 ok 218 - r Math::BigInt NaN + 1 ok 219 - x Math::BigInt::Subclass NaN + 1 ok 220 - r Math::BigInt::Subclass NaN + 1 ok 221 - x Math::BigFloat NaN + 1 ok 222 - r Math::BigFloat NaN + 1 ok 223 - x Math::BigFloat::Subclass NaN + 1 ok 224 - r Math::BigFloat::Subclass NaN + 1 ok 225 - x Math::BigInt -inf + inf ok 226 - r Math::BigInt -inf + inf ok 227 - x Math::BigInt::Subclass -inf + inf ok 228 - r Math::BigInt::Subclass -inf + inf ok 229 - x Math::BigFloat -inf + inf ok 230 - r Math::BigFloat -inf + inf ok 231 - x Math::BigFloat::Subclass -inf + inf ok 232 - r Math::BigFloat::Subclass -inf + inf ok 233 - x Math::BigInt -1 + inf ok 234 - r Math::BigInt -1 + inf ok 235 - x Math::BigInt::Subclass -1 + inf ok 236 - r Math::BigInt::Subclass -1 + inf ok 237 - x Math::BigFloat -1 + inf ok 238 - r Math::BigFloat -1 + inf ok 239 - x Math::BigFloat::Subclass -1 + inf ok 240 - r Math::BigFloat::Subclass -1 + inf ok 241 - x Math::BigInt -0 + inf ok 242 - r Math::BigInt -0 + inf ok 243 - x Math::BigInt::Subclass -0 + inf ok 244 - r Math::BigInt::Subclass -0 + inf ok 245 - x Math::BigFloat -0 + inf ok 246 - r Math::BigFloat -0 + inf ok 247 - x Math::BigFloat::Subclass -0 + inf ok 248 - r Math::BigFloat::Subclass -0 + inf ok 249 - x Math::BigInt 0 + inf ok 250 - r Math::BigInt 0 + inf ok 251 - x Math::BigInt::Subclass 0 + inf ok 252 - r Math::BigInt::Subclass 0 + inf ok 253 - x Math::BigFloat 0 + inf ok 254 - r Math::BigFloat 0 + inf ok 255 - x Math::BigFloat::Subclass 0 + inf ok 256 - r Math::BigFloat::Subclass 0 + inf ok 257 - x Math::BigInt 1 + inf ok 258 - r Math::BigInt 1 + inf ok 259 - x Math::BigInt::Subclass 1 + inf ok 260 - r Math::BigInt::Subclass 1 + inf ok 261 - x Math::BigFloat 1 + inf ok 262 - r Math::BigFloat 1 + inf ok 263 - x Math::BigFloat::Subclass 1 + inf ok 264 - r Math::BigFloat::Subclass 1 + inf ok 265 - x Math::BigInt inf + inf ok 266 - r Math::BigInt inf + inf ok 267 - x Math::BigInt::Subclass inf + inf ok 268 - r Math::BigInt::Subclass inf + inf ok 269 - x Math::BigFloat inf + inf ok 270 - r Math::BigFloat inf + inf ok 271 - x Math::BigFloat::Subclass inf + inf ok 272 - r Math::BigFloat::Subclass inf + inf ok 273 - x Math::BigInt NaN + inf ok 274 - r Math::BigInt NaN + inf ok 275 - x Math::BigInt::Subclass NaN + inf ok 276 - r Math::BigInt::Subclass NaN + inf ok 277 - x Math::BigFloat NaN + inf ok 278 - r Math::BigFloat NaN + inf ok 279 - x Math::BigFloat::Subclass NaN + inf ok 280 - r Math::BigFloat::Subclass NaN + inf ok 281 - x Math::BigInt -inf + NaN ok 282 - r Math::BigInt -inf + NaN ok 283 - x Math::BigInt::Subclass -inf + NaN ok 284 - r Math::BigInt::Subclass -inf + NaN ok 285 - x Math::BigFloat -inf + NaN ok 286 - r Math::BigFloat -inf + NaN ok 287 - x Math::BigFloat::Subclass -inf + NaN ok 288 - r Math::BigFloat::Subclass -inf + NaN ok 289 - x Math::BigInt -1 + NaN ok 290 - r Math::BigInt -1 + NaN ok 291 - x Math::BigInt::Subclass -1 + NaN ok 292 - r Math::BigInt::Subclass -1 + NaN ok 293 - x Math::BigFloat -1 + NaN ok 294 - r Math::BigFloat -1 + NaN ok 295 - x Math::BigFloat::Subclass -1 + NaN ok 296 - r Math::BigFloat::Subclass -1 + NaN ok 297 - x Math::BigInt -0 + NaN ok 298 - r Math::BigInt -0 + NaN ok 299 - x Math::BigInt::Subclass -0 + NaN ok 300 - r Math::BigInt::Subclass -0 + NaN ok 301 - x Math::BigFloat -0 + NaN ok 302 - r Math::BigFloat -0 + NaN ok 303 - x Math::BigFloat::Subclass -0 + NaN ok 304 - r Math::BigFloat::Subclass -0 + NaN ok 305 - x Math::BigInt 0 + NaN ok 306 - r Math::BigInt 0 + NaN ok 307 - x Math::BigInt::Subclass 0 + NaN ok 308 - r Math::BigInt::Subclass 0 + NaN ok 309 - x Math::BigFloat 0 + NaN ok 310 - r Math::BigFloat 0 + NaN ok 311 - x Math::BigFloat::Subclass 0 + NaN ok 312 - r Math::BigFloat::Subclass 0 + NaN ok 313 - x Math::BigInt 1 + NaN ok 314 - r Math::BigInt 1 + NaN ok 315 - x Math::BigInt::Subclass 1 + NaN ok 316 - r Math::BigInt::Subclass 1 + NaN ok 317 - x Math::BigFloat 1 + NaN ok 318 - r Math::BigFloat 1 + NaN ok 319 - x Math::BigFloat::Subclass 1 + NaN ok 320 - r Math::BigFloat::Subclass 1 + NaN ok 321 - x Math::BigInt inf + NaN ok 322 - r Math::BigInt inf + NaN ok 323 - x Math::BigInt::Subclass inf + NaN ok 324 - r Math::BigInt::Subclass inf + NaN ok 325 - x Math::BigFloat inf + NaN ok 326 - r Math::BigFloat inf + NaN ok 327 - x Math::BigFloat::Subclass inf + NaN ok 328 - r Math::BigFloat::Subclass inf + NaN ok 329 - x Math::BigInt NaN + NaN ok 330 - r Math::BigInt NaN + NaN ok 331 - x Math::BigInt::Subclass NaN + NaN ok 332 - r Math::BigInt::Subclass NaN + NaN ok 333 - x Math::BigFloat NaN + NaN ok 334 - r Math::BigFloat NaN + NaN ok 335 - x Math::BigFloat::Subclass NaN + NaN ok 336 - r Math::BigFloat::Subclass NaN + NaN ok 337 - x Math::BigInt -inf - -inf ok 338 - r Math::BigInt -inf - -inf ok 339 - x Math::BigInt::Subclass -inf - -inf ok 340 - r Math::BigInt::Subclass -inf - -inf ok 341 - x Math::BigFloat -inf - -inf ok 342 - r Math::BigFloat -inf - -inf ok 343 - x Math::BigFloat::Subclass -inf - -inf ok 344 - r Math::BigFloat::Subclass -inf - -inf ok 345 - x Math::BigInt -1 - -inf ok 346 - r Math::BigInt -1 - -inf ok 347 - x Math::BigInt::Subclass -1 - -inf ok 348 - r Math::BigInt::Subclass -1 - -inf ok 349 - x Math::BigFloat -1 - -inf ok 350 - r Math::BigFloat -1 - -inf ok 351 - x Math::BigFloat::Subclass -1 - -inf ok 352 - r Math::BigFloat::Subclass -1 - -inf ok 353 - x Math::BigInt -0 - -inf ok 354 - r Math::BigInt -0 - -inf ok 355 - x Math::BigInt::Subclass -0 - -inf ok 356 - r Math::BigInt::Subclass -0 - -inf ok 357 - x Math::BigFloat -0 - -inf ok 358 - r Math::BigFloat -0 - -inf ok 359 - x Math::BigFloat::Subclass -0 - -inf ok 360 - r Math::BigFloat::Subclass -0 - -inf ok 361 - x Math::BigInt 0 - -inf ok 362 - r Math::BigInt 0 - -inf ok 363 - x Math::BigInt::Subclass 0 - -inf ok 364 - r Math::BigInt::Subclass 0 - -inf ok 365 - x Math::BigFloat 0 - -inf ok 366 - r Math::BigFloat 0 - -inf ok 367 - x Math::BigFloat::Subclass 0 - -inf ok 368 - r Math::BigFloat::Subclass 0 - -inf ok 369 - x Math::BigInt 1 - -inf ok 370 - r Math::BigInt 1 - -inf ok 371 - x Math::BigInt::Subclass 1 - -inf ok 372 - r Math::BigInt::Subclass 1 - -inf ok 373 - x Math::BigFloat 1 - -inf ok 374 - r Math::BigFloat 1 - -inf ok 375 - x Math::BigFloat::Subclass 1 - -inf ok 376 - r Math::BigFloat::Subclass 1 - -inf ok 377 - x Math::BigInt inf - -inf ok 378 - r Math::BigInt inf - -inf ok 379 - x Math::BigInt::Subclass inf - -inf ok 380 - r Math::BigInt::Subclass inf - -inf ok 381 - x Math::BigFloat inf - -inf ok 382 - r Math::BigFloat inf - -inf ok 383 - x Math::BigFloat::Subclass inf - -inf ok 384 - r Math::BigFloat::Subclass inf - -inf ok 385 - x Math::BigInt NaN - -inf ok 386 - r Math::BigInt NaN - -inf ok 387 - x Math::BigInt::Subclass NaN - -inf ok 388 - r Math::BigInt::Subclass NaN - -inf ok 389 - x Math::BigFloat NaN - -inf ok 390 - r Math::BigFloat NaN - -inf ok 391 - x Math::BigFloat::Subclass NaN - -inf ok 392 - r Math::BigFloat::Subclass NaN - -inf ok 393 - x Math::BigInt -inf - -1 ok 394 - r Math::BigInt -inf - -1 ok 395 - x Math::BigInt::Subclass -inf - -1 ok 396 - r Math::BigInt::Subclass -inf - -1 ok 397 - x Math::BigFloat -inf - -1 ok 398 - r Math::BigFloat -inf - -1 ok 399 - x Math::BigFloat::Subclass -inf - -1 ok 400 - r Math::BigFloat::Subclass -inf - -1 ok 401 - x Math::BigInt -1 - -1 ok 402 - r Math::BigInt -1 - -1 ok 403 - x Math::BigInt::Subclass -1 - -1 ok 404 - r Math::BigInt::Subclass -1 - -1 ok 405 - x Math::BigFloat -1 - -1 ok 406 - r Math::BigFloat -1 - -1 ok 407 - x Math::BigFloat::Subclass -1 - -1 ok 408 - r Math::BigFloat::Subclass -1 - -1 ok 409 - x Math::BigInt -0 - -1 ok 410 - r Math::BigInt -0 - -1 ok 411 - x Math::BigInt::Subclass -0 - -1 ok 412 - r Math::BigInt::Subclass -0 - -1 ok 413 - x Math::BigFloat -0 - -1 ok 414 - r Math::BigFloat -0 - -1 ok 415 - x Math::BigFloat::Subclass -0 - -1 ok 416 - r Math::BigFloat::Subclass -0 - -1 ok 417 - x Math::BigInt 0 - -1 ok 418 - r Math::BigInt 0 - -1 ok 419 - x Math::BigInt::Subclass 0 - -1 ok 420 - r Math::BigInt::Subclass 0 - -1 ok 421 - x Math::BigFloat 0 - -1 ok 422 - r Math::BigFloat 0 - -1 ok 423 - x Math::BigFloat::Subclass 0 - -1 ok 424 - r Math::BigFloat::Subclass 0 - -1 ok 425 - x Math::BigInt 1 - -1 ok 426 - r Math::BigInt 1 - -1 ok 427 - x Math::BigInt::Subclass 1 - -1 ok 428 - r Math::BigInt::Subclass 1 - -1 ok 429 - x Math::BigFloat 1 - -1 ok 430 - r Math::BigFloat 1 - -1 ok 431 - x Math::BigFloat::Subclass 1 - -1 ok 432 - r Math::BigFloat::Subclass 1 - -1 ok 433 - x Math::BigInt inf - -1 ok 434 - r Math::BigInt inf - -1 ok 435 - x Math::BigInt::Subclass inf - -1 ok 436 - r Math::BigInt::Subclass inf - -1 ok 437 - x Math::BigFloat inf - -1 ok 438 - r Math::BigFloat inf - -1 ok 439 - x Math::BigFloat::Subclass inf - -1 ok 440 - r Math::BigFloat::Subclass inf - -1 ok 441 - x Math::BigInt NaN - -1 ok 442 - r Math::BigInt NaN - -1 ok 443 - x Math::BigInt::Subclass NaN - -1 ok 444 - r Math::BigInt::Subclass NaN - -1 ok 445 - x Math::BigFloat NaN - -1 ok 446 - r Math::BigFloat NaN - -1 ok 447 - x Math::BigFloat::Subclass NaN - -1 ok 448 - r Math::BigFloat::Subclass NaN - -1 ok 449 - x Math::BigInt -inf - 0 ok 450 - r Math::BigInt -inf - 0 ok 451 - x Math::BigInt::Subclass -inf - 0 ok 452 - r Math::BigInt::Subclass -inf - 0 ok 453 - x Math::BigFloat -inf - 0 ok 454 - r Math::BigFloat -inf - 0 ok 455 - x Math::BigFloat::Subclass -inf - 0 ok 456 - r Math::BigFloat::Subclass -inf - 0 ok 457 - x Math::BigInt -1 - 0 ok 458 - r Math::BigInt -1 - 0 ok 459 - x Math::BigInt::Subclass -1 - 0 ok 460 - r Math::BigInt::Subclass -1 - 0 ok 461 - x Math::BigFloat -1 - 0 ok 462 - r Math::BigFloat -1 - 0 ok 463 - x Math::BigFloat::Subclass -1 - 0 ok 464 - r Math::BigFloat::Subclass -1 - 0 ok 465 - x Math::BigInt -0 - 0 ok 466 - r Math::BigInt -0 - 0 ok 467 - x Math::BigInt::Subclass -0 - 0 ok 468 - r Math::BigInt::Subclass -0 - 0 ok 469 - x Math::BigFloat -0 - 0 ok 470 - r Math::BigFloat -0 - 0 ok 471 - x Math::BigFloat::Subclass -0 - 0 ok 472 - r Math::BigFloat::Subclass -0 - 0 ok 473 - x Math::BigInt 0 - 0 ok 474 - r Math::BigInt 0 - 0 ok 475 - x Math::BigInt::Subclass 0 - 0 ok 476 - r Math::BigInt::Subclass 0 - 0 ok 477 - x Math::BigFloat 0 - 0 ok 478 - r Math::BigFloat 0 - 0 ok 479 - x Math::BigFloat::Subclass 0 - 0 ok 480 - r Math::BigFloat::Subclass 0 - 0 ok 481 - x Math::BigInt 1 - 0 ok 482 - r Math::BigInt 1 - 0 ok 483 - x Math::BigInt::Subclass 1 - 0 ok 484 - r Math::BigInt::Subclass 1 - 0 ok 485 - x Math::BigFloat 1 - 0 ok 486 - r Math::BigFloat 1 - 0 ok 487 - x Math::BigFloat::Subclass 1 - 0 ok 488 - r Math::BigFloat::Subclass 1 - 0 ok 489 - x Math::BigInt inf - 0 ok 490 - r Math::BigInt inf - 0 ok 491 - x Math::BigInt::Subclass inf - 0 ok 492 - r Math::BigInt::Subclass inf - 0 ok 493 - x Math::BigFloat inf - 0 ok 494 - r Math::BigFloat inf - 0 ok 495 - x Math::BigFloat::Subclass inf - 0 ok 496 - r Math::BigFloat::Subclass inf - 0 ok 497 - x Math::BigInt NaN - 0 ok 498 - r Math::BigInt NaN - 0 ok 499 - x Math::BigInt::Subclass NaN - 0 ok 500 - r Math::BigInt::Subclass NaN - 0 ok 501 - x Math::BigFloat NaN - 0 ok 502 - r Math::BigFloat NaN - 0 ok 503 - x Math::BigFloat::Subclass NaN - 0 ok 504 - r Math::BigFloat::Subclass NaN - 0 ok 505 - x Math::BigInt -inf - 1 ok 506 - r Math::BigInt -inf - 1 ok 507 - x Math::BigInt::Subclass -inf - 1 ok 508 - r Math::BigInt::Subclass -inf - 1 ok 509 - x Math::BigFloat -inf - 1 ok 510 - r Math::BigFloat -inf - 1 ok 511 - x Math::BigFloat::Subclass -inf - 1 ok 512 - r Math::BigFloat::Subclass -inf - 1 ok 513 - x Math::BigInt -1 - 1 ok 514 - r Math::BigInt -1 - 1 ok 515 - x Math::BigInt::Subclass -1 - 1 ok 516 - r Math::BigInt::Subclass -1 - 1 ok 517 - x Math::BigFloat -1 - 1 ok 518 - r Math::BigFloat -1 - 1 ok 519 - x Math::BigFloat::Subclass -1 - 1 ok 520 - r Math::BigFloat::Subclass -1 - 1 ok 521 - x Math::BigInt -0 - 1 ok 522 - r Math::BigInt -0 - 1 ok 523 - x Math::BigInt::Subclass -0 - 1 ok 524 - r Math::BigInt::Subclass -0 - 1 ok 525 - x Math::BigFloat -0 - 1 ok 526 - r Math::BigFloat -0 - 1 ok 527 - x Math::BigFloat::Subclass -0 - 1 ok 528 - r Math::BigFloat::Subclass -0 - 1 ok 529 - x Math::BigInt 0 - 1 ok 530 - r Math::BigInt 0 - 1 ok 531 - x Math::BigInt::Subclass 0 - 1 ok 532 - r Math::BigInt::Subclass 0 - 1 ok 533 - x Math::BigFloat 0 - 1 ok 534 - r Math::BigFloat 0 - 1 ok 535 - x Math::BigFloat::Subclass 0 - 1 ok 536 - r Math::BigFloat::Subclass 0 - 1 ok 537 - x Math::BigInt 1 - 1 ok 538 - r Math::BigInt 1 - 1 ok 539 - x Math::BigInt::Subclass 1 - 1 ok 540 - r Math::BigInt::Subclass 1 - 1 ok 541 - x Math::BigFloat 1 - 1 ok 542 - r Math::BigFloat 1 - 1 ok 543 - x Math::BigFloat::Subclass 1 - 1 ok 544 - r Math::BigFloat::Subclass 1 - 1 ok 545 - x Math::BigInt inf - 1 ok 546 - r Math::BigInt inf - 1 ok 547 - x Math::BigInt::Subclass inf - 1 ok 548 - r Math::BigInt::Subclass inf - 1 ok 549 - x Math::BigFloat inf - 1 ok 550 - r Math::BigFloat inf - 1 ok 551 - x Math::BigFloat::Subclass inf - 1 ok 552 - r Math::BigFloat::Subclass inf - 1 ok 553 - x Math::BigInt NaN - 1 ok 554 - r Math::BigInt NaN - 1 ok 555 - x Math::BigInt::Subclass NaN - 1 ok 556 - r Math::BigInt::Subclass NaN - 1 ok 557 - x Math::BigFloat NaN - 1 ok 558 - r Math::BigFloat NaN - 1 ok 559 - x Math::BigFloat::Subclass NaN - 1 ok 560 - r Math::BigFloat::Subclass NaN - 1 ok 561 - x Math::BigInt -inf - inf ok 562 - r Math::BigInt -inf - inf ok 563 - x Math::BigInt::Subclass -inf - inf ok 564 - r Math::BigInt::Subclass -inf - inf ok 565 - x Math::BigFloat -inf - inf ok 566 - r Math::BigFloat -inf - inf ok 567 - x Math::BigFloat::Subclass -inf - inf ok 568 - r Math::BigFloat::Subclass -inf - inf ok 569 - x Math::BigInt -1 - inf ok 570 - r Math::BigInt -1 - inf ok 571 - x Math::BigInt::Subclass -1 - inf ok 572 - r Math::BigInt::Subclass -1 - inf ok 573 - x Math::BigFloat -1 - inf ok 574 - r Math::BigFloat -1 - inf ok 575 - x Math::BigFloat::Subclass -1 - inf ok 576 - r Math::BigFloat::Subclass -1 - inf ok 577 - x Math::BigInt -0 - inf ok 578 - r Math::BigInt -0 - inf ok 579 - x Math::BigInt::Subclass -0 - inf ok 580 - r Math::BigInt::Subclass -0 - inf ok 581 - x Math::BigFloat -0 - inf ok 582 - r Math::BigFloat -0 - inf ok 583 - x Math::BigFloat::Subclass -0 - inf ok 584 - r Math::BigFloat::Subclass -0 - inf ok 585 - x Math::BigInt 0 - inf ok 586 - r Math::BigInt 0 - inf ok 587 - x Math::BigInt::Subclass 0 - inf ok 588 - r Math::BigInt::Subclass 0 - inf ok 589 - x Math::BigFloat 0 - inf ok 590 - r Math::BigFloat 0 - inf ok 591 - x Math::BigFloat::Subclass 0 - inf ok 592 - r Math::BigFloat::Subclass 0 - inf ok 593 - x Math::BigInt 1 - inf ok 594 - r Math::BigInt 1 - inf ok 595 - x Math::BigInt::Subclass 1 - inf ok 596 - r Math::BigInt::Subclass 1 - inf ok 597 - x Math::BigFloat 1 - inf ok 598 - r Math::BigFloat 1 - inf ok 599 - x Math::BigFloat::Subclass 1 - inf ok 600 - r Math::BigFloat::Subclass 1 - inf ok 601 - x Math::BigInt inf - inf ok 602 - r Math::BigInt inf - inf ok 603 - x Math::BigInt::Subclass inf - inf ok 604 - r Math::BigInt::Subclass inf - inf ok 605 - x Math::BigFloat inf - inf ok 606 - r Math::BigFloat inf - inf ok 607 - x Math::BigFloat::Subclass inf - inf ok 608 - r Math::BigFloat::Subclass inf - inf ok 609 - x Math::BigInt NaN - inf ok 610 - r Math::BigInt NaN - inf ok 611 - x Math::BigInt::Subclass NaN - inf ok 612 - r Math::BigInt::Subclass NaN - inf ok 613 - x Math::BigFloat NaN - inf ok 614 - r Math::BigFloat NaN - inf ok 615 - x Math::BigFloat::Subclass NaN - inf ok 616 - r Math::BigFloat::Subclass NaN - inf ok 617 - x Math::BigInt -inf - NaN ok 618 - r Math::BigInt -inf - NaN ok 619 - x Math::BigInt::Subclass -inf - NaN ok 620 - r Math::BigInt::Subclass -inf - NaN ok 621 - x Math::BigFloat -inf - NaN ok 622 - r Math::BigFloat -inf - NaN ok 623 - x Math::BigFloat::Subclass -inf - NaN ok 624 - r Math::BigFloat::Subclass -inf - NaN ok 625 - x Math::BigInt -1 - NaN ok 626 - r Math::BigInt -1 - NaN ok 627 - x Math::BigInt::Subclass -1 - NaN ok 628 - r Math::BigInt::Subclass -1 - NaN ok 629 - x Math::BigFloat -1 - NaN ok 630 - r Math::BigFloat -1 - NaN ok 631 - x Math::BigFloat::Subclass -1 - NaN ok 632 - r Math::BigFloat::Subclass -1 - NaN ok 633 - x Math::BigInt -0 - NaN ok 634 - r Math::BigInt -0 - NaN ok 635 - x Math::BigInt::Subclass -0 - NaN ok 636 - r Math::BigInt::Subclass -0 - NaN ok 637 - x Math::BigFloat -0 - NaN ok 638 - r Math::BigFloat -0 - NaN ok 639 - x Math::BigFloat::Subclass -0 - NaN ok 640 - r Math::BigFloat::Subclass -0 - NaN ok 641 - x Math::BigInt 0 - NaN ok 642 - r Math::BigInt 0 - NaN ok 643 - x Math::BigInt::Subclass 0 - NaN ok 644 - r Math::BigInt::Subclass 0 - NaN ok 645 - x Math::BigFloat 0 - NaN ok 646 - r Math::BigFloat 0 - NaN ok 647 - x Math::BigFloat::Subclass 0 - NaN ok 648 - r Math::BigFloat::Subclass 0 - NaN ok 649 - x Math::BigInt 1 - NaN ok 650 - r Math::BigInt 1 - NaN ok 651 - x Math::BigInt::Subclass 1 - NaN ok 652 - r Math::BigInt::Subclass 1 - NaN ok 653 - x Math::BigFloat 1 - NaN ok 654 - r Math::BigFloat 1 - NaN ok 655 - x Math::BigFloat::Subclass 1 - NaN ok 656 - r Math::BigFloat::Subclass 1 - NaN ok 657 - x Math::BigInt inf - NaN ok 658 - r Math::BigInt inf - NaN ok 659 - x Math::BigInt::Subclass inf - NaN ok 660 - r Math::BigInt::Subclass inf - NaN ok 661 - x Math::BigFloat inf - NaN ok 662 - r Math::BigFloat inf - NaN ok 663 - x Math::BigFloat::Subclass inf - NaN ok 664 - r Math::BigFloat::Subclass inf - NaN ok 665 - x Math::BigInt NaN - NaN ok 666 - r Math::BigInt NaN - NaN ok 667 - x Math::BigInt::Subclass NaN - NaN ok 668 - r Math::BigInt::Subclass NaN - NaN ok 669 - x Math::BigFloat NaN - NaN ok 670 - r Math::BigFloat NaN - NaN ok 671 - x Math::BigFloat::Subclass NaN - NaN ok 672 - r Math::BigFloat::Subclass NaN - NaN ok 673 - x Math::BigInt -inf * -inf ok 674 - r Math::BigInt -inf * -inf ok 675 - x Math::BigInt::Subclass -inf * -inf ok 676 - r Math::BigInt::Subclass -inf * -inf ok 677 - x Math::BigFloat -inf * -inf ok 678 - r Math::BigFloat -inf * -inf ok 679 - x Math::BigFloat::Subclass -inf * -inf ok 680 - r Math::BigFloat::Subclass -inf * -inf ok 681 - x Math::BigInt -1 * -inf ok 682 - r Math::BigInt -1 * -inf ok 683 - x Math::BigInt::Subclass -1 * -inf ok 684 - r Math::BigInt::Subclass -1 * -inf ok 685 - x Math::BigFloat -1 * -inf ok 686 - r Math::BigFloat -1 * -inf ok 687 - x Math::BigFloat::Subclass -1 * -inf ok 688 - r Math::BigFloat::Subclass -1 * -inf ok 689 - x Math::BigInt -0 * -inf ok 690 - r Math::BigInt -0 * -inf ok 691 - x Math::BigInt::Subclass -0 * -inf ok 692 - r Math::BigInt::Subclass -0 * -inf ok 693 - x Math::BigFloat -0 * -inf ok 694 - r Math::BigFloat -0 * -inf ok 695 - x Math::BigFloat::Subclass -0 * -inf ok 696 - r Math::BigFloat::Subclass -0 * -inf ok 697 - x Math::BigInt 0 * -inf ok 698 - r Math::BigInt 0 * -inf ok 699 - x Math::BigInt::Subclass 0 * -inf ok 700 - r Math::BigInt::Subclass 0 * -inf ok 701 - x Math::BigFloat 0 * -inf ok 702 - r Math::BigFloat 0 * -inf ok 703 - x Math::BigFloat::Subclass 0 * -inf ok 704 - r Math::BigFloat::Subclass 0 * -inf ok 705 - x Math::BigInt 1 * -inf ok 706 - r Math::BigInt 1 * -inf ok 707 - x Math::BigInt::Subclass 1 * -inf ok 708 - r Math::BigInt::Subclass 1 * -inf ok 709 - x Math::BigFloat 1 * -inf ok 710 - r Math::BigFloat 1 * -inf ok 711 - x Math::BigFloat::Subclass 1 * -inf ok 712 - r Math::BigFloat::Subclass 1 * -inf ok 713 - x Math::BigInt inf * -inf ok 714 - r Math::BigInt inf * -inf ok 715 - x Math::BigInt::Subclass inf * -inf ok 716 - r Math::BigInt::Subclass inf * -inf ok 717 - x Math::BigFloat inf * -inf ok 718 - r Math::BigFloat inf * -inf ok 719 - x Math::BigFloat::Subclass inf * -inf ok 720 - r Math::BigFloat::Subclass inf * -inf ok 721 - x Math::BigInt NaN * -inf ok 722 - r Math::BigInt NaN * -inf ok 723 - x Math::BigInt::Subclass NaN * -inf ok 724 - r Math::BigInt::Subclass NaN * -inf ok 725 - x Math::BigFloat NaN * -inf ok 726 - r Math::BigFloat NaN * -inf ok 727 - x Math::BigFloat::Subclass NaN * -inf ok 728 - r Math::BigFloat::Subclass NaN * -inf ok 729 - x Math::BigInt -inf * -1 ok 730 - r Math::BigInt -inf * -1 ok 731 - x Math::BigInt::Subclass -inf * -1 ok 732 - r Math::BigInt::Subclass -inf * -1 ok 733 - x Math::BigFloat -inf * -1 ok 734 - r Math::BigFloat -inf * -1 ok 735 - x Math::BigFloat::Subclass -inf * -1 ok 736 - r Math::BigFloat::Subclass -inf * -1 ok 737 - x Math::BigInt -1 * -1 ok 738 - r Math::BigInt -1 * -1 ok 739 - x Math::BigInt::Subclass -1 * -1 ok 740 - r Math::BigInt::Subclass -1 * -1 ok 741 - x Math::BigFloat -1 * -1 ok 742 - r Math::BigFloat -1 * -1 ok 743 - x Math::BigFloat::Subclass -1 * -1 ok 744 - r Math::BigFloat::Subclass -1 * -1 ok 745 - x Math::BigInt -0 * -1 ok 746 - r Math::BigInt -0 * -1 ok 747 - x Math::BigInt::Subclass -0 * -1 ok 748 - r Math::BigInt::Subclass -0 * -1 ok 749 - x Math::BigFloat -0 * -1 ok 750 - r Math::BigFloat -0 * -1 ok 751 - x Math::BigFloat::Subclass -0 * -1 ok 752 - r Math::BigFloat::Subclass -0 * -1 ok 753 - x Math::BigInt 0 * -1 ok 754 - r Math::BigInt 0 * -1 ok 755 - x Math::BigInt::Subclass 0 * -1 ok 756 - r Math::BigInt::Subclass 0 * -1 ok 757 - x Math::BigFloat 0 * -1 ok 758 - r Math::BigFloat 0 * -1 ok 759 - x Math::BigFloat::Subclass 0 * -1 ok 760 - r Math::BigFloat::Subclass 0 * -1 ok 761 - x Math::BigInt 1 * -1 ok 762 - r Math::BigInt 1 * -1 ok 763 - x Math::BigInt::Subclass 1 * -1 ok 764 - r Math::BigInt::Subclass 1 * -1 ok 765 - x Math::BigFloat 1 * -1 ok 766 - r Math::BigFloat 1 * -1 ok 767 - x Math::BigFloat::Subclass 1 * -1 ok 768 - r Math::BigFloat::Subclass 1 * -1 ok 769 - x Math::BigInt inf * -1 ok 770 - r Math::BigInt inf * -1 ok 771 - x Math::BigInt::Subclass inf * -1 ok 772 - r Math::BigInt::Subclass inf * -1 ok 773 - x Math::BigFloat inf * -1 ok 774 - r Math::BigFloat inf * -1 ok 775 - x Math::BigFloat::Subclass inf * -1 ok 776 - r Math::BigFloat::Subclass inf * -1 ok 777 - x Math::BigInt NaN * -1 ok 778 - r Math::BigInt NaN * -1 ok 779 - x Math::BigInt::Subclass NaN * -1 ok 780 - r Math::BigInt::Subclass NaN * -1 ok 781 - x Math::BigFloat NaN * -1 ok 782 - r Math::BigFloat NaN * -1 ok 783 - x Math::BigFloat::Subclass NaN * -1 ok 784 - r Math::BigFloat::Subclass NaN * -1 ok 785 - x Math::BigInt -inf * 0 ok 786 - r Math::BigInt -inf * 0 ok 787 - x Math::BigInt::Subclass -inf * 0 ok 788 - r Math::BigInt::Subclass -inf * 0 ok 789 - x Math::BigFloat -inf * 0 ok 790 - r Math::BigFloat -inf * 0 ok 791 - x Math::BigFloat::Subclass -inf * 0 ok 792 - r Math::BigFloat::Subclass -inf * 0 ok 793 - x Math::BigInt -1 * 0 ok 794 - r Math::BigInt -1 * 0 ok 795 - x Math::BigInt::Subclass -1 * 0 ok 796 - r Math::BigInt::Subclass -1 * 0 ok 797 - x Math::BigFloat -1 * 0 ok 798 - r Math::BigFloat -1 * 0 ok 799 - x Math::BigFloat::Subclass -1 * 0 ok 800 - r Math::BigFloat::Subclass -1 * 0 ok 801 - x Math::BigInt -0 * 0 ok 802 - r Math::BigInt -0 * 0 ok 803 - x Math::BigInt::Subclass -0 * 0 ok 804 - r Math::BigInt::Subclass -0 * 0 ok 805 - x Math::BigFloat -0 * 0 ok 806 - r Math::BigFloat -0 * 0 ok 807 - x Math::BigFloat::Subclass -0 * 0 ok 808 - r Math::BigFloat::Subclass -0 * 0 ok 809 - x Math::BigInt 0 * 0 ok 810 - r Math::BigInt 0 * 0 ok 811 - x Math::BigInt::Subclass 0 * 0 ok 812 - r Math::BigInt::Subclass 0 * 0 ok 813 - x Math::BigFloat 0 * 0 ok 814 - r Math::BigFloat 0 * 0 ok 815 - x Math::BigFloat::Subclass 0 * 0 ok 816 - r Math::BigFloat::Subclass 0 * 0 ok 817 - x Math::BigInt 1 * 0 ok 818 - r Math::BigInt 1 * 0 ok 819 - x Math::BigInt::Subclass 1 * 0 ok 820 - r Math::BigInt::Subclass 1 * 0 ok 821 - x Math::BigFloat 1 * 0 ok 822 - r Math::BigFloat 1 * 0 ok 823 - x Math::BigFloat::Subclass 1 * 0 ok 824 - r Math::BigFloat::Subclass 1 * 0 ok 825 - x Math::BigInt inf * 0 ok 826 - r Math::BigInt inf * 0 ok 827 - x Math::BigInt::Subclass inf * 0 ok 828 - r Math::BigInt::Subclass inf * 0 ok 829 - x Math::BigFloat inf * 0 ok 830 - r Math::BigFloat inf * 0 ok 831 - x Math::BigFloat::Subclass inf * 0 ok 832 - r Math::BigFloat::Subclass inf * 0 ok 833 - x Math::BigInt NaN * 0 ok 834 - r Math::BigInt NaN * 0 ok 835 - x Math::BigInt::Subclass NaN * 0 ok 836 - r Math::BigInt::Subclass NaN * 0 ok 837 - x Math::BigFloat NaN * 0 ok 838 - r Math::BigFloat NaN * 0 ok 839 - x Math::BigFloat::Subclass NaN * 0 ok 840 - r Math::BigFloat::Subclass NaN * 0 ok 841 - x Math::BigInt -inf * 1 ok 842 - r Math::BigInt -inf * 1 ok 843 - x Math::BigInt::Subclass -inf * 1 ok 844 - r Math::BigInt::Subclass -inf * 1 ok 845 - x Math::BigFloat -inf * 1 ok 846 - r Math::BigFloat -inf * 1 ok 847 - x Math::BigFloat::Subclass -inf * 1 ok 848 - r Math::BigFloat::Subclass -inf * 1 ok 849 - x Math::BigInt -1 * 1 ok 850 - r Math::BigInt -1 * 1 ok 851 - x Math::BigInt::Subclass -1 * 1 ok 852 - r Math::BigInt::Subclass -1 * 1 ok 853 - x Math::BigFloat -1 * 1 ok 854 - r Math::BigFloat -1 * 1 ok 855 - x Math::BigFloat::Subclass -1 * 1 ok 856 - r Math::BigFloat::Subclass -1 * 1 ok 857 - x Math::BigInt -0 * 1 ok 858 - r Math::BigInt -0 * 1 ok 859 - x Math::BigInt::Subclass -0 * 1 ok 860 - r Math::BigInt::Subclass -0 * 1 ok 861 - x Math::BigFloat -0 * 1 ok 862 - r Math::BigFloat -0 * 1 ok 863 - x Math::BigFloat::Subclass -0 * 1 ok 864 - r Math::BigFloat::Subclass -0 * 1 ok 865 - x Math::BigInt 0 * 1 ok 866 - r Math::BigInt 0 * 1 ok 867 - x Math::BigInt::Subclass 0 * 1 ok 868 - r Math::BigInt::Subclass 0 * 1 ok 869 - x Math::BigFloat 0 * 1 ok 870 - r Math::BigFloat 0 * 1 ok 871 - x Math::BigFloat::Subclass 0 * 1 ok 872 - r Math::BigFloat::Subclass 0 * 1 ok 873 - x Math::BigInt 1 * 1 ok 874 - r Math::BigInt 1 * 1 ok 875 - x Math::BigInt::Subclass 1 * 1 ok 876 - r Math::BigInt::Subclass 1 * 1 ok 877 - x Math::BigFloat 1 * 1 ok 878 - r Math::BigFloat 1 * 1 ok 879 - x Math::BigFloat::Subclass 1 * 1 ok 880 - r Math::BigFloat::Subclass 1 * 1 ok 881 - x Math::BigInt inf * 1 ok 882 - r Math::BigInt inf * 1 ok 883 - x Math::BigInt::Subclass inf * 1 ok 884 - r Math::BigInt::Subclass inf * 1 ok 885 - x Math::BigFloat inf * 1 ok 886 - r Math::BigFloat inf * 1 ok 887 - x Math::BigFloat::Subclass inf * 1 ok 888 - r Math::BigFloat::Subclass inf * 1 ok 889 - x Math::BigInt NaN * 1 ok 890 - r Math::BigInt NaN * 1 ok 891 - x Math::BigInt::Subclass NaN * 1 ok 892 - r Math::BigInt::Subclass NaN * 1 ok 893 - x Math::BigFloat NaN * 1 ok 894 - r Math::BigFloat NaN * 1 ok 895 - x Math::BigFloat::Subclass NaN * 1 ok 896 - r Math::BigFloat::Subclass NaN * 1 ok 897 - x Math::BigInt -inf * inf ok 898 - r Math::BigInt -inf * inf ok 899 - x Math::BigInt::Subclass -inf * inf ok 900 - r Math::BigInt::Subclass -inf * inf ok 901 - x Math::BigFloat -inf * inf ok 902 - r Math::BigFloat -inf * inf ok 903 - x Math::BigFloat::Subclass -inf * inf ok 904 - r Math::BigFloat::Subclass -inf * inf ok 905 - x Math::BigInt -1 * inf ok 906 - r Math::BigInt -1 * inf ok 907 - x Math::BigInt::Subclass -1 * inf ok 908 - r Math::BigInt::Subclass -1 * inf ok 909 - x Math::BigFloat -1 * inf ok 910 - r Math::BigFloat -1 * inf ok 911 - x Math::BigFloat::Subclass -1 * inf ok 912 - r Math::BigFloat::Subclass -1 * inf ok 913 - x Math::BigInt -0 * inf ok 914 - r Math::BigInt -0 * inf ok 915 - x Math::BigInt::Subclass -0 * inf ok 916 - r Math::BigInt::Subclass -0 * inf ok 917 - x Math::BigFloat -0 * inf ok 918 - r Math::BigFloat -0 * inf ok 919 - x Math::BigFloat::Subclass -0 * inf ok 920 - r Math::BigFloat::Subclass -0 * inf ok 921 - x Math::BigInt 0 * inf ok 922 - r Math::BigInt 0 * inf ok 923 - x Math::BigInt::Subclass 0 * inf ok 924 - r Math::BigInt::Subclass 0 * inf ok 925 - x Math::BigFloat 0 * inf ok 926 - r Math::BigFloat 0 * inf ok 927 - x Math::BigFloat::Subclass 0 * inf ok 928 - r Math::BigFloat::Subclass 0 * inf ok 929 - x Math::BigInt 1 * inf ok 930 - r Math::BigInt 1 * inf ok 931 - x Math::BigInt::Subclass 1 * inf ok 932 - r Math::BigInt::Subclass 1 * inf ok 933 - x Math::BigFloat 1 * inf ok 934 - r Math::BigFloat 1 * inf ok 935 - x Math::BigFloat::Subclass 1 * inf ok 936 - r Math::BigFloat::Subclass 1 * inf ok 937 - x Math::BigInt inf * inf ok 938 - r Math::BigInt inf * inf ok 939 - x Math::BigInt::Subclass inf * inf ok 940 - r Math::BigInt::Subclass inf * inf ok 941 - x Math::BigFloat inf * inf ok 942 - r Math::BigFloat inf * inf ok 943 - x Math::BigFloat::Subclass inf * inf ok 944 - r Math::BigFloat::Subclass inf * inf ok 945 - x Math::BigInt NaN * inf ok 946 - r Math::BigInt NaN * inf ok 947 - x Math::BigInt::Subclass NaN * inf ok 948 - r Math::BigInt::Subclass NaN * inf ok 949 - x Math::BigFloat NaN * inf ok 950 - r Math::BigFloat NaN * inf ok 951 - x Math::BigFloat::Subclass NaN * inf ok 952 - r Math::BigFloat::Subclass NaN * inf ok 953 - x Math::BigInt -inf * NaN ok 954 - r Math::BigInt -inf * NaN ok 955 - x Math::BigInt::Subclass -inf * NaN ok 956 - r Math::BigInt::Subclass -inf * NaN ok 957 - x Math::BigFloat -inf * NaN ok 958 - r Math::BigFloat -inf * NaN ok 959 - x Math::BigFloat::Subclass -inf * NaN ok 960 - r Math::BigFloat::Subclass -inf * NaN ok 961 - x Math::BigInt -1 * NaN ok 962 - r Math::BigInt -1 * NaN ok 963 - x Math::BigInt::Subclass -1 * NaN ok 964 - r Math::BigInt::Subclass -1 * NaN ok 965 - x Math::BigFloat -1 * NaN ok 966 - r Math::BigFloat -1 * NaN ok 967 - x Math::BigFloat::Subclass -1 * NaN ok 968 - r Math::BigFloat::Subclass -1 * NaN ok 969 - x Math::BigInt -0 * NaN ok 970 - r Math::BigInt -0 * NaN ok 971 - x Math::BigInt::Subclass -0 * NaN ok 972 - r Math::BigInt::Subclass -0 * NaN ok 973 - x Math::BigFloat -0 * NaN ok 974 - r Math::BigFloat -0 * NaN ok 975 - x Math::BigFloat::Subclass -0 * NaN ok 976 - r Math::BigFloat::Subclass -0 * NaN ok 977 - x Math::BigInt 0 * NaN ok 978 - r Math::BigInt 0 * NaN ok 979 - x Math::BigInt::Subclass 0 * NaN ok 980 - r Math::BigInt::Subclass 0 * NaN ok 981 - x Math::BigFloat 0 * NaN ok 982 - r Math::BigFloat 0 * NaN ok 983 - x Math::BigFloat::Subclass 0 * NaN ok 984 - r Math::BigFloat::Subclass 0 * NaN ok 985 - x Math::BigInt 1 * NaN ok 986 - r Math::BigInt 1 * NaN ok 987 - x Math::BigInt::Subclass 1 * NaN ok 988 - r Math::BigInt::Subclass 1 * NaN ok 989 - x Math::BigFloat 1 * NaN ok 990 - r Math::BigFloat 1 * NaN ok 991 - x Math::BigFloat::Subclass 1 * NaN ok 992 - r Math::BigFloat::Subclass 1 * NaN ok 993 - x Math::BigInt inf * NaN ok 994 - r Math::BigInt inf * NaN ok 995 - x Math::BigInt::Subclass inf * NaN ok 996 - r Math::BigInt::Subclass inf * NaN ok 997 - x Math::BigFloat inf * NaN ok 998 - r Math::BigFloat inf * NaN ok 999 - x Math::BigFloat::Subclass inf * NaN ok 1000 - r Math::BigFloat::Subclass inf * NaN ok 1001 - x Math::BigInt NaN * NaN ok 1002 - r Math::BigInt NaN * NaN ok 1003 - x Math::BigInt::Subclass NaN * NaN ok 1004 - r Math::BigInt::Subclass NaN * NaN ok 1005 - x Math::BigFloat NaN * NaN ok 1006 - r Math::BigFloat NaN * NaN ok 1007 - x Math::BigFloat::Subclass NaN * NaN ok 1008 - r Math::BigFloat::Subclass NaN * NaN ok 1009 - x Math::BigInt -inf / -inf ok 1010 - r Math::BigInt -inf / -inf ok 1011 - t Math::BigInt -inf / -inf ok 1012 - d Math::BigInt -inf / -inf ok 1013 - m Math::BigInt -inf % -inf ok 1014 - o Math::BigInt -inf % -inf ok 1015 - x Math::BigInt::Subclass -inf / -inf ok 1016 - r Math::BigInt::Subclass -inf / -inf ok 1017 - t Math::BigInt::Subclass -inf / -inf ok 1018 - d Math::BigInt::Subclass -inf / -inf ok 1019 - m Math::BigInt::Subclass -inf % -inf ok 1020 - o Math::BigInt::Subclass -inf % -inf ok 1021 - t Math::BigFloat -inf / -inf ok 1022 - d Math::BigFloat -inf / -inf ok 1023 - m Math::BigFloat -inf % -inf ok 1024 - o Math::BigFloat -inf % -inf ok 1025 - t Math::BigFloat::Subclass -inf / -inf ok 1026 - d Math::BigFloat::Subclass -inf / -inf ok 1027 - m Math::BigFloat::Subclass -inf % -inf ok 1028 - o Math::BigFloat::Subclass -inf % -inf ok 1029 - x Math::BigInt -1 / -inf ok 1030 - r Math::BigInt -1 / -inf ok 1031 - t Math::BigInt -1 / -inf ok 1032 - d Math::BigInt -1 / -inf ok 1033 - m Math::BigInt -1 % -inf ok 1034 - o Math::BigInt -1 % -inf ok 1035 - x Math::BigInt::Subclass -1 / -inf ok 1036 - r Math::BigInt::Subclass -1 / -inf ok 1037 - t Math::BigInt::Subclass -1 / -inf ok 1038 - d Math::BigInt::Subclass -1 / -inf ok 1039 - m Math::BigInt::Subclass -1 % -inf ok 1040 - o Math::BigInt::Subclass -1 % -inf ok 1041 - t Math::BigFloat -1 / -inf ok 1042 - d Math::BigFloat -1 / -inf ok 1043 - m Math::BigFloat -1 % -inf ok 1044 - o Math::BigFloat -1 % -inf ok 1045 - t Math::BigFloat::Subclass -1 / -inf ok 1046 - d Math::BigFloat::Subclass -1 / -inf ok 1047 - m Math::BigFloat::Subclass -1 % -inf ok 1048 - o Math::BigFloat::Subclass -1 % -inf ok 1049 - x Math::BigInt -0 / -inf ok 1050 - r Math::BigInt -0 / -inf ok 1051 - t Math::BigInt -0 / -inf ok 1052 - d Math::BigInt -0 / -inf ok 1053 - m Math::BigInt -0 % -inf ok 1054 - o Math::BigInt -0 % -inf ok 1055 - x Math::BigInt::Subclass -0 / -inf ok 1056 - r Math::BigInt::Subclass -0 / -inf ok 1057 - t Math::BigInt::Subclass -0 / -inf ok 1058 - d Math::BigInt::Subclass -0 / -inf ok 1059 - m Math::BigInt::Subclass -0 % -inf ok 1060 - o Math::BigInt::Subclass -0 % -inf ok 1061 - t Math::BigFloat -0 / -inf ok 1062 - d Math::BigFloat -0 / -inf ok 1063 - m Math::BigFloat -0 % -inf ok 1064 - o Math::BigFloat -0 % -inf ok 1065 - t Math::BigFloat::Subclass -0 / -inf ok 1066 - d Math::BigFloat::Subclass -0 / -inf ok 1067 - m Math::BigFloat::Subclass -0 % -inf ok 1068 - o Math::BigFloat::Subclass -0 % -inf ok 1069 - x Math::BigInt 0 / -inf ok 1070 - r Math::BigInt 0 / -inf ok 1071 - t Math::BigInt 0 / -inf ok 1072 - d Math::BigInt 0 / -inf ok 1073 - m Math::BigInt 0 % -inf ok 1074 - o Math::BigInt 0 % -inf ok 1075 - x Math::BigInt::Subclass 0 / -inf ok 1076 - r Math::BigInt::Subclass 0 / -inf ok 1077 - t Math::BigInt::Subclass 0 / -inf ok 1078 - d Math::BigInt::Subclass 0 / -inf ok 1079 - m Math::BigInt::Subclass 0 % -inf ok 1080 - o Math::BigInt::Subclass 0 % -inf ok 1081 - t Math::BigFloat 0 / -inf ok 1082 - d Math::BigFloat 0 / -inf ok 1083 - m Math::BigFloat 0 % -inf ok 1084 - o Math::BigFloat 0 % -inf ok 1085 - t Math::BigFloat::Subclass 0 / -inf ok 1086 - d Math::BigFloat::Subclass 0 / -inf ok 1087 - m Math::BigFloat::Subclass 0 % -inf ok 1088 - o Math::BigFloat::Subclass 0 % -inf ok 1089 - x Math::BigInt 1 / -inf ok 1090 - r Math::BigInt 1 / -inf ok 1091 - t Math::BigInt 1 / -inf ok 1092 - d Math::BigInt 1 / -inf ok 1093 - m Math::BigInt 1 % -inf ok 1094 - o Math::BigInt 1 % -inf ok 1095 - x Math::BigInt::Subclass 1 / -inf ok 1096 - r Math::BigInt::Subclass 1 / -inf ok 1097 - t Math::BigInt::Subclass 1 / -inf ok 1098 - d Math::BigInt::Subclass 1 / -inf ok 1099 - m Math::BigInt::Subclass 1 % -inf ok 1100 - o Math::BigInt::Subclass 1 % -inf ok 1101 - t Math::BigFloat 1 / -inf ok 1102 - d Math::BigFloat 1 / -inf ok 1103 - m Math::BigFloat 1 % -inf ok 1104 - o Math::BigFloat 1 % -inf ok 1105 - t Math::BigFloat::Subclass 1 / -inf ok 1106 - d Math::BigFloat::Subclass 1 / -inf ok 1107 - m Math::BigFloat::Subclass 1 % -inf ok 1108 - o Math::BigFloat::Subclass 1 % -inf ok 1109 - x Math::BigInt inf / -inf ok 1110 - r Math::BigInt inf / -inf ok 1111 - t Math::BigInt inf / -inf ok 1112 - d Math::BigInt inf / -inf ok 1113 - m Math::BigInt inf % -inf ok 1114 - o Math::BigInt inf % -inf ok 1115 - x Math::BigInt::Subclass inf / -inf ok 1116 - r Math::BigInt::Subclass inf / -inf ok 1117 - t Math::BigInt::Subclass inf / -inf ok 1118 - d Math::BigInt::Subclass inf / -inf ok 1119 - m Math::BigInt::Subclass inf % -inf ok 1120 - o Math::BigInt::Subclass inf % -inf ok 1121 - t Math::BigFloat inf / -inf ok 1122 - d Math::BigFloat inf / -inf ok 1123 - m Math::BigFloat inf % -inf ok 1124 - o Math::BigFloat inf % -inf ok 1125 - t Math::BigFloat::Subclass inf / -inf ok 1126 - d Math::BigFloat::Subclass inf / -inf ok 1127 - m Math::BigFloat::Subclass inf % -inf ok 1128 - o Math::BigFloat::Subclass inf % -inf ok 1129 - x Math::BigInt NaN / -inf ok 1130 - r Math::BigInt NaN / -inf ok 1131 - t Math::BigInt NaN / -inf ok 1132 - d Math::BigInt NaN / -inf ok 1133 - m Math::BigInt NaN % -inf ok 1134 - o Math::BigInt NaN % -inf ok 1135 - x Math::BigInt::Subclass NaN / -inf ok 1136 - r Math::BigInt::Subclass NaN / -inf ok 1137 - t Math::BigInt::Subclass NaN / -inf ok 1138 - d Math::BigInt::Subclass NaN / -inf ok 1139 - m Math::BigInt::Subclass NaN % -inf ok 1140 - o Math::BigInt::Subclass NaN % -inf ok 1141 - t Math::BigFloat NaN / -inf ok 1142 - d Math::BigFloat NaN / -inf ok 1143 - m Math::BigFloat NaN % -inf ok 1144 - o Math::BigFloat NaN % -inf ok 1145 - t Math::BigFloat::Subclass NaN / -inf ok 1146 - d Math::BigFloat::Subclass NaN / -inf ok 1147 - m Math::BigFloat::Subclass NaN % -inf ok 1148 - o Math::BigFloat::Subclass NaN % -inf ok 1149 - x Math::BigInt -inf / -1 ok 1150 - r Math::BigInt -inf / -1 ok 1151 - t Math::BigInt -inf / -1 ok 1152 - d Math::BigInt -inf / -1 ok 1153 - m Math::BigInt -inf % -1 ok 1154 - o Math::BigInt -inf % -1 ok 1155 - x Math::BigInt::Subclass -inf / -1 ok 1156 - r Math::BigInt::Subclass -inf / -1 ok 1157 - t Math::BigInt::Subclass -inf / -1 ok 1158 - d Math::BigInt::Subclass -inf / -1 ok 1159 - m Math::BigInt::Subclass -inf % -1 ok 1160 - o Math::BigInt::Subclass -inf % -1 ok 1161 - t Math::BigFloat -inf / -1 ok 1162 - d Math::BigFloat -inf / -1 ok 1163 - m Math::BigFloat -inf % -1 ok 1164 - o Math::BigFloat -inf % -1 ok 1165 - t Math::BigFloat::Subclass -inf / -1 ok 1166 - d Math::BigFloat::Subclass -inf / -1 ok 1167 - m Math::BigFloat::Subclass -inf % -1 ok 1168 - o Math::BigFloat::Subclass -inf % -1 ok 1169 - x Math::BigInt -1 / -1 ok 1170 - r Math::BigInt -1 / -1 ok 1171 - t Math::BigInt -1 / -1 ok 1172 - d Math::BigInt -1 / -1 ok 1173 - m Math::BigInt -1 % -1 ok 1174 - o Math::BigInt -1 % -1 ok 1175 - x Math::BigInt::Subclass -1 / -1 ok 1176 - r Math::BigInt::Subclass -1 / -1 ok 1177 - t Math::BigInt::Subclass -1 / -1 ok 1178 - d Math::BigInt::Subclass -1 / -1 ok 1179 - m Math::BigInt::Subclass -1 % -1 ok 1180 - o Math::BigInt::Subclass -1 % -1 ok 1181 - t Math::BigFloat -1 / -1 ok 1182 - d Math::BigFloat -1 / -1 ok 1183 - m Math::BigFloat -1 % -1 ok 1184 - o Math::BigFloat -1 % -1 ok 1185 - t Math::BigFloat::Subclass -1 / -1 ok 1186 - d Math::BigFloat::Subclass -1 / -1 ok 1187 - m Math::BigFloat::Subclass -1 % -1 ok 1188 - o Math::BigFloat::Subclass -1 % -1 ok 1189 - x Math::BigInt -0 / -1 ok 1190 - r Math::BigInt -0 / -1 ok 1191 - t Math::BigInt -0 / -1 ok 1192 - d Math::BigInt -0 / -1 ok 1193 - m Math::BigInt -0 % -1 ok 1194 - o Math::BigInt -0 % -1 ok 1195 - x Math::BigInt::Subclass -0 / -1 ok 1196 - r Math::BigInt::Subclass -0 / -1 ok 1197 - t Math::BigInt::Subclass -0 / -1 ok 1198 - d Math::BigInt::Subclass -0 / -1 ok 1199 - m Math::BigInt::Subclass -0 % -1 ok 1200 - o Math::BigInt::Subclass -0 % -1 ok 1201 - t Math::BigFloat -0 / -1 ok 1202 - d Math::BigFloat -0 / -1 ok 1203 - m Math::BigFloat -0 % -1 ok 1204 - o Math::BigFloat -0 % -1 ok 1205 - t Math::BigFloat::Subclass -0 / -1 ok 1206 - d Math::BigFloat::Subclass -0 / -1 ok 1207 - m Math::BigFloat::Subclass -0 % -1 ok 1208 - o Math::BigFloat::Subclass -0 % -1 ok 1209 - x Math::BigInt 0 / -1 ok 1210 - r Math::BigInt 0 / -1 ok 1211 - t Math::BigInt 0 / -1 ok 1212 - d Math::BigInt 0 / -1 ok 1213 - m Math::BigInt 0 % -1 ok 1214 - o Math::BigInt 0 % -1 ok 1215 - x Math::BigInt::Subclass 0 / -1 ok 1216 - r Math::BigInt::Subclass 0 / -1 ok 1217 - t Math::BigInt::Subclass 0 / -1 ok 1218 - d Math::BigInt::Subclass 0 / -1 ok 1219 - m Math::BigInt::Subclass 0 % -1 ok 1220 - o Math::BigInt::Subclass 0 % -1 ok 1221 - t Math::BigFloat 0 / -1 ok 1222 - d Math::BigFloat 0 / -1 ok 1223 - m Math::BigFloat 0 % -1 ok 1224 - o Math::BigFloat 0 % -1 ok 1225 - t Math::BigFloat::Subclass 0 / -1 ok 1226 - d Math::BigFloat::Subclass 0 / -1 ok 1227 - m Math::BigFloat::Subclass 0 % -1 ok 1228 - o Math::BigFloat::Subclass 0 % -1 ok 1229 - x Math::BigInt 1 / -1 ok 1230 - r Math::BigInt 1 / -1 ok 1231 - t Math::BigInt 1 / -1 ok 1232 - d Math::BigInt 1 / -1 ok 1233 - m Math::BigInt 1 % -1 ok 1234 - o Math::BigInt 1 % -1 ok 1235 - x Math::BigInt::Subclass 1 / -1 ok 1236 - r Math::BigInt::Subclass 1 / -1 ok 1237 - t Math::BigInt::Subclass 1 / -1 ok 1238 - d Math::BigInt::Subclass 1 / -1 ok 1239 - m Math::BigInt::Subclass 1 % -1 ok 1240 - o Math::BigInt::Subclass 1 % -1 ok 1241 - t Math::BigFloat 1 / -1 ok 1242 - d Math::BigFloat 1 / -1 ok 1243 - m Math::BigFloat 1 % -1 ok 1244 - o Math::BigFloat 1 % -1 ok 1245 - t Math::BigFloat::Subclass 1 / -1 ok 1246 - d Math::BigFloat::Subclass 1 / -1 ok 1247 - m Math::BigFloat::Subclass 1 % -1 ok 1248 - o Math::BigFloat::Subclass 1 % -1 ok 1249 - x Math::BigInt inf / -1 ok 1250 - r Math::BigInt inf / -1 ok 1251 - t Math::BigInt inf / -1 ok 1252 - d Math::BigInt inf / -1 ok 1253 - m Math::BigInt inf % -1 ok 1254 - o Math::BigInt inf % -1 ok 1255 - x Math::BigInt::Subclass inf / -1 ok 1256 - r Math::BigInt::Subclass inf / -1 ok 1257 - t Math::BigInt::Subclass inf / -1 ok 1258 - d Math::BigInt::Subclass inf / -1 ok 1259 - m Math::BigInt::Subclass inf % -1 ok 1260 - o Math::BigInt::Subclass inf % -1 ok 1261 - t Math::BigFloat inf / -1 ok 1262 - d Math::BigFloat inf / -1 ok 1263 - m Math::BigFloat inf % -1 ok 1264 - o Math::BigFloat inf % -1 ok 1265 - t Math::BigFloat::Subclass inf / -1 ok 1266 - d Math::BigFloat::Subclass inf / -1 ok 1267 - m Math::BigFloat::Subclass inf % -1 ok 1268 - o Math::BigFloat::Subclass inf % -1 ok 1269 - x Math::BigInt NaN / -1 ok 1270 - r Math::BigInt NaN / -1 ok 1271 - t Math::BigInt NaN / -1 ok 1272 - d Math::BigInt NaN / -1 ok 1273 - m Math::BigInt NaN % -1 ok 1274 - o Math::BigInt NaN % -1 ok 1275 - x Math::BigInt::Subclass NaN / -1 ok 1276 - r Math::BigInt::Subclass NaN / -1 ok 1277 - t Math::BigInt::Subclass NaN / -1 ok 1278 - d Math::BigInt::Subclass NaN / -1 ok 1279 - m Math::BigInt::Subclass NaN % -1 ok 1280 - o Math::BigInt::Subclass NaN % -1 ok 1281 - t Math::BigFloat NaN / -1 ok 1282 - d Math::BigFloat NaN / -1 ok 1283 - m Math::BigFloat NaN % -1 ok 1284 - o Math::BigFloat NaN % -1 ok 1285 - t Math::BigFloat::Subclass NaN / -1 ok 1286 - d Math::BigFloat::Subclass NaN / -1 ok 1287 - m Math::BigFloat::Subclass NaN % -1 ok 1288 - o Math::BigFloat::Subclass NaN % -1 ok 1289 - x Math::BigInt -inf / 0 ok 1290 - r Math::BigInt -inf / 0 ok 1291 - t Math::BigInt -inf / 0 ok 1292 - d Math::BigInt -inf / 0 ok 1293 - m Math::BigInt -inf % 0 ok 1294 - o Math::BigInt -inf % 0 ok 1295 - x Math::BigInt::Subclass -inf / 0 ok 1296 - r Math::BigInt::Subclass -inf / 0 ok 1297 - t Math::BigInt::Subclass -inf / 0 ok 1298 - d Math::BigInt::Subclass -inf / 0 ok 1299 - m Math::BigInt::Subclass -inf % 0 ok 1300 - o Math::BigInt::Subclass -inf % 0 ok 1301 - t Math::BigFloat -inf / 0 ok 1302 - d Math::BigFloat -inf / 0 ok 1303 - m Math::BigFloat -inf % 0 ok 1304 - o Math::BigFloat -inf % 0 ok 1305 - t Math::BigFloat::Subclass -inf / 0 ok 1306 - d Math::BigFloat::Subclass -inf / 0 ok 1307 - m Math::BigFloat::Subclass -inf % 0 ok 1308 - o Math::BigFloat::Subclass -inf % 0 ok 1309 - x Math::BigInt -1 / 0 ok 1310 - r Math::BigInt -1 / 0 ok 1311 - t Math::BigInt -1 / 0 ok 1312 - d Math::BigInt -1 / 0 ok 1313 - m Math::BigInt -1 % 0 ok 1314 - o Math::BigInt -1 % 0 ok 1315 - x Math::BigInt::Subclass -1 / 0 ok 1316 - r Math::BigInt::Subclass -1 / 0 ok 1317 - t Math::BigInt::Subclass -1 / 0 ok 1318 - d Math::BigInt::Subclass -1 / 0 ok 1319 - m Math::BigInt::Subclass -1 % 0 ok 1320 - o Math::BigInt::Subclass -1 % 0 ok 1321 - t Math::BigFloat -1 / 0 ok 1322 - d Math::BigFloat -1 / 0 ok 1323 - m Math::BigFloat -1 % 0 ok 1324 - o Math::BigFloat -1 % 0 ok 1325 - t Math::BigFloat::Subclass -1 / 0 ok 1326 - d Math::BigFloat::Subclass -1 / 0 ok 1327 - m Math::BigFloat::Subclass -1 % 0 ok 1328 - o Math::BigFloat::Subclass -1 % 0 ok 1329 - x Math::BigInt -0 / 0 ok 1330 - r Math::BigInt -0 / 0 ok 1331 - t Math::BigInt -0 / 0 ok 1332 - d Math::BigInt -0 / 0 ok 1333 - m Math::BigInt -0 % 0 ok 1334 - o Math::BigInt -0 % 0 ok 1335 - x Math::BigInt::Subclass -0 / 0 ok 1336 - r Math::BigInt::Subclass -0 / 0 ok 1337 - t Math::BigInt::Subclass -0 / 0 ok 1338 - d Math::BigInt::Subclass -0 / 0 ok 1339 - m Math::BigInt::Subclass -0 % 0 ok 1340 - o Math::BigInt::Subclass -0 % 0 ok 1341 - t Math::BigFloat -0 / 0 ok 1342 - d Math::BigFloat -0 / 0 ok 1343 - m Math::BigFloat -0 % 0 ok 1344 - o Math::BigFloat -0 % 0 ok 1345 - t Math::BigFloat::Subclass -0 / 0 ok 1346 - d Math::BigFloat::Subclass -0 / 0 ok 1347 - m Math::BigFloat::Subclass -0 % 0 ok 1348 - o Math::BigFloat::Subclass -0 % 0 ok 1349 - x Math::BigInt 0 / 0 ok 1350 - r Math::BigInt 0 / 0 ok 1351 - t Math::BigInt 0 / 0 ok 1352 - d Math::BigInt 0 / 0 ok 1353 - m Math::BigInt 0 % 0 ok 1354 - o Math::BigInt 0 % 0 ok 1355 - x Math::BigInt::Subclass 0 / 0 ok 1356 - r Math::BigInt::Subclass 0 / 0 ok 1357 - t Math::BigInt::Subclass 0 / 0 ok 1358 - d Math::BigInt::Subclass 0 / 0 ok 1359 - m Math::BigInt::Subclass 0 % 0 ok 1360 - o Math::BigInt::Subclass 0 % 0 ok 1361 - t Math::BigFloat 0 / 0 ok 1362 - d Math::BigFloat 0 / 0 ok 1363 - m Math::BigFloat 0 % 0 ok 1364 - o Math::BigFloat 0 % 0 ok 1365 - t Math::BigFloat::Subclass 0 / 0 ok 1366 - d Math::BigFloat::Subclass 0 / 0 ok 1367 - m Math::BigFloat::Subclass 0 % 0 ok 1368 - o Math::BigFloat::Subclass 0 % 0 ok 1369 - x Math::BigInt 1 / 0 ok 1370 - r Math::BigInt 1 / 0 ok 1371 - t Math::BigInt 1 / 0 ok 1372 - d Math::BigInt 1 / 0 ok 1373 - m Math::BigInt 1 % 0 ok 1374 - o Math::BigInt 1 % 0 ok 1375 - x Math::BigInt::Subclass 1 / 0 ok 1376 - r Math::BigInt::Subclass 1 / 0 ok 1377 - t Math::BigInt::Subclass 1 / 0 ok 1378 - d Math::BigInt::Subclass 1 / 0 ok 1379 - m Math::BigInt::Subclass 1 % 0 ok 1380 - o Math::BigInt::Subclass 1 % 0 ok 1381 - t Math::BigFloat 1 / 0 ok 1382 - d Math::BigFloat 1 / 0 ok 1383 - m Math::BigFloat 1 % 0 ok 1384 - o Math::BigFloat 1 % 0 ok 1385 - t Math::BigFloat::Subclass 1 / 0 ok 1386 - d Math::BigFloat::Subclass 1 / 0 ok 1387 - m Math::BigFloat::Subclass 1 % 0 ok 1388 - o Math::BigFloat::Subclass 1 % 0 ok 1389 - x Math::BigInt inf / 0 ok 1390 - r Math::BigInt inf / 0 ok 1391 - t Math::BigInt inf / 0 ok 1392 - d Math::BigInt inf / 0 ok 1393 - m Math::BigInt inf % 0 ok 1394 - o Math::BigInt inf % 0 ok 1395 - x Math::BigInt::Subclass inf / 0 ok 1396 - r Math::BigInt::Subclass inf / 0 ok 1397 - t Math::BigInt::Subclass inf / 0 ok 1398 - d Math::BigInt::Subclass inf / 0 ok 1399 - m Math::BigInt::Subclass inf % 0 ok 1400 - o Math::BigInt::Subclass inf % 0 ok 1401 - t Math::BigFloat inf / 0 ok 1402 - d Math::BigFloat inf / 0 ok 1403 - m Math::BigFloat inf % 0 ok 1404 - o Math::BigFloat inf % 0 ok 1405 - t Math::BigFloat::Subclass inf / 0 ok 1406 - d Math::BigFloat::Subclass inf / 0 ok 1407 - m Math::BigFloat::Subclass inf % 0 ok 1408 - o Math::BigFloat::Subclass inf % 0 ok 1409 - x Math::BigInt NaN / 0 ok 1410 - r Math::BigInt NaN / 0 ok 1411 - t Math::BigInt NaN / 0 ok 1412 - d Math::BigInt NaN / 0 ok 1413 - m Math::BigInt NaN % 0 ok 1414 - o Math::BigInt NaN % 0 ok 1415 - x Math::BigInt::Subclass NaN / 0 ok 1416 - r Math::BigInt::Subclass NaN / 0 ok 1417 - t Math::BigInt::Subclass NaN / 0 ok 1418 - d Math::BigInt::Subclass NaN / 0 ok 1419 - m Math::BigInt::Subclass NaN % 0 ok 1420 - o Math::BigInt::Subclass NaN % 0 ok 1421 - t Math::BigFloat NaN / 0 ok 1422 - d Math::BigFloat NaN / 0 ok 1423 - m Math::BigFloat NaN % 0 ok 1424 - o Math::BigFloat NaN % 0 ok 1425 - t Math::BigFloat::Subclass NaN / 0 ok 1426 - d Math::BigFloat::Subclass NaN / 0 ok 1427 - m Math::BigFloat::Subclass NaN % 0 ok 1428 - o Math::BigFloat::Subclass NaN % 0 ok 1429 - x Math::BigInt -inf / 1 ok 1430 - r Math::BigInt -inf / 1 ok 1431 - t Math::BigInt -inf / 1 ok 1432 - d Math::BigInt -inf / 1 ok 1433 - m Math::BigInt -inf % 1 ok 1434 - o Math::BigInt -inf % 1 ok 1435 - x Math::BigInt::Subclass -inf / 1 ok 1436 - r Math::BigInt::Subclass -inf / 1 ok 1437 - t Math::BigInt::Subclass -inf / 1 ok 1438 - d Math::BigInt::Subclass -inf / 1 ok 1439 - m Math::BigInt::Subclass -inf % 1 ok 1440 - o Math::BigInt::Subclass -inf % 1 ok 1441 - t Math::BigFloat -inf / 1 ok 1442 - d Math::BigFloat -inf / 1 ok 1443 - m Math::BigFloat -inf % 1 ok 1444 - o Math::BigFloat -inf % 1 ok 1445 - t Math::BigFloat::Subclass -inf / 1 ok 1446 - d Math::BigFloat::Subclass -inf / 1 ok 1447 - m Math::BigFloat::Subclass -inf % 1 ok 1448 - o Math::BigFloat::Subclass -inf % 1 ok 1449 - x Math::BigInt -1 / 1 ok 1450 - r Math::BigInt -1 / 1 ok 1451 - t Math::BigInt -1 / 1 ok 1452 - d Math::BigInt -1 / 1 ok 1453 - m Math::BigInt -1 % 1 ok 1454 - o Math::BigInt -1 % 1 ok 1455 - x Math::BigInt::Subclass -1 / 1 ok 1456 - r Math::BigInt::Subclass -1 / 1 ok 1457 - t Math::BigInt::Subclass -1 / 1 ok 1458 - d Math::BigInt::Subclass -1 / 1 ok 1459 - m Math::BigInt::Subclass -1 % 1 ok 1460 - o Math::BigInt::Subclass -1 % 1 ok 1461 - t Math::BigFloat -1 / 1 ok 1462 - d Math::BigFloat -1 / 1 ok 1463 - m Math::BigFloat -1 % 1 ok 1464 - o Math::BigFloat -1 % 1 ok 1465 - t Math::BigFloat::Subclass -1 / 1 ok 1466 - d Math::BigFloat::Subclass -1 / 1 ok 1467 - m Math::BigFloat::Subclass -1 % 1 ok 1468 - o Math::BigFloat::Subclass -1 % 1 ok 1469 - x Math::BigInt -0 / 1 ok 1470 - r Math::BigInt -0 / 1 ok 1471 - t Math::BigInt -0 / 1 ok 1472 - d Math::BigInt -0 / 1 ok 1473 - m Math::BigInt -0 % 1 ok 1474 - o Math::BigInt -0 % 1 ok 1475 - x Math::BigInt::Subclass -0 / 1 ok 1476 - r Math::BigInt::Subclass -0 / 1 ok 1477 - t Math::BigInt::Subclass -0 / 1 ok 1478 - d Math::BigInt::Subclass -0 / 1 ok 1479 - m Math::BigInt::Subclass -0 % 1 ok 1480 - o Math::BigInt::Subclass -0 % 1 ok 1481 - t Math::BigFloat -0 / 1 ok 1482 - d Math::BigFloat -0 / 1 ok 1483 - m Math::BigFloat -0 % 1 ok 1484 - o Math::BigFloat -0 % 1 ok 1485 - t Math::BigFloat::Subclass -0 / 1 ok 1486 - d Math::BigFloat::Subclass -0 / 1 ok 1487 - m Math::BigFloat::Subclass -0 % 1 ok 1488 - o Math::BigFloat::Subclass -0 % 1 ok 1489 - x Math::BigInt 0 / 1 ok 1490 - r Math::BigInt 0 / 1 ok 1491 - t Math::BigInt 0 / 1 ok 1492 - d Math::BigInt 0 / 1 ok 1493 - m Math::BigInt 0 % 1 ok 1494 - o Math::BigInt 0 % 1 ok 1495 - x Math::BigInt::Subclass 0 / 1 ok 1496 - r Math::BigInt::Subclass 0 / 1 ok 1497 - t Math::BigInt::Subclass 0 / 1 ok 1498 - d Math::BigInt::Subclass 0 / 1 ok 1499 - m Math::BigInt::Subclass 0 % 1 ok 1500 - o Math::BigInt::Subclass 0 % 1 ok 1501 - t Math::BigFloat 0 / 1 ok 1502 - d Math::BigFloat 0 / 1 ok 1503 - m Math::BigFloat 0 % 1 ok 1504 - o Math::BigFloat 0 % 1 ok 1505 - t Math::BigFloat::Subclass 0 / 1 ok 1506 - d Math::BigFloat::Subclass 0 / 1 ok 1507 - m Math::BigFloat::Subclass 0 % 1 ok 1508 - o Math::BigFloat::Subclass 0 % 1 ok 1509 - x Math::BigInt 1 / 1 ok 1510 - r Math::BigInt 1 / 1 ok 1511 - t Math::BigInt 1 / 1 ok 1512 - d Math::BigInt 1 / 1 ok 1513 - m Math::BigInt 1 % 1 ok 1514 - o Math::BigInt 1 % 1 ok 1515 - x Math::BigInt::Subclass 1 / 1 ok 1516 - r Math::BigInt::Subclass 1 / 1 ok 1517 - t Math::BigInt::Subclass 1 / 1 ok 1518 - d Math::BigInt::Subclass 1 / 1 ok 1519 - m Math::BigInt::Subclass 1 % 1 ok 1520 - o Math::BigInt::Subclass 1 % 1 ok 1521 - t Math::BigFloat 1 / 1 ok 1522 - d Math::BigFloat 1 / 1 ok 1523 - m Math::BigFloat 1 % 1 ok 1524 - o Math::BigFloat 1 % 1 ok 1525 - t Math::BigFloat::Subclass 1 / 1 ok 1526 - d Math::BigFloat::Subclass 1 / 1 ok 1527 - m Math::BigFloat::Subclass 1 % 1 ok 1528 - o Math::BigFloat::Subclass 1 % 1 ok 1529 - x Math::BigInt inf / 1 ok 1530 - r Math::BigInt inf / 1 ok 1531 - t Math::BigInt inf / 1 ok 1532 - d Math::BigInt inf / 1 ok 1533 - m Math::BigInt inf % 1 ok 1534 - o Math::BigInt inf % 1 ok 1535 - x Math::BigInt::Subclass inf / 1 ok 1536 - r Math::BigInt::Subclass inf / 1 ok 1537 - t Math::BigInt::Subclass inf / 1 ok 1538 - d Math::BigInt::Subclass inf / 1 ok 1539 - m Math::BigInt::Subclass inf % 1 ok 1540 - o Math::BigInt::Subclass inf % 1 ok 1541 - t Math::BigFloat inf / 1 ok 1542 - d Math::BigFloat inf / 1 ok 1543 - m Math::BigFloat inf % 1 ok 1544 - o Math::BigFloat inf % 1 ok 1545 - t Math::BigFloat::Subclass inf / 1 ok 1546 - d Math::BigFloat::Subclass inf / 1 ok 1547 - m Math::BigFloat::Subclass inf % 1 ok 1548 - o Math::BigFloat::Subclass inf % 1 ok 1549 - x Math::BigInt NaN / 1 ok 1550 - r Math::BigInt NaN / 1 ok 1551 - t Math::BigInt NaN / 1 ok 1552 - d Math::BigInt NaN / 1 ok 1553 - m Math::BigInt NaN % 1 ok 1554 - o Math::BigInt NaN % 1 ok 1555 - x Math::BigInt::Subclass NaN / 1 ok 1556 - r Math::BigInt::Subclass NaN / 1 ok 1557 - t Math::BigInt::Subclass NaN / 1 ok 1558 - d Math::BigInt::Subclass NaN / 1 ok 1559 - m Math::BigInt::Subclass NaN % 1 ok 1560 - o Math::BigInt::Subclass NaN % 1 ok 1561 - t Math::BigFloat NaN / 1 ok 1562 - d Math::BigFloat NaN / 1 ok 1563 - m Math::BigFloat NaN % 1 ok 1564 - o Math::BigFloat NaN % 1 ok 1565 - t Math::BigFloat::Subclass NaN / 1 ok 1566 - d Math::BigFloat::Subclass NaN / 1 ok 1567 - m Math::BigFloat::Subclass NaN % 1 ok 1568 - o Math::BigFloat::Subclass NaN % 1 ok 1569 - x Math::BigInt -inf / inf ok 1570 - r Math::BigInt -inf / inf ok 1571 - t Math::BigInt -inf / inf ok 1572 - d Math::BigInt -inf / inf ok 1573 - m Math::BigInt -inf % inf ok 1574 - o Math::BigInt -inf % inf ok 1575 - x Math::BigInt::Subclass -inf / inf ok 1576 - r Math::BigInt::Subclass -inf / inf ok 1577 - t Math::BigInt::Subclass -inf / inf ok 1578 - d Math::BigInt::Subclass -inf / inf ok 1579 - m Math::BigInt::Subclass -inf % inf ok 1580 - o Math::BigInt::Subclass -inf % inf ok 1581 - t Math::BigFloat -inf / inf ok 1582 - d Math::BigFloat -inf / inf ok 1583 - m Math::BigFloat -inf % inf ok 1584 - o Math::BigFloat -inf % inf ok 1585 - t Math::BigFloat::Subclass -inf / inf ok 1586 - d Math::BigFloat::Subclass -inf / inf ok 1587 - m Math::BigFloat::Subclass -inf % inf ok 1588 - o Math::BigFloat::Subclass -inf % inf ok 1589 - x Math::BigInt -1 / inf ok 1590 - r Math::BigInt -1 / inf ok 1591 - t Math::BigInt -1 / inf ok 1592 - d Math::BigInt -1 / inf ok 1593 - m Math::BigInt -1 % inf ok 1594 - o Math::BigInt -1 % inf ok 1595 - x Math::BigInt::Subclass -1 / inf ok 1596 - r Math::BigInt::Subclass -1 / inf ok 1597 - t Math::BigInt::Subclass -1 / inf ok 1598 - d Math::BigInt::Subclass -1 / inf ok 1599 - m Math::BigInt::Subclass -1 % inf ok 1600 - o Math::BigInt::Subclass -1 % inf ok 1601 - t Math::BigFloat -1 / inf ok 1602 - d Math::BigFloat -1 / inf ok 1603 - m Math::BigFloat -1 % inf ok 1604 - o Math::BigFloat -1 % inf ok 1605 - t Math::BigFloat::Subclass -1 / inf ok 1606 - d Math::BigFloat::Subclass -1 / inf ok 1607 - m Math::BigFloat::Subclass -1 % inf ok 1608 - o Math::BigFloat::Subclass -1 % inf ok 1609 - x Math::BigInt -0 / inf ok 1610 - r Math::BigInt -0 / inf ok 1611 - t Math::BigInt -0 / inf ok 1612 - d Math::BigInt -0 / inf ok 1613 - m Math::BigInt -0 % inf ok 1614 - o Math::BigInt -0 % inf ok 1615 - x Math::BigInt::Subclass -0 / inf ok 1616 - r Math::BigInt::Subclass -0 / inf ok 1617 - t Math::BigInt::Subclass -0 / inf ok 1618 - d Math::BigInt::Subclass -0 / inf ok 1619 - m Math::BigInt::Subclass -0 % inf ok 1620 - o Math::BigInt::Subclass -0 % inf ok 1621 - t Math::BigFloat -0 / inf ok 1622 - d Math::BigFloat -0 / inf ok 1623 - m Math::BigFloat -0 % inf ok 1624 - o Math::BigFloat -0 % inf ok 1625 - t Math::BigFloat::Subclass -0 / inf ok 1626 - d Math::BigFloat::Subclass -0 / inf ok 1627 - m Math::BigFloat::Subclass -0 % inf ok 1628 - o Math::BigFloat::Subclass -0 % inf ok 1629 - x Math::BigInt 0 / inf ok 1630 - r Math::BigInt 0 / inf ok 1631 - t Math::BigInt 0 / inf ok 1632 - d Math::BigInt 0 / inf ok 1633 - m Math::BigInt 0 % inf ok 1634 - o Math::BigInt 0 % inf ok 1635 - x Math::BigInt::Subclass 0 / inf ok 1636 - r Math::BigInt::Subclass 0 / inf ok 1637 - t Math::BigInt::Subclass 0 / inf ok 1638 - d Math::BigInt::Subclass 0 / inf ok 1639 - m Math::BigInt::Subclass 0 % inf ok 1640 - o Math::BigInt::Subclass 0 % inf ok 1641 - t Math::BigFloat 0 / inf ok 1642 - d Math::BigFloat 0 / inf ok 1643 - m Math::BigFloat 0 % inf ok 1644 - o Math::BigFloat 0 % inf ok 1645 - t Math::BigFloat::Subclass 0 / inf ok 1646 - d Math::BigFloat::Subclass 0 / inf ok 1647 - m Math::BigFloat::Subclass 0 % inf ok 1648 - o Math::BigFloat::Subclass 0 % inf ok 1649 - x Math::BigInt 1 / inf ok 1650 - r Math::BigInt 1 / inf ok 1651 - t Math::BigInt 1 / inf ok 1652 - d Math::BigInt 1 / inf ok 1653 - m Math::BigInt 1 % inf ok 1654 - o Math::BigInt 1 % inf ok 1655 - x Math::BigInt::Subclass 1 / inf ok 1656 - r Math::BigInt::Subclass 1 / inf ok 1657 - t Math::BigInt::Subclass 1 / inf ok 1658 - d Math::BigInt::Subclass 1 / inf ok 1659 - m Math::BigInt::Subclass 1 % inf ok 1660 - o Math::BigInt::Subclass 1 % inf ok 1661 - t Math::BigFloat 1 / inf ok 1662 - d Math::BigFloat 1 / inf ok 1663 - m Math::BigFloat 1 % inf ok 1664 - o Math::BigFloat 1 % inf ok 1665 - t Math::BigFloat::Subclass 1 / inf ok 1666 - d Math::BigFloat::Subclass 1 / inf ok 1667 - m Math::BigFloat::Subclass 1 % inf ok 1668 - o Math::BigFloat::Subclass 1 % inf ok 1669 - x Math::BigInt inf / inf ok 1670 - r Math::BigInt inf / inf ok 1671 - t Math::BigInt inf / inf ok 1672 - d Math::BigInt inf / inf ok 1673 - m Math::BigInt inf % inf ok 1674 - o Math::BigInt inf % inf ok 1675 - x Math::BigInt::Subclass inf / inf ok 1676 - r Math::BigInt::Subclass inf / inf ok 1677 - t Math::BigInt::Subclass inf / inf ok 1678 - d Math::BigInt::Subclass inf / inf ok 1679 - m Math::BigInt::Subclass inf % inf ok 1680 - o Math::BigInt::Subclass inf % inf ok 1681 - t Math::BigFloat inf / inf ok 1682 - d Math::BigFloat inf / inf ok 1683 - m Math::BigFloat inf % inf ok 1684 - o Math::BigFloat inf % inf ok 1685 - t Math::BigFloat::Subclass inf / inf ok 1686 - d Math::BigFloat::Subclass inf / inf ok 1687 - m Math::BigFloat::Subclass inf % inf ok 1688 - o Math::BigFloat::Subclass inf % inf ok 1689 - x Math::BigInt NaN / inf ok 1690 - r Math::BigInt NaN / inf ok 1691 - t Math::BigInt NaN / inf ok 1692 - d Math::BigInt NaN / inf ok 1693 - m Math::BigInt NaN % inf ok 1694 - o Math::BigInt NaN % inf ok 1695 - x Math::BigInt::Subclass NaN / inf ok 1696 - r Math::BigInt::Subclass NaN / inf ok 1697 - t Math::BigInt::Subclass NaN / inf ok 1698 - d Math::BigInt::Subclass NaN / inf ok 1699 - m Math::BigInt::Subclass NaN % inf ok 1700 - o Math::BigInt::Subclass NaN % inf ok 1701 - t Math::BigFloat NaN / inf ok 1702 - d Math::BigFloat NaN / inf ok 1703 - m Math::BigFloat NaN % inf ok 1704 - o Math::BigFloat NaN % inf ok 1705 - t Math::BigFloat::Subclass NaN / inf ok 1706 - d Math::BigFloat::Subclass NaN / inf ok 1707 - m Math::BigFloat::Subclass NaN % inf ok 1708 - o Math::BigFloat::Subclass NaN % inf ok 1709 - x Math::BigInt -inf / NaN ok 1710 - r Math::BigInt -inf / NaN ok 1711 - t Math::BigInt -inf / NaN ok 1712 - d Math::BigInt -inf / NaN ok 1713 - m Math::BigInt -inf % NaN ok 1714 - o Math::BigInt -inf % NaN ok 1715 - x Math::BigInt::Subclass -inf / NaN ok 1716 - r Math::BigInt::Subclass -inf / NaN ok 1717 - t Math::BigInt::Subclass -inf / NaN ok 1718 - d Math::BigInt::Subclass -inf / NaN ok 1719 - m Math::BigInt::Subclass -inf % NaN ok 1720 - o Math::BigInt::Subclass -inf % NaN ok 1721 - t Math::BigFloat -inf / NaN ok 1722 - d Math::BigFloat -inf / NaN ok 1723 - m Math::BigFloat -inf % NaN ok 1724 - o Math::BigFloat -inf % NaN ok 1725 - t Math::BigFloat::Subclass -inf / NaN ok 1726 - d Math::BigFloat::Subclass -inf / NaN ok 1727 - m Math::BigFloat::Subclass -inf % NaN ok 1728 - o Math::BigFloat::Subclass -inf % NaN ok 1729 - x Math::BigInt -1 / NaN ok 1730 - r Math::BigInt -1 / NaN ok 1731 - t Math::BigInt -1 / NaN ok 1732 - d Math::BigInt -1 / NaN ok 1733 - m Math::BigInt -1 % NaN ok 1734 - o Math::BigInt -1 % NaN ok 1735 - x Math::BigInt::Subclass -1 / NaN ok 1736 - r Math::BigInt::Subclass -1 / NaN ok 1737 - t Math::BigInt::Subclass -1 / NaN ok 1738 - d Math::BigInt::Subclass -1 / NaN ok 1739 - m Math::BigInt::Subclass -1 % NaN ok 1740 - o Math::BigInt::Subclass -1 % NaN ok 1741 - t Math::BigFloat -1 / NaN ok 1742 - d Math::BigFloat -1 / NaN ok 1743 - m Math::BigFloat -1 % NaN ok 1744 - o Math::BigFloat -1 % NaN ok 1745 - t Math::BigFloat::Subclass -1 / NaN ok 1746 - d Math::BigFloat::Subclass -1 / NaN ok 1747 - m Math::BigFloat::Subclass -1 % NaN ok 1748 - o Math::BigFloat::Subclass -1 % NaN ok 1749 - x Math::BigInt -0 / NaN ok 1750 - r Math::BigInt -0 / NaN ok 1751 - t Math::BigInt -0 / NaN ok 1752 - d Math::BigInt -0 / NaN ok 1753 - m Math::BigInt -0 % NaN ok 1754 - o Math::BigInt -0 % NaN ok 1755 - x Math::BigInt::Subclass -0 / NaN ok 1756 - r Math::BigInt::Subclass -0 / NaN ok 1757 - t Math::BigInt::Subclass -0 / NaN ok 1758 - d Math::BigInt::Subclass -0 / NaN ok 1759 - m Math::BigInt::Subclass -0 % NaN ok 1760 - o Math::BigInt::Subclass -0 % NaN ok 1761 - t Math::BigFloat -0 / NaN ok 1762 - d Math::BigFloat -0 / NaN ok 1763 - m Math::BigFloat -0 % NaN ok 1764 - o Math::BigFloat -0 % NaN ok 1765 - t Math::BigFloat::Subclass -0 / NaN ok 1766 - d Math::BigFloat::Subclass -0 / NaN ok 1767 - m Math::BigFloat::Subclass -0 % NaN ok 1768 - o Math::BigFloat::Subclass -0 % NaN ok 1769 - x Math::BigInt 0 / NaN ok 1770 - r Math::BigInt 0 / NaN ok 1771 - t Math::BigInt 0 / NaN ok 1772 - d Math::BigInt 0 / NaN ok 1773 - m Math::BigInt 0 % NaN ok 1774 - o Math::BigInt 0 % NaN ok 1775 - x Math::BigInt::Subclass 0 / NaN ok 1776 - r Math::BigInt::Subclass 0 / NaN ok 1777 - t Math::BigInt::Subclass 0 / NaN ok 1778 - d Math::BigInt::Subclass 0 / NaN ok 1779 - m Math::BigInt::Subclass 0 % NaN ok 1780 - o Math::BigInt::Subclass 0 % NaN ok 1781 - t Math::BigFloat 0 / NaN ok 1782 - d Math::BigFloat 0 / NaN ok 1783 - m Math::BigFloat 0 % NaN ok 1784 - o Math::BigFloat 0 % NaN ok 1785 - t Math::BigFloat::Subclass 0 / NaN ok 1786 - d Math::BigFloat::Subclass 0 / NaN ok 1787 - m Math::BigFloat::Subclass 0 % NaN ok 1788 - o Math::BigFloat::Subclass 0 % NaN ok 1789 - x Math::BigInt 1 / NaN ok 1790 - r Math::BigInt 1 / NaN ok 1791 - t Math::BigInt 1 / NaN ok 1792 - d Math::BigInt 1 / NaN ok 1793 - m Math::BigInt 1 % NaN ok 1794 - o Math::BigInt 1 % NaN ok 1795 - x Math::BigInt::Subclass 1 / NaN ok 1796 - r Math::BigInt::Subclass 1 / NaN ok 1797 - t Math::BigInt::Subclass 1 / NaN ok 1798 - d Math::BigInt::Subclass 1 / NaN ok 1799 - m Math::BigInt::Subclass 1 % NaN ok 1800 - o Math::BigInt::Subclass 1 % NaN ok 1801 - t Math::BigFloat 1 / NaN ok 1802 - d Math::BigFloat 1 / NaN ok 1803 - m Math::BigFloat 1 % NaN ok 1804 - o Math::BigFloat 1 % NaN ok 1805 - t Math::BigFloat::Subclass 1 / NaN ok 1806 - d Math::BigFloat::Subclass 1 / NaN ok 1807 - m Math::BigFloat::Subclass 1 % NaN ok 1808 - o Math::BigFloat::Subclass 1 % NaN ok 1809 - x Math::BigInt inf / NaN ok 1810 - r Math::BigInt inf / NaN ok 1811 - t Math::BigInt inf / NaN ok 1812 - d Math::BigInt inf / NaN ok 1813 - m Math::BigInt inf % NaN ok 1814 - o Math::BigInt inf % NaN ok 1815 - x Math::BigInt::Subclass inf / NaN ok 1816 - r Math::BigInt::Subclass inf / NaN ok 1817 - t Math::BigInt::Subclass inf / NaN ok 1818 - d Math::BigInt::Subclass inf / NaN ok 1819 - m Math::BigInt::Subclass inf % NaN ok 1820 - o Math::BigInt::Subclass inf % NaN ok 1821 - t Math::BigFloat inf / NaN ok 1822 - d Math::BigFloat inf / NaN ok 1823 - m Math::BigFloat inf % NaN ok 1824 - o Math::BigFloat inf % NaN ok 1825 - t Math::BigFloat::Subclass inf / NaN ok 1826 - d Math::BigFloat::Subclass inf / NaN ok 1827 - m Math::BigFloat::Subclass inf % NaN ok 1828 - o Math::BigFloat::Subclass inf % NaN ok 1829 - x Math::BigInt NaN / NaN ok 1830 - r Math::BigInt NaN / NaN ok 1831 - t Math::BigInt NaN / NaN ok 1832 - d Math::BigInt NaN / NaN ok 1833 - m Math::BigInt NaN % NaN ok 1834 - o Math::BigInt NaN % NaN ok 1835 - x Math::BigInt::Subclass NaN / NaN ok 1836 - r Math::BigInt::Subclass NaN / NaN ok 1837 - t Math::BigInt::Subclass NaN / NaN ok 1838 - d Math::BigInt::Subclass NaN / NaN ok 1839 - m Math::BigInt::Subclass NaN % NaN ok 1840 - o Math::BigInt::Subclass NaN % NaN ok 1841 - t Math::BigFloat NaN / NaN ok 1842 - d Math::BigFloat NaN / NaN ok 1843 - m Math::BigFloat NaN % NaN ok 1844 - o Math::BigFloat NaN % NaN ok 1845 - t Math::BigFloat::Subclass NaN / NaN ok 1846 - d Math::BigFloat::Subclass NaN / NaN ok 1847 - m Math::BigFloat::Subclass NaN % NaN ok 1848 - o Math::BigFloat::Subclass NaN % NaN ok 1849 - x Math::BigFloat -inf / -inf ok 1850 - r Math::BigFloat -inf / -inf ok 1851 - x Math::BigFloat::Subclass -inf / -inf ok 1852 - r Math::BigFloat::Subclass -inf / -inf ok 1853 - x Math::BigFloat -1 / -inf ok 1854 - r Math::BigFloat -1 / -inf ok 1855 - x Math::BigFloat::Subclass -1 / -inf ok 1856 - r Math::BigFloat::Subclass -1 / -inf ok 1857 - x Math::BigFloat -0 / -inf ok 1858 - r Math::BigFloat -0 / -inf ok 1859 - x Math::BigFloat::Subclass -0 / -inf ok 1860 - r Math::BigFloat::Subclass -0 / -inf ok 1861 - x Math::BigFloat 0 / -inf ok 1862 - r Math::BigFloat 0 / -inf ok 1863 - x Math::BigFloat::Subclass 0 / -inf ok 1864 - r Math::BigFloat::Subclass 0 / -inf ok 1865 - x Math::BigFloat 1 / -inf ok 1866 - r Math::BigFloat 1 / -inf ok 1867 - x Math::BigFloat::Subclass 1 / -inf ok 1868 - r Math::BigFloat::Subclass 1 / -inf ok 1869 - x Math::BigFloat inf / -inf ok 1870 - r Math::BigFloat inf / -inf ok 1871 - x Math::BigFloat::Subclass inf / -inf ok 1872 - r Math::BigFloat::Subclass inf / -inf ok 1873 - x Math::BigFloat NaN / -inf ok 1874 - r Math::BigFloat NaN / -inf ok 1875 - x Math::BigFloat::Subclass NaN / -inf ok 1876 - r Math::BigFloat::Subclass NaN / -inf ok 1877 - x Math::BigFloat -inf / -1 ok 1878 - r Math::BigFloat -inf / -1 ok 1879 - x Math::BigFloat::Subclass -inf / -1 ok 1880 - r Math::BigFloat::Subclass -inf / -1 ok 1881 - x Math::BigFloat -1 / -1 ok 1882 - r Math::BigFloat -1 / -1 ok 1883 - x Math::BigFloat::Subclass -1 / -1 ok 1884 - r Math::BigFloat::Subclass -1 / -1 ok 1885 - x Math::BigFloat -0 / -1 ok 1886 - r Math::BigFloat -0 / -1 ok 1887 - x Math::BigFloat::Subclass -0 / -1 ok 1888 - r Math::BigFloat::Subclass -0 / -1 ok 1889 - x Math::BigFloat 0 / -1 ok 1890 - r Math::BigFloat 0 / -1 ok 1891 - x Math::BigFloat::Subclass 0 / -1 ok 1892 - r Math::BigFloat::Subclass 0 / -1 ok 1893 - x Math::BigFloat 1 / -1 ok 1894 - r Math::BigFloat 1 / -1 ok 1895 - x Math::BigFloat::Subclass 1 / -1 ok 1896 - r Math::BigFloat::Subclass 1 / -1 ok 1897 - x Math::BigFloat inf / -1 ok 1898 - r Math::BigFloat inf / -1 ok 1899 - x Math::BigFloat::Subclass inf / -1 ok 1900 - r Math::BigFloat::Subclass inf / -1 ok 1901 - x Math::BigFloat NaN / -1 ok 1902 - r Math::BigFloat NaN / -1 ok 1903 - x Math::BigFloat::Subclass NaN / -1 ok 1904 - r Math::BigFloat::Subclass NaN / -1 ok 1905 - x Math::BigFloat -inf / 0 ok 1906 - r Math::BigFloat -inf / 0 ok 1907 - x Math::BigFloat::Subclass -inf / 0 ok 1908 - r Math::BigFloat::Subclass -inf / 0 ok 1909 - x Math::BigFloat -1 / 0 ok 1910 - r Math::BigFloat -1 / 0 ok 1911 - x Math::BigFloat::Subclass -1 / 0 ok 1912 - r Math::BigFloat::Subclass -1 / 0 ok 1913 - x Math::BigFloat -0 / 0 ok 1914 - r Math::BigFloat -0 / 0 ok 1915 - x Math::BigFloat::Subclass -0 / 0 ok 1916 - r Math::BigFloat::Subclass -0 / 0 ok 1917 - x Math::BigFloat 0 / 0 ok 1918 - r Math::BigFloat 0 / 0 ok 1919 - x Math::BigFloat::Subclass 0 / 0 ok 1920 - r Math::BigFloat::Subclass 0 / 0 ok 1921 - x Math::BigFloat 1 / 0 ok 1922 - r Math::BigFloat 1 / 0 ok 1923 - x Math::BigFloat::Subclass 1 / 0 ok 1924 - r Math::BigFloat::Subclass 1 / 0 ok 1925 - x Math::BigFloat inf / 0 ok 1926 - r Math::BigFloat inf / 0 ok 1927 - x Math::BigFloat::Subclass inf / 0 ok 1928 - r Math::BigFloat::Subclass inf / 0 ok 1929 - x Math::BigFloat NaN / 0 ok 1930 - r Math::BigFloat NaN / 0 ok 1931 - x Math::BigFloat::Subclass NaN / 0 ok 1932 - r Math::BigFloat::Subclass NaN / 0 ok 1933 - x Math::BigFloat -inf / 1 ok 1934 - r Math::BigFloat -inf / 1 ok 1935 - x Math::BigFloat::Subclass -inf / 1 ok 1936 - r Math::BigFloat::Subclass -inf / 1 ok 1937 - x Math::BigFloat -1 / 1 ok 1938 - r Math::BigFloat -1 / 1 ok 1939 - x Math::BigFloat::Subclass -1 / 1 ok 1940 - r Math::BigFloat::Subclass -1 / 1 ok 1941 - x Math::BigFloat -0 / 1 ok 1942 - r Math::BigFloat -0 / 1 ok 1943 - x Math::BigFloat::Subclass -0 / 1 ok 1944 - r Math::BigFloat::Subclass -0 / 1 ok 1945 - x Math::BigFloat 0 / 1 ok 1946 - r Math::BigFloat 0 / 1 ok 1947 - x Math::BigFloat::Subclass 0 / 1 ok 1948 - r Math::BigFloat::Subclass 0 / 1 ok 1949 - x Math::BigFloat 1 / 1 ok 1950 - r Math::BigFloat 1 / 1 ok 1951 - x Math::BigFloat::Subclass 1 / 1 ok 1952 - r Math::BigFloat::Subclass 1 / 1 ok 1953 - x Math::BigFloat inf / 1 ok 1954 - r Math::BigFloat inf / 1 ok 1955 - x Math::BigFloat::Subclass inf / 1 ok 1956 - r Math::BigFloat::Subclass inf / 1 ok 1957 - x Math::BigFloat NaN / 1 ok 1958 - r Math::BigFloat NaN / 1 ok 1959 - x Math::BigFloat::Subclass NaN / 1 ok 1960 - r Math::BigFloat::Subclass NaN / 1 ok 1961 - x Math::BigFloat -inf / inf ok 1962 - r Math::BigFloat -inf / inf ok 1963 - x Math::BigFloat::Subclass -inf / inf ok 1964 - r Math::BigFloat::Subclass -inf / inf ok 1965 - x Math::BigFloat -1 / inf ok 1966 - r Math::BigFloat -1 / inf ok 1967 - x Math::BigFloat::Subclass -1 / inf ok 1968 - r Math::BigFloat::Subclass -1 / inf ok 1969 - x Math::BigFloat -0 / inf ok 1970 - r Math::BigFloat -0 / inf ok 1971 - x Math::BigFloat::Subclass -0 / inf ok 1972 - r Math::BigFloat::Subclass -0 / inf ok 1973 - x Math::BigFloat 0 / inf ok 1974 - r Math::BigFloat 0 / inf ok 1975 - x Math::BigFloat::Subclass 0 / inf ok 1976 - r Math::BigFloat::Subclass 0 / inf ok 1977 - x Math::BigFloat 1 / inf ok 1978 - r Math::BigFloat 1 / inf ok 1979 - x Math::BigFloat::Subclass 1 / inf ok 1980 - r Math::BigFloat::Subclass 1 / inf ok 1981 - x Math::BigFloat inf / inf ok 1982 - r Math::BigFloat inf / inf ok 1983 - x Math::BigFloat::Subclass inf / inf ok 1984 - r Math::BigFloat::Subclass inf / inf ok 1985 - x Math::BigFloat NaN / inf ok 1986 - r Math::BigFloat NaN / inf ok 1987 - x Math::BigFloat::Subclass NaN / inf ok 1988 - r Math::BigFloat::Subclass NaN / inf ok 1989 - x Math::BigFloat -inf / NaN ok 1990 - r Math::BigFloat -inf / NaN ok 1991 - x Math::BigFloat::Subclass -inf / NaN ok 1992 - r Math::BigFloat::Subclass -inf / NaN ok 1993 - x Math::BigFloat -1 / NaN ok 1994 - r Math::BigFloat -1 / NaN ok 1995 - x Math::BigFloat::Subclass -1 / NaN ok 1996 - r Math::BigFloat::Subclass -1 / NaN ok 1997 - x Math::BigFloat -0 / NaN ok 1998 - r Math::BigFloat -0 / NaN ok 1999 - x Math::BigFloat::Subclass -0 / NaN ok 2000 - r Math::BigFloat::Subclass -0 / NaN ok 2001 - x Math::BigFloat 0 / NaN ok 2002 - r Math::BigFloat 0 / NaN ok 2003 - x Math::BigFloat::Subclass 0 / NaN ok 2004 - r Math::BigFloat::Subclass 0 / NaN ok 2005 - x Math::BigFloat 1 / NaN ok 2006 - r Math::BigFloat 1 / NaN ok 2007 - x Math::BigFloat::Subclass 1 / NaN ok 2008 - r Math::BigFloat::Subclass 1 / NaN ok 2009 - x Math::BigFloat inf / NaN ok 2010 - r Math::BigFloat inf / NaN ok 2011 - x Math::BigFloat::Subclass inf / NaN ok 2012 - r Math::BigFloat::Subclass inf / NaN ok 2013 - x Math::BigFloat NaN / NaN ok 2014 - r Math::BigFloat NaN / NaN ok 2015 - x Math::BigFloat::Subclass NaN / NaN ok 2016 - r Math::BigFloat::Subclass NaN / NaN ok 2017 - NaN == NaN: "" ok 2018 - NaN != NaN: 1 ok 2019 - NaN == NaN: "" ok 2020 - NaN != NaN: 1 ok 2021 - 0 != NaN: 1 ok 2022 - 0 == NaN: "" ok 2023 - 0 < NaN: "" ok 2024 - 0 <= NaN: "" ok 2025 - 0 >= NaN: "" ok 2026 - NaN == NaN: "" ok 2027 - NaN != NaN: 1 ok 2028 - NaN == NaN: "" ok 2029 - NaN != NaN: 1 ok 2030 - 0 != NaN: 1 ok 2031 - 0 == NaN: "" ok 2032 - 0 < NaN: "" ok 2033 - 0 <= NaN: "" ok 2034 - 0 >= NaN: "" ok 2035 - NaN == NaN: "" ok 2036 - NaN != NaN: 1 ok 2037 - NaN == NaN: "" ok 2038 - NaN != NaN: 1 ok 2039 - 0 != NaN: 1 ok 2040 - 0 == NaN: "" ok 2041 - 0 < NaN: "" ok 2042 - 0 <= NaN: "" ok 2043 - 0 >= NaN: "" ok 2044 - NaN == NaN: "" ok 2045 - NaN != NaN: 1 ok 2046 - NaN == NaN: "" ok 2047 - NaN != NaN: 1 ok 2048 - 0 != NaN: 1 ok 2049 - 0 == NaN: "" ok 2050 - 0 < NaN: "" ok 2051 - 0 <= NaN: "" ok 2052 - 0 >= NaN: "" ok t\isa.t ................ 1..11 ok 1 - An object of class 'Math::BigInt::Subclass' isa 'Math::BigInt' ok 2 - An object of class 'Math::BigInt' isa 'Math::BigInt' ok 3 - A Math::BigFloat isn't a Math::BigInt ok 4 - ref($x) = "Math::BigInt" ok 5 - An object of class 'Math::BigInt' isa 'Math::BigInt' ok 6 - ref($x) = "Math::BigInt" ok 7 - An object of class 'Math::BigInt' isa 'Math::BigInt' ok 8 - ref($x) = "Math::BigFloat" ok 9 - An object of class 'Math::BigFloat' isa 'Math::BigFloat' ok 10 - ref($x) = "Math::BigFloat" ok 11 - An object of class 'Math::BigFloat' isa 'Math::BigFloat' ok t\lib_load.t ........... 1..4 ok 1 - Math::BigFloat got Math::BigInt::Calc # BareCalc using Calc v1.999715 ok 2 - Math::BigFloat was notified ok 3 - "only" worked ok 4 - "try" worked ok t\mbf_ali.t ............ 1..6 ok 1 - Math::BigFloat -> new(123) -> is_pos() ok 2 - Math::BigFloat -> new(123) -> is_neg() ok 3 - Math::BigFloat -> new(123) -> as_int() ok 4 - ref(Math::BigFloat -> new(123) -> as_int()) ok 5 - Math::BigFloat -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigFloat -> new(123) -> bneg() -> is_neg() ok t\mbi_ali.t ............ 1..6 ok 1 - Math::BigInt -> new(123) -> is_pos() ok 2 - Math::BigInt -> new(123) -> is_neg() ok 3 - Math::BigInt -> new(123) -> as_int() ok 4 - ref(Math::BigInt -> new(123) -> as_int()) ok 5 - Math::BigInt -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigInt -> new(123) -> bneg() -> is_neg() ok t\mbi_rand.t ........... 1..512 ok 1 - AdivB * B + 2 * AmodB - AmodB == A ok 2 - AdivB * B / B == AdivB ok 3 - AdivB * A + 2 * AmodB - AmodB == B ok 4 - AdivB * A / A == AdivB ok 5 - AdivB * B + 2 * AmodB - AmodB == A ok 6 - AdivB * B / B == AdivB ok 7 - AdivB * A + 2 * AmodB - AmodB == B ok 8 - AdivB * A / A == AdivB ok 9 - AdivB * B + 2 * AmodB - AmodB == A ok 10 - AdivB * B / B == AdivB ok 11 - AdivB * A + 2 * AmodB - AmodB == B ok 12 - AdivB * A / A == AdivB ok 13 - AdivB * B + 2 * AmodB - AmodB == A ok 14 - AdivB * B / B == AdivB ok 15 - AdivB * A + 2 * AmodB - AmodB == B ok 16 - AdivB * A / A == AdivB ok 17 - AdivB * B + 2 * AmodB - AmodB == A ok 18 - AdivB * B / B == AdivB ok 19 - AdivB * A + 2 * AmodB - AmodB == B ok 20 - AdivB * A / A == AdivB ok 21 - AdivB * B + 2 * AmodB - AmodB == A ok 22 - AdivB * B / B == AdivB ok 23 - AdivB * A + 2 * AmodB - AmodB == B ok 24 - AdivB * A / A == AdivB ok 25 - AdivB * B + 2 * AmodB - AmodB == A ok 26 - AdivB * B / B == AdivB ok 27 - AdivB * A + 2 * AmodB - AmodB == B ok 28 - AdivB * A / A == AdivB ok 29 - AdivB * B + 2 * AmodB - AmodB == A ok 30 - AdivB * B / B == AdivB ok 31 - AdivB * A + 2 * AmodB - AmodB == B ok 32 - AdivB * A / A == AdivB ok 33 - AdivB * B + 2 * AmodB - AmodB == A ok 34 - AdivB * B / B == AdivB ok 35 - AdivB * A + 2 * AmodB - AmodB == B ok 36 - AdivB * A / A == AdivB ok 37 - AdivB * B + 2 * AmodB - AmodB == A ok 38 - AdivB * B / B == AdivB ok 39 - AdivB * A + 2 * AmodB - AmodB == B ok 40 - AdivB * A / A == AdivB ok 41 - AdivB * B + 2 * AmodB - AmodB == A ok 42 - AdivB * B / B == AdivB ok 43 - AdivB * A + 2 * AmodB - AmodB == B ok 44 - AdivB * A / A == AdivB ok 45 - AdivB * B + 2 * AmodB - AmodB == A ok 46 - AdivB * B / B == AdivB ok 47 - AdivB * A + 2 * AmodB - AmodB == B ok 48 - AdivB * A / A == AdivB ok 49 - AdivB * B + 2 * AmodB - AmodB == A ok 50 - AdivB * B / B == AdivB ok 51 - AdivB * A + 2 * AmodB - AmodB == B ok 52 - AdivB * A / A == AdivB ok 53 - AdivB * B + 2 * AmodB - AmodB == A ok 54 - AdivB * B / B == AdivB ok 55 - AdivB * A + 2 * AmodB - AmodB == B ok 56 - AdivB * A / A == AdivB ok 57 - AdivB * B + 2 * AmodB - AmodB == A ok 58 - AdivB * B / B == AdivB ok 59 - AdivB * A + 2 * AmodB - AmodB == B ok 60 - AdivB * A / A == AdivB ok 61 - AdivB * B + 2 * AmodB - AmodB == A ok 62 - AdivB * B / B == AdivB ok 63 - AdivB * A + 2 * AmodB - AmodB == B ok 64 - AdivB * A / A == AdivB ok 65 - AdivB * B + 2 * AmodB - AmodB == A ok 66 - AdivB * B / B == AdivB ok 67 - AdivB * A + 2 * AmodB - AmodB == B ok 68 - AdivB * A / A == AdivB ok 69 - AdivB * B + 2 * AmodB - AmodB == A ok 70 - AdivB * B / B == AdivB ok 71 - AdivB * A + 2 * AmodB - AmodB == B ok 72 - AdivB * A / A == AdivB ok 73 - AdivB * B + 2 * AmodB - AmodB == A ok 74 - AdivB * B / B == AdivB ok 75 - AdivB * A + 2 * AmodB - AmodB == B ok 76 - AdivB * A / A == AdivB ok 77 - AdivB * B + 2 * AmodB - AmodB == A ok 78 - AdivB * B / B == AdivB ok 79 - AdivB * A + 2 * AmodB - AmodB == B ok 80 - AdivB * A / A == AdivB ok 81 - AdivB * B + 2 * AmodB - AmodB == A ok 82 - AdivB * B / B == AdivB ok 83 - AdivB * A + 2 * AmodB - AmodB == B ok 84 - AdivB * A / A == AdivB ok 85 - AdivB * B + 2 * AmodB - AmodB == A ok 86 - AdivB * B / B == AdivB ok 87 - AdivB * A + 2 * AmodB - AmodB == B ok 88 - AdivB * A / A == AdivB ok 89 - AdivB * B + 2 * AmodB - AmodB == A ok 90 - AdivB * B / B == AdivB ok 91 - AdivB * A + 2 * AmodB - AmodB == B ok 92 - AdivB * A / A == AdivB ok 93 - AdivB * B + 2 * AmodB - AmodB == A ok 94 - AdivB * B / B == AdivB ok 95 - AdivB * A + 2 * AmodB - AmodB == B ok 96 - AdivB * A / A == AdivB ok 97 - AdivB * B + 2 * AmodB - AmodB == A ok 98 - AdivB * B / B == AdivB ok 99 - AdivB * A + 2 * AmodB - AmodB == B ok 100 - AdivB * A / A == AdivB ok 101 - AdivB * B + 2 * AmodB - AmodB == A ok 102 - AdivB * B / B == AdivB ok 103 - AdivB * A + 2 * AmodB - AmodB == B ok 104 - AdivB * A / A == AdivB ok 105 - AdivB * B + 2 * AmodB - AmodB == A ok 106 - AdivB * B / B == AdivB ok 107 - AdivB * A + 2 * AmodB - AmodB == B ok 108 - AdivB * A / A == AdivB ok 109 - AdivB * B + 2 * AmodB - AmodB == A ok 110 - AdivB * B / B == AdivB ok 111 - AdivB * A + 2 * AmodB - AmodB == B ok 112 - AdivB * A / A == AdivB ok 113 - AdivB * B + 2 * AmodB - AmodB == A ok 114 - AdivB * B / B == AdivB ok 115 - AdivB * A + 2 * AmodB - AmodB == B ok 116 - AdivB * A / A == AdivB ok 117 - AdivB * B + 2 * AmodB - AmodB == A ok 118 - AdivB * B / B == AdivB ok 119 - AdivB * A + 2 * AmodB - AmodB == B ok 120 - AdivB * A / A == AdivB ok 121 - AdivB * B + 2 * AmodB - AmodB == A ok 122 - AdivB * B / B == AdivB ok 123 - AdivB * A + 2 * AmodB - AmodB == B ok 124 - AdivB * A / A == AdivB ok 125 - AdivB * B + 2 * AmodB - AmodB == A ok 126 - AdivB * B / B == AdivB ok 127 - AdivB * A + 2 * AmodB - AmodB == B ok 128 - AdivB * A / A == AdivB ok 129 - AdivB * B + 2 * AmodB - AmodB == A ok 130 - AdivB * B / B == AdivB ok 131 - AdivB * A + 2 * AmodB - AmodB == B ok 132 - AdivB * A / A == AdivB ok 133 - AdivB * B + 2 * AmodB - AmodB == A ok 134 - AdivB * B / B == AdivB ok 135 - AdivB * A + 2 * AmodB - AmodB == B ok 136 - AdivB * A / A == AdivB ok 137 - AdivB * B + 2 * AmodB - AmodB == A ok 138 - AdivB * B / B == AdivB ok 139 - AdivB * A + 2 * AmodB - AmodB == B ok 140 - AdivB * A / A == AdivB ok 141 - AdivB * B + 2 * AmodB - AmodB == A ok 142 - AdivB * B / B == AdivB ok 143 - AdivB * A + 2 * AmodB - AmodB == B ok 144 - AdivB * A / A == AdivB ok 145 - AdivB * B + 2 * AmodB - AmodB == A ok 146 - AdivB * B / B == AdivB ok 147 - AdivB * A + 2 * AmodB - AmodB == B ok 148 - AdivB * A / A == AdivB ok 149 - AdivB * B + 2 * AmodB - AmodB == A ok 150 - AdivB * B / B == AdivB ok 151 - AdivB * A + 2 * AmodB - AmodB == B ok 152 - AdivB * A / A == AdivB ok 153 - AdivB * B + 2 * AmodB - AmodB == A ok 154 - AdivB * B / B == AdivB ok 155 - AdivB * A + 2 * AmodB - AmodB == B ok 156 - AdivB * A / A == AdivB ok 157 - AdivB * B + 2 * AmodB - AmodB == A ok 158 - AdivB * B / B == AdivB ok 159 - AdivB * A + 2 * AmodB - AmodB == B ok 160 - AdivB * A / A == AdivB ok 161 - AdivB * B + 2 * AmodB - AmodB == A ok 162 - AdivB * B / B == AdivB ok 163 - AdivB * A + 2 * AmodB - AmodB == B ok 164 - AdivB * A / A == AdivB ok 165 - AdivB * B + 2 * AmodB - AmodB == A ok 166 - AdivB * B / B == AdivB ok 167 - AdivB * A + 2 * AmodB - AmodB == B ok 168 - AdivB * A / A == AdivB ok 169 - AdivB * B + 2 * AmodB - AmodB == A ok 170 - AdivB * B / B == AdivB ok 171 - AdivB * A + 2 * AmodB - AmodB == B ok 172 - AdivB * A / A == AdivB ok 173 - AdivB * B + 2 * AmodB - AmodB == A ok 174 - AdivB * B / B == AdivB ok 175 - AdivB * A + 2 * AmodB - AmodB == B ok 176 - AdivB * A / A == AdivB ok 177 - AdivB * B + 2 * AmodB - AmodB == A ok 178 - AdivB * B / B == AdivB ok 179 - AdivB * A + 2 * AmodB - AmodB == B ok 180 - AdivB * A / A == AdivB ok 181 - AdivB * B + 2 * AmodB - AmodB == A ok 182 - AdivB * B / B == AdivB ok 183 - AdivB * A + 2 * AmodB - AmodB == B ok 184 - AdivB * A / A == AdivB ok 185 - AdivB * B + 2 * AmodB - AmodB == A ok 186 - AdivB * B / B == AdivB ok 187 - AdivB * A + 2 * AmodB - AmodB == B ok 188 - AdivB * A / A == AdivB ok 189 - AdivB * B + 2 * AmodB - AmodB == A ok 190 - AdivB * B / B == AdivB ok 191 - AdivB * A + 2 * AmodB - AmodB == B ok 192 - AdivB * A / A == AdivB ok 193 - AdivB * B + 2 * AmodB - AmodB == A ok 194 - AdivB * B / B == AdivB ok 195 - AdivB * A + 2 * AmodB - AmodB == B ok 196 - AdivB * A / A == AdivB ok 197 - AdivB * B + 2 * AmodB - AmodB == A ok 198 - AdivB * B / B == AdivB ok 199 - AdivB * A + 2 * AmodB - AmodB == B ok 200 - AdivB * A / A == AdivB ok 201 - AdivB * B + 2 * AmodB - AmodB == A ok 202 - AdivB * B / B == AdivB ok 203 - AdivB * A + 2 * AmodB - AmodB == B ok 204 - AdivB * A / A == AdivB ok 205 - AdivB * B + 2 * AmodB - AmodB == A ok 206 - AdivB * B / B == AdivB ok 207 - AdivB * A + 2 * AmodB - AmodB == B ok 208 - AdivB * A / A == AdivB ok 209 - AdivB * B + 2 * AmodB - AmodB == A ok 210 - AdivB * B / B == AdivB ok 211 - AdivB * A + 2 * AmodB - AmodB == B ok 212 - AdivB * A / A == AdivB ok 213 - AdivB * B + 2 * AmodB - AmodB == A ok 214 - AdivB * B / B == AdivB ok 215 - AdivB * A + 2 * AmodB - AmodB == B ok 216 - AdivB * A / A == AdivB ok 217 - AdivB * B + 2 * AmodB - AmodB == A ok 218 - AdivB * B / B == AdivB ok 219 - AdivB * A + 2 * AmodB - AmodB == B ok 220 - AdivB * A / A == AdivB ok 221 - AdivB * B + 2 * AmodB - AmodB == A ok 222 - AdivB * B / B == AdivB ok 223 - AdivB * A + 2 * AmodB - AmodB == B ok 224 - AdivB * A / A == AdivB ok 225 - AdivB * B + 2 * AmodB - AmodB == A ok 226 - AdivB * B / B == AdivB ok 227 - AdivB * A + 2 * AmodB - AmodB == B ok 228 - AdivB * A / A == AdivB ok 229 - AdivB * B + 2 * AmodB - AmodB == A ok 230 - AdivB * B / B == AdivB ok 231 - AdivB * A + 2 * AmodB - AmodB == B ok 232 - AdivB * A / A == AdivB ok 233 - AdivB * B + 2 * AmodB - AmodB == A ok 234 - AdivB * B / B == AdivB ok 235 - AdivB * A + 2 * AmodB - AmodB == B ok 236 - AdivB * A / A == AdivB ok 237 - AdivB * B + 2 * AmodB - AmodB == A ok 238 - AdivB * B / B == AdivB ok 239 - AdivB * A + 2 * AmodB - AmodB == B ok 240 - AdivB * A / A == AdivB ok 241 - AdivB * B + 2 * AmodB - AmodB == A ok 242 - AdivB * B / B == AdivB ok 243 - AdivB * A + 2 * AmodB - AmodB == B ok 244 - AdivB * A / A == AdivB ok 245 - AdivB * B + 2 * AmodB - AmodB == A ok 246 - AdivB * B / B == AdivB ok 247 - AdivB * A + 2 * AmodB - AmodB == B ok 248 - AdivB * A / A == AdivB ok 249 - AdivB * B + 2 * AmodB - AmodB == A ok 250 - AdivB * B / B == AdivB ok 251 - AdivB * A + 2 * AmodB - AmodB == B ok 252 - AdivB * A / A == AdivB ok 253 - AdivB * B + 2 * AmodB - AmodB == A ok 254 - AdivB * B / B == AdivB ok 255 - AdivB * A + 2 * AmodB - AmodB == B ok 256 - AdivB * A / A == AdivB ok 257 - AdivB * B + 2 * AmodB - AmodB == A ok 258 - AdivB * B / B == AdivB ok 259 - AdivB * A + 2 * AmodB - AmodB == B ok 260 - AdivB * A / A == AdivB ok 261 - AdivB * B + 2 * AmodB - AmodB == A ok 262 - AdivB * B / B == AdivB ok 263 - AdivB * A + 2 * AmodB - AmodB == B ok 264 - AdivB * A / A == AdivB ok 265 - AdivB * B + 2 * AmodB - AmodB == A ok 266 - AdivB * B / B == AdivB ok 267 - AdivB * A + 2 * AmodB - AmodB == B ok 268 - AdivB * A / A == AdivB ok 269 - AdivB * B + 2 * AmodB - AmodB == A ok 270 - AdivB * B / B == AdivB ok 271 - AdivB * A + 2 * AmodB - AmodB == B ok 272 - AdivB * A / A == AdivB ok 273 - AdivB * B + 2 * AmodB - AmodB == A ok 274 - AdivB * B / B == AdivB ok 275 - AdivB * A + 2 * AmodB - AmodB == B ok 276 - AdivB * A / A == AdivB ok 277 - AdivB * B + 2 * AmodB - AmodB == A ok 278 - AdivB * B / B == AdivB ok 279 - AdivB * A + 2 * AmodB - AmodB == B ok 280 - AdivB * A / A == AdivB ok 281 - AdivB * B + 2 * AmodB - AmodB == A ok 282 - AdivB * B / B == AdivB ok 283 - AdivB * A + 2 * AmodB - AmodB == B ok 284 - AdivB * A / A == AdivB ok 285 - AdivB * B + 2 * AmodB - AmodB == A ok 286 - AdivB * B / B == AdivB ok 287 - AdivB * A + 2 * AmodB - AmodB == B ok 288 - AdivB * A / A == AdivB ok 289 - AdivB * B + 2 * AmodB - AmodB == A ok 290 - AdivB * B / B == AdivB ok 291 - AdivB * A + 2 * AmodB - AmodB == B ok 292 - AdivB * A / A == AdivB ok 293 - AdivB * B + 2 * AmodB - AmodB == A ok 294 - AdivB * B / B == AdivB ok 295 - AdivB * A + 2 * AmodB - AmodB == B ok 296 - AdivB * A / A == AdivB ok 297 - AdivB * B + 2 * AmodB - AmodB == A ok 298 - AdivB * B / B == AdivB ok 299 - AdivB * A + 2 * AmodB - AmodB == B ok 300 - AdivB * A / A == AdivB ok 301 - AdivB * B + 2 * AmodB - AmodB == A ok 302 - AdivB * B / B == AdivB ok 303 - AdivB * A + 2 * AmodB - AmodB == B ok 304 - AdivB * A / A == AdivB ok 305 - AdivB * B + 2 * AmodB - AmodB == A ok 306 - AdivB * B / B == AdivB ok 307 - AdivB * A + 2 * AmodB - AmodB == B ok 308 - AdivB * A / A == AdivB ok 309 - AdivB * B + 2 * AmodB - AmodB == A ok 310 - AdivB * B / B == AdivB ok 311 - AdivB * A + 2 * AmodB - AmodB == B ok 312 - AdivB * A / A == AdivB ok 313 - AdivB * B + 2 * AmodB - AmodB == A ok 314 - AdivB * B / B == AdivB ok 315 - AdivB * A + 2 * AmodB - AmodB == B ok 316 - AdivB * A / A == AdivB ok 317 - AdivB * B + 2 * AmodB - AmodB == A ok 318 - AdivB * B / B == AdivB ok 319 - AdivB * A + 2 * AmodB - AmodB == B ok 320 - AdivB * A / A == AdivB ok 321 - AdivB * B + 2 * AmodB - AmodB == A ok 322 - AdivB * B / B == AdivB ok 323 - AdivB * A + 2 * AmodB - AmodB == B ok 324 - AdivB * A / A == AdivB ok 325 - AdivB * B + 2 * AmodB - AmodB == A ok 326 - AdivB * B / B == AdivB ok 327 - AdivB * A + 2 * AmodB - AmodB == B ok 328 - AdivB * A / A == AdivB ok 329 - AdivB * B + 2 * AmodB - AmodB == A ok 330 - AdivB * B / B == AdivB ok 331 - AdivB * A + 2 * AmodB - AmodB == B ok 332 - AdivB * A / A == AdivB ok 333 - AdivB * B + 2 * AmodB - AmodB == A ok 334 - AdivB * B / B == AdivB ok 335 - AdivB * A + 2 * AmodB - AmodB == B ok 336 - AdivB * A / A == AdivB ok 337 - AdivB * B + 2 * AmodB - AmodB == A ok 338 - AdivB * B / B == AdivB ok 339 - AdivB * A + 2 * AmodB - AmodB == B ok 340 - AdivB * A / A == AdivB ok 341 - AdivB * B + 2 * AmodB - AmodB == A ok 342 - AdivB * B / B == AdivB ok 343 - AdivB * A + 2 * AmodB - AmodB == B ok 344 - AdivB * A / A == AdivB ok 345 - AdivB * B + 2 * AmodB - AmodB == A ok 346 - AdivB * B / B == AdivB ok 347 - AdivB * A + 2 * AmodB - AmodB == B ok 348 - AdivB * A / A == AdivB ok 349 - AdivB * B + 2 * AmodB - AmodB == A ok 350 - AdivB * B / B == AdivB ok 351 - AdivB * A + 2 * AmodB - AmodB == B ok 352 - AdivB * A / A == AdivB ok 353 - AdivB * B + 2 * AmodB - AmodB == A ok 354 - AdivB * B / B == AdivB ok 355 - AdivB * A + 2 * AmodB - AmodB == B ok 356 - AdivB * A / A == AdivB ok 357 - AdivB * B + 2 * AmodB - AmodB == A ok 358 - AdivB * B / B == AdivB ok 359 - AdivB * A + 2 * AmodB - AmodB == B ok 360 - AdivB * A / A == AdivB ok 361 - AdivB * B + 2 * AmodB - AmodB == A ok 362 - AdivB * B / B == AdivB ok 363 - AdivB * A + 2 * AmodB - AmodB == B ok 364 - AdivB * A / A == AdivB ok 365 - AdivB * B + 2 * AmodB - AmodB == A ok 366 - AdivB * B / B == AdivB ok 367 - AdivB * A + 2 * AmodB - AmodB == B ok 368 - AdivB * A / A == AdivB ok 369 - AdivB * B + 2 * AmodB - AmodB == A ok 370 - AdivB * B / B == AdivB ok 371 - AdivB * A + 2 * AmodB - AmodB == B ok 372 - AdivB * A / A == AdivB ok 373 - AdivB * B + 2 * AmodB - AmodB == A ok 374 - AdivB * B / B == AdivB ok 375 - AdivB * A + 2 * AmodB - AmodB == B ok 376 - AdivB * A / A == AdivB ok 377 - AdivB * B + 2 * AmodB - AmodB == A ok 378 - AdivB * B / B == AdivB ok 379 - AdivB * A + 2 * AmodB - AmodB == B ok 380 - AdivB * A / A == AdivB ok 381 - AdivB * B + 2 * AmodB - AmodB == A ok 382 - AdivB * B / B == AdivB ok 383 - AdivB * A + 2 * AmodB - AmodB == B ok 384 - AdivB * A / A == AdivB ok 385 - AdivB * B + 2 * AmodB - AmodB == A ok 386 - AdivB * B / B == AdivB ok 387 - AdivB * A + 2 * AmodB - AmodB == B ok 388 - AdivB * A / A == AdivB ok 389 - AdivB * B + 2 * AmodB - AmodB == A ok 390 - AdivB * B / B == AdivB ok 391 - AdivB * A + 2 * AmodB - AmodB == B ok 392 - AdivB * A / A == AdivB ok 393 - AdivB * B + 2 * AmodB - AmodB == A ok 394 - AdivB * B / B == AdivB ok 395 - AdivB * A + 2 * AmodB - AmodB == B ok 396 - AdivB * A / A == AdivB ok 397 - AdivB * B + 2 * AmodB - AmodB == A ok 398 - AdivB * B / B == AdivB ok 399 - AdivB * A + 2 * AmodB - AmodB == B ok 400 - AdivB * A / A == AdivB ok 401 - AdivB * B + 2 * AmodB - AmodB == A ok 402 - AdivB * B / B == AdivB ok 403 - AdivB * A + 2 * AmodB - AmodB == B ok 404 - AdivB * A / A == AdivB ok 405 - AdivB * B + 2 * AmodB - AmodB == A ok 406 - AdivB * B / B == AdivB ok 407 - AdivB * A + 2 * AmodB - AmodB == B ok 408 - AdivB * A / A == AdivB ok 409 - AdivB * B + 2 * AmodB - AmodB == A ok 410 - AdivB * B / B == AdivB ok 411 - AdivB * A + 2 * AmodB - AmodB == B ok 412 - AdivB * A / A == AdivB ok 413 - AdivB * B + 2 * AmodB - AmodB == A ok 414 - AdivB * B / B == AdivB ok 415 - AdivB * A + 2 * AmodB - AmodB == B ok 416 - AdivB * A / A == AdivB ok 417 - AdivB * B + 2 * AmodB - AmodB == A ok 418 - AdivB * B / B == AdivB ok 419 - AdivB * A + 2 * AmodB - AmodB == B ok 420 - AdivB * A / A == AdivB ok 421 - AdivB * B + 2 * AmodB - AmodB == A ok 422 - AdivB * B / B == AdivB ok 423 - AdivB * A + 2 * AmodB - AmodB == B ok 424 - AdivB * A / A == AdivB ok 425 - AdivB * B + 2 * AmodB - AmodB == A ok 426 - AdivB * B / B == AdivB ok 427 - AdivB * A + 2 * AmodB - AmodB == B ok 428 - AdivB * A / A == AdivB ok 429 - AdivB * B + 2 * AmodB - AmodB == A ok 430 - AdivB * B / B == AdivB ok 431 - AdivB * A + 2 * AmodB - AmodB == B ok 432 - AdivB * A / A == AdivB ok 433 - AdivB * B + 2 * AmodB - AmodB == A ok 434 - AdivB * B / B == AdivB ok 435 - AdivB * A + 2 * AmodB - AmodB == B ok 436 - AdivB * A / A == AdivB ok 437 - AdivB * B + 2 * AmodB - AmodB == A ok 438 - AdivB * B / B == AdivB ok 439 - AdivB * A + 2 * AmodB - AmodB == B ok 440 - AdivB * A / A == AdivB ok 441 - AdivB * B + 2 * AmodB - AmodB == A ok 442 - AdivB * B / B == AdivB ok 443 - AdivB * A + 2 * AmodB - AmodB == B ok 444 - AdivB * A / A == AdivB ok 445 - AdivB * B + 2 * AmodB - AmodB == A ok 446 - AdivB * B / B == AdivB ok 447 - AdivB * A + 2 * AmodB - AmodB == B ok 448 - AdivB * A / A == AdivB ok 449 - AdivB * B + 2 * AmodB - AmodB == A ok 450 - AdivB * B / B == AdivB ok 451 - AdivB * A + 2 * AmodB - AmodB == B ok 452 - AdivB * A / A == AdivB ok 453 - AdivB * B + 2 * AmodB - AmodB == A ok 454 - AdivB * B / B == AdivB ok 455 - AdivB * A + 2 * AmodB - AmodB == B ok 456 - AdivB * A / A == AdivB ok 457 - AdivB * B + 2 * AmodB - AmodB == A ok 458 - AdivB * B / B == AdivB ok 459 - AdivB * A + 2 * AmodB - AmodB == B ok 460 - AdivB * A / A == AdivB ok 461 - AdivB * B + 2 * AmodB - AmodB == A ok 462 - AdivB * B / B == AdivB ok 463 - AdivB * A + 2 * AmodB - AmodB == B ok 464 - AdivB * A / A == AdivB ok 465 - AdivB * B + 2 * AmodB - AmodB == A ok 466 - AdivB * B / B == AdivB ok 467 - AdivB * A + 2 * AmodB - AmodB == B ok 468 - AdivB * A / A == AdivB ok 469 - AdivB * B + 2 * AmodB - AmodB == A ok 470 - AdivB * B / B == AdivB ok 471 - AdivB * A + 2 * AmodB - AmodB == B ok 472 - AdivB * A / A == AdivB ok 473 - AdivB * B + 2 * AmodB - AmodB == A ok 474 - AdivB * B / B == AdivB ok 475 - AdivB * A + 2 * AmodB - AmodB == B ok 476 - AdivB * A / A == AdivB ok 477 - AdivB * B + 2 * AmodB - AmodB == A ok 478 - AdivB * B / B == AdivB ok 479 - AdivB * A + 2 * AmodB - AmodB == B ok 480 - AdivB * A / A == AdivB ok 481 - AdivB * B + 2 * AmodB - AmodB == A ok 482 - AdivB * B / B == AdivB ok 483 - AdivB * A + 2 * AmodB - AmodB == B ok 484 - AdivB * A / A == AdivB ok 485 - AdivB * B + 2 * AmodB - AmodB == A ok 486 - AdivB * B / B == AdivB ok 487 - AdivB * A + 2 * AmodB - AmodB == B ok 488 - AdivB * A / A == AdivB ok 489 - AdivB * B + 2 * AmodB - AmodB == A ok 490 - AdivB * B / B == AdivB ok 491 - AdivB * A + 2 * AmodB - AmodB == B ok 492 - AdivB * A / A == AdivB ok 493 - AdivB * B + 2 * AmodB - AmodB == A ok 494 - AdivB * B / B == AdivB ok 495 - AdivB * A + 2 * AmodB - AmodB == B ok 496 - AdivB * A / A == AdivB ok 497 - AdivB * B + 2 * AmodB - AmodB == A ok 498 - AdivB * B / B == AdivB ok 499 - AdivB * A + 2 * AmodB - AmodB == B ok 500 - AdivB * A / A == AdivB ok 501 - AdivB * B + 2 * AmodB - AmodB == A ok 502 - AdivB * B / B == AdivB ok 503 - AdivB * A + 2 * AmodB - AmodB == B ok 504 - AdivB * A / A == AdivB ok 505 - AdivB * B + 2 * AmodB - AmodB == A ok 506 - AdivB * B / B == AdivB ok 507 - AdivB * A + 2 * AmodB - AmodB == B ok 508 - AdivB * A / A == AdivB ok 509 - AdivB * B + 2 * AmodB - AmodB == A ok 510 - AdivB * B / B == AdivB ok 511 - AdivB * A + 2 * AmodB - AmodB == B ok 512 - AdivB * A / A == AdivB ok t\mbimbf.t ............. 1..710 ok 1 - ${"Math::BigInt::accuracy"} ok 2 - ${"Math::BigInt::precision"} ok 3 - Math::BigInt->accuracy() ok 4 - Math::BigInt->precision() ok 5 - ${"Math::BigInt::div_scale"} ok 6 - ${"Math::BigInt::round_mode"} ok 7 - Math::BigInt->round_mode() ok 8 - ${"Math::BigFloat::accuracy"} ok 9 - ${"Math::BigFloat::precision"} ok 10 - Math::BigFloat->precision() ok 11 - Math::BigFloat->precision() ok 12 - ${"Math::BigFloat::div_scale"} ok 13 - ${"Math::BigFloat::round_mode"} ok 14 - Math::BigFloat->round_mode() ok 15 - Math::BigInt->accuracy() ok 16 - Math::BigInt->precision() ok 17 - Math::BigInt->round_mode() ok 18 - Math::BigInt->div_scale() ok 19 - Math::BigInt->div_scale(20) ok 20 - Math::BigInt->div_scale() ok 21 - Math::BigInt->round_mode("odd") ok 22 - Math::BigInt->round_mode() ok 23 - Math::BigInt->accuracy(2) ok 24 - Math::BigInt->accuracy() ok 25 - Math::BigInt->accuracy(undef) ok 26 - Math::BigInt->precision(2) ok 27 - Math::BigInt->precision(-2) ok 28 - Math::BigInt->precision() ok 29 - Math::BigInt->precision(undef) ok 30 - Math::BigFloat->accuracy() ok 31 - Math::BigFloat->precision() ok 32 - Math::BigFloat->round_mode() ok 33 - Math::BigFloat->div_scale() ok 34 - Math::BigFloat->div_scale(20) ok 35 - Math::BigFloat->div_scale() ok 36 - Math::BigFloat->round_mode("odd") ok 37 - Math::BigFloat->round_mode() ok 38 - Math::BigFloat->accuracy(2) ok 39 - Math::BigFloat->accuracy() ok 40 - Math::BigFloat->accuracy(undef) ok 41 - Math::BigFloat->precision(2) ok 42 - Math::BigFloat->precision(-2) ok 43 - Math::BigFloat->precision() ok 44 - Math::BigFloat->precision(undef) ok 45 - ${"Math::BigFloat::accuracy"} = 5 ok 46 - ${"Math::BigInt::accuracy"} = 5 ok 47 - ${"Math::BigFloat::accuracy"} = 42 ok 48 - ${"Math::BigInt::accuracy"} = 42 ok 49 - ${"Math::BigFloat::accuracy"} = -1 ok 50 - ${"Math::BigInt::accuracy"} = -1 ok 51 - ${"Math::BigFloat::accuracy"} = 0 ok 52 - ${"Math::BigInt::accuracy"} = 0 ok 53 - ${"Math::BigFloat::accuracy"} = undef ok 54 - ${"Math::BigInt::accuracy"} = undef ok 55 - ${"Math::BigFloat::precision"} = 5 ok 56 - ${"Math::BigInt::precision"} = 5 ok 57 - ${"Math::BigFloat::precision"} = 42 ok 58 - ${"Math::BigInt::precision"} = 42 ok 59 - ${"Math::BigFloat::precision"} = -1 ok 60 - ${"Math::BigInt::precision"} = -1 ok 61 - ${"Math::BigFloat::precision"} = 0 ok 62 - ${"Math::BigInt::precision"} = 0 ok 63 - ${"Math::BigFloat::precision"} = undef ok 64 - ${"Math::BigInt::precision"} = undef ok 65 - ${"Math::BigFloat::div_scale"} = 5 ok 66 - ${"Math::BigInt::div_scale"} = 5 ok 67 - ${"Math::BigFloat::div_scale"} = 42 ok 68 - ${"Math::BigInt::div_scale"} = 42 ok 69 - ${"Math::BigFloat::div_scale"} = 1 ok 70 - ${"Math::BigInt::div_scale"} = 1 ok 71 - ${"Math::BigFloat::round_mode"} = "odd" ok 72 - ${"Math::BigInt::round_mode"} = "odd" ok 73 - ${"Math::BigFloat::round_mode"} = "even" ok 74 - ${"Math::BigInt::round_mode"} = "even" ok 75 - ${"Math::BigFloat::round_mode"} = "zero" ok 76 - ${"Math::BigInt::round_mode"} = "zero" ok 77 - ${"Math::BigFloat::round_mode"} = "trunc" ok 78 - ${"Math::BigInt::round_mode"} = "trunc" ok 79 - ${"Math::BigFloat::round_mode"} = "+inf" ok 80 - ${"Math::BigInt::round_mode"} = "+inf" ok 81 - ${"Math::BigFloat::round_mode"} = "-inf" ok 82 - ${"Math::BigInt::round_mode"} = "-inf" ok 83 - ${"Math::BigFloat::round_mode"} ok 84 - ${"Math::BigInt::round_mode"} ok 85 - $x->accuracy() ok 86 - $x->accuracy(5) ok 87 - $x->accuracy(undef) ok 88 - $x->precision() ok 89 - $x->precision(5) ok 90 - $x->precision(undef) ok 91 - ${"Math::BigInt::accuracy"} = 42 ok 92 - ${"Math::BigFloat::accuracy"} = 64 ok 93 - ${"Math::BigInt::accuracy"} = 42 ok 94 - ${"Math::BigFloat::accuracy"} = 64 ok 95 - Math::BigInt->new(123456) = 123500 ok 96 - Math::BigInt->new(123456) = 123000 ok 97 - Math::BigFloat->new("123.456") = 123.5 ok 98 - Math::BigFloat->new("123.456") = 123.5 ok 99 - Math::BigFloat->new("123.456") = 123.456 ok 100 - $x = Math::BigFloat->new("123.456"); $x->accuracy(4) ok 101 - $x = Math::BigFloat->new("123.456"); $x->precision(-2) ok 102 - $x = Math::BigInt->new(123456); $x->accuracy(4) ok 103 - $x = Math::BigInt->new(123456); $x->precision(2) ok 104 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5) ok 105 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(4) ok 106 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5, 2) ok 107 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, -2) ok 108 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, 2) ok 109 - $x = Math::BigInt->new("123"); $x->round(5, 2) ok 110 - $x = Math::BigFloat->new("123.45000"); $x->copy()->round(undef, -1, "odd") ok 111 - $x = Math::BigFloat->new("123.4567"); $y = $x->copy()->bround() ok 112 - $y = $x->copy()->round(5); $y->accuracy() ok 113 - $y = $x->copy()->round(5); $y->precision() ok 114 - $y = $x->copy()->round(undef, 2); $y->precision() ok 115 - $y = $x->copy()->round(undef, 2); $y->accuracy() ok 116 - $x = $mbf->new("123.4567") ok 117 - $x->accuracy(4) ok 118 - $x->precision(-2) ok 119 - $x->accuracy() ok 120 - $x = $mbf->new("123.4567") ok 121 - $x->precision(-2) ok 122 - $x->accuracy(4) ok 123 - $x->precision() ok 124 - $z = $x->copy(); $z->accuracy() ok 125 - $z = $x->copy(); $z->precision() ok 126 - $x->copy()->bdiv(3, 4) ok 127 - $x->copy()->bdiv(3, 8) ok 128 - $x->copy()->bdiv(3, 16) ok 129 - $x->copy()->bdiv(3, 32) ok 130 - $x = Math::BigInt->bzero(); $x->accuracy(5); $x->{_a} ok 131 - $x = Math::BigInt->bzero(); $x->precision(5); $x->{_p} ok 132 - $x = Math::BigInt->new(0); $x->accuracy(5); $x->{_a} ok 133 - $x = Math::BigInt->new(0); $x->precision(5); $x->{_p} ok 134 - $x = Math::BigInt->bzero(); $x->round(5); $x->{_a} ok 135 - $x = Math::BigInt->bzero(); $x->round(undef, 5); $x->{_p} ok 136 - $x = Math::BigInt->new(0); $x->round(5); $x->{_a} ok 137 - $x = Math::BigInt->new(0); $x->round(undef, 5); $x->{_p} ok 138 - $x = Math::BigInt->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 139 - $x = Math::BigFloat->bzero(); $x->accuracy(5); $x->{_a} ok 140 - $x = Math::BigFloat->bzero(); $x->precision(5); $x->{_p} ok 141 - $x = Math::BigFloat->new(0); $x->accuracy(5); $x->{_a} ok 142 - $x = Math::BigFloat->new(0); $x->precision(5); $x->{_p} ok 143 - $x = Math::BigFloat->bzero(); $x->round(5); $x->{_a} ok 144 - $x = Math::BigFloat->bzero(); $x->round(undef, 5); $x->{_p} ok 145 - $x = Math::BigFloat->new(0); $x->round(5); $x->{_a} ok 146 - $x = Math::BigFloat->new(0); $x->round(undef, 5); $x->{_p} ok 147 - $x = Math::BigFloat->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 148 - Math::BigInt->new(123)->badd(123) ok 149 - Math::BigInt->badd(123, 321) ok 150 - Math::BigInt->badd(123, Math::BigInt->new(321)) ok 151 - Math::BigInt->new(123)->bsub(122) ok 152 - Math::BigInt->bsub(321, 123) ok 153 - Math::BigInt->bsub(321, Math::BigInt->new(123)) ok 154 - Math::BigInt->new(123)->bmul(123) ok 155 - Math::BigInt->bmul(123, 123) ok 156 - Math::BigInt->bmul(123, Math::BigInt->new(123)) ok 157 - Math::BigInt->new(15131)->bmod(123) ok 158 - Math::BigInt->bmod(15131, 123) ok 159 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) ok 160 - Math::BigInt->new(2)->bpow(16) ok 161 - Math::BigInt->bpow(2, 16) ok 162 - Math::BigInt->bpow(2, Math::BigInt->new(16)) ok 163 - Math::BigInt->new(2**15)->brsft(1) ok 164 - Math::BigInt->brsft(2**15, 1) ok 165 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) ok 166 - Math::BigInt->new(2**13)->blsft(1) ok 167 - Math::BigInt->blsft(2**13, 1) ok 168 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) ok 169 - Math::BigFloat->new(123)->badd(123) ok 170 - Math::BigFloat->badd(123, 321) ok 171 - Math::BigFloat->badd(123, Math::BigFloat->new(321)) ok 172 - Math::BigFloat->new(123)->bsub(122) ok 173 - Math::BigFloat->bsub(321, 123) ok 174 - Math::BigFloat->bsub(321, Math::BigFloat->new(123)) ok 175 - Math::BigFloat->new(123)->bmul(123) ok 176 - Math::BigFloat->bmul(123, 123) ok 177 - Math::BigFloat->bmul(123, Math::BigFloat->new(123)) ok 178 - Math::BigFloat->new(15131)->bmod(123) ok 179 - Math::BigFloat->bmod(15131, 123) ok 180 - Math::BigFloat->bmod(15131, Math::BigFloat->new(123)) ok 181 - Math::BigFloat->new(2)->bpow(16) ok 182 - Math::BigFloat->bpow(2, 16) ok 183 - Math::BigFloat->bpow(2, Math::BigFloat->new(16)) ok 184 - Math::BigFloat->new(2**15)->brsft(1) ok 185 - Math::BigFloat->brsft(2**15, 1) ok 186 - Math::BigFloat->brsft(2**15, Math::BigFloat->new(1)) ok 187 - Math::BigFloat->new(2**13)->blsft(1) ok 188 - Math::BigFloat->blsft(2**13, 1) ok 189 - Math::BigFloat->blsft(2**13, Math::BigFloat->new(1)) ok 190 - $z = $x + $y ok 191 - $z = $y - $x ok 192 - $z = $y * $x ok 193 - $z = $x ** 2 ok 194 - $z = $x * $x ok 195 - $z = $z / 2 ok 196 - $z++ ok 197 - $z = $x + $y ok 198 - $z = $y - $x ok 199 - $z = $y * $x ok 200 - $z = $x ** 2 ok 201 - $z++ ok 202 - $z = $z / 2 ok 203 - $x->bnot() ok 204 - $x->babs() ok 205 - $x->bneg() ok 206 - $x ok 207 - $x->bdiv($y) ok 208 - $x->{_a} ok 209 - $x->bdiv($y) ok 210 - $x->{_a} ok 211 - $x->bdiv($y) ok 212 - $x->{_a} ok 213 - $x->bdiv($y) ok 214 - $x->{_a} ok 215 - $x->copy()->bsqrt(...) ok 216 - $x->copy->bsqrt(...) ok 217 - $x->{_a} ok 218 - $z = $x->bsqrt(); $z ok 219 - $z = $x->bsqrt(); $x ok 220 - $x->copy()->bpow(...) ok 221 - $x->copy()->bpow(...) vs. $x->copy()->bsqrt(...) ok 222 - $x->copy()->bpow('2', 0) ok 223 - $mbi->new(12)->bfac() ok 224 - $mbi->new(12)->bfac(2) ok 225 - $x = Math::BigInt->new(12); $x->accuracy(2); $x->bfac() ok 226 - $x = Math::BigInt->new(13); $x->accuracy(2); $x->bfac() ok 227 - $x = Math::BigInt->new(13); $x->accuracy(3); $x->bfac() ok 228 - $x = Math::BigInt->new(13); $x->accuracy(4); $x->bfac() ok 229 - $x = Math::BigInt->new(20); $x->accuracy(1); $x->bfac() ok 230 - $x = Math::BigInt->new("123456")->bsqrt(2, undef) ok 231 - $x->accuracy() ok 232 - $x = 360 ok 233 - $x = 400 ok 234 - $z = $x + $y; ok 235 - $z is a "Math::BigFloat" object ok 236 - $z = $x / $y; ok 237 - $z is a "Math::BigFloat" object ok 238 - $z = $u * $y; ok 239 - $z is a "Math::BigFloat" object ok 240 - $z = 31000 ok 241 - $z = 30900 ok 242 - $z = 30863 ok 243 - $z = 30863 ok 244 - $z = 30860 ok 245 - $z = 30900 ok 246 - $z = 30862.5 ok 247 - $z = "" ok 248 - "$z = $y >= 3.17" gives warning as expected ok 249 - $z = "" ok 250 - "$z = $y >= 3.17" gives warning as expected ok 251 - $x->bdiv(3) ok 252 - $x->{_a} ok 253 - $x->bdiv($y) ok 254 - $x->{_a} ok 255 - $x->bdiv(3) ok 256 - $x->bdiv(3, undef, -2) ok 257 - $x->bdiv(3, undef, -8) = "3.33333333" ok 258 - $x->bdiv($y) = '3.333' ok 259 - $x->{_a} = 4 ok 260 - $y->{_a} = 4 ok 261 - $x->{_p} = undef ok 262 - $y->{_p} = undef ok 263 - $x->bdiv($y) = '3.33' ok 264 - $x->{_p} = -2 ok 265 - $y->{_p} = -2 ok 266 - $x->{_a} = undef ok 267 - $y->{_a} = undef ok 268 - "$x->bround(-2)" gives warning as expected ok 269 - $x = "1.000" ok 270 - $x->{_a} = 4 ok 271 - $x = "1.000" ok 272 - $x = "1230" ok 273 - $x->{_a} = 3 ok 274 - $x = "1230" ok 275 - $x = "1200" ok 276 - $x->{_a} = 2 ok 277 - $x = "12300" ok 278 - $x->{_a} = 4 ok 279 - $x = "12000" ok 280 - $x->{_a} = 3 ok 281 - $x = "10000" ok 282 - $x->{_a} = 2 ok 283 - $x = "0" ok 284 - $x->{_a} = 1 ok 285 - $x = "0" ok 286 - $x->{_a} = 0 ok 287 - $x = "100000" ok 288 - $x->{_a} = 0 ok 289 - $x = "100000" ok 290 - $x->{_a} = 0 ok 291 - $x = "12345" ok 292 - $x->{_a} = 5 ok 293 - $x = "12345" ok 294 - $x = "0.01" ok 295 - $x = "0.00" ok 296 - $x = "0.00" ok 297 - $x = "12340" ok 298 - $x = "12340" ok 299 - $x->{_a} = undef ok 300 - $x = "0.000176118351532229658330398027474462839027826699542092286016203" ok 301 - $x = "0.000176118351532229658330398027474462839027826699542092286016202888340965128566396618527651" ok 302 - $x = "0.00017611835153222965833039802747446283902782669954209228601620288834096512856639662" ok 303 - $x = "1.00000" ok 304 - $x->bfround(-2) = "1.00" ok 305 - $x->{_p} = -2 ok 306 - $x->bround(2) = "12000" ok 307 - $x->{_a} = 2 ok 308 - $x->bround(2) = "1.2" ok 309 - $x->{_a} = 2 ok 310 - $x = "12350" ok 311 - $x->{_a} = 4 ok 312 - $x->{_p} = undef ok 313 - $x->{_a} = undef ok 314 - $x->{_p} = undef ok 315 - $x->{_a} = undef ok 316 - $x->{_p} = undef ok 317 - $y->{_a} = undef ok 318 - $y->{_p} = undef ok 319 - $x+$y = 24000 ok 320 - $x-$y = 42000 ok 321 - $x+$y = "2.46" ok 322 - scalar(@params) = 1 ok 323 - scalar(@params) = 4 ok 324 - $params[0] = $x ok 325 - $params[1] = 1 ok 326 - $params[2] = undef ok 327 - $params[3] = "odd" ok 328 - scalar(@params) = 4 ok 329 - $params[0] = $x ok 330 - $params[1] = undef ok 331 - $params[2] = 2 ok 332 - $params[3] = "odd" ok 333 - round mode "foo" gives a warning as expected ok 334 - scalar(@params) = 4 ok 335 - $params[0] = $x ok 336 - $params[1] = undef ok 337 - $params[2] = 2 ok 338 - $params[3] = "+inf" ok 339 - scalar(@params) = 1 ok 340 - $params[0] = $x ok 341 - scalar(@params) = 1 ok 342 - $params[0] = $x ok 343 - $x->is_nan() = 1 ok 344 - scalar(@params) = 1 ok 345 - $params[0] = $x ok 346 - $x->is_nan() = 1 ok 347 - $x->{_a} = undef ok 348 - $x->{_p} = undef ok 349 - $x->{_a} = undef ok 350 - $x->{_p} = undef ok 351 - $x->{_a} = undef ok 352 - $x->{_p} = undef ok 353 - $x->{_a} = undef ok 354 - $x->{_p} = undef ok 355 - $x->{_a} = undef ok 356 - $x->{_p} = undef ok 357 - $x->{_a} = undef ok 358 - $x->{_p} = undef ok 359 - $x->{_a} = 1 ok 360 - $x->{_p} = undef ok 361 - $x->{_a} = undef ok 362 - $x->{_p} = 1 ok 363 - $x->{_a} = 1 ok 364 - $x->{_p} = undef ok 365 - $x->{_a} = undef ok 366 - $x->{_p} = 1 ok 367 - $x->{_a} = 1 ok 368 - $x->{_p} = undef ok 369 - $x->{_a} = undef ok 370 - $x->{_p} = 1 ok 371 - $x->{_a} = 2 ok 372 - $x->{_p} = undef ok 373 - $x->{_a} = undef ok 374 - $x->{_p} = 2 ok 375 - $x->{_a} = 2 ok 376 - $x->{_p} = undef ok 377 - $x->{_a} = undef ok 378 - $x->{_p} = 2 ok 379 - $x->{_a} = 2 ok 380 - $x->{_p} = undef ok 381 - $x->{_a} = undef ok 382 - $x->{_p} = 2 ok 383 - $x->{_a} = undef ok 384 - $x->{_p} = undef ok 385 - $x->{_a} = undef ok 386 - $x->{_p} = undef ok 387 - $x->{_a} = undef ok 388 - $x->{_p} = undef ok 389 - $x->{_a} = undef ok 390 - $x->{_p} = undef ok 391 - $x->{_a} = undef ok 392 - $x->{_p} = undef ok 393 - $x->{_a} = undef ok 394 - $x->{_p} = undef ok 395 - $x->{_a} = 1 ok 396 - $x->{_p} = undef ok 397 - $x->{_a} = undef ok 398 - $x->{_p} = 1 ok 399 - $x->{_a} = 1 ok 400 - $x->{_p} = undef ok 401 - $x->{_a} = undef ok 402 - $x->{_p} = 1 ok 403 - $x->{_a} = 1 ok 404 - $x->{_p} = undef ok 405 - $x->{_a} = undef ok 406 - $x->{_p} = 1 ok 407 - $x->{_a} = 2 ok 408 - $x->{_p} = undef ok 409 - $x->{_a} = undef ok 410 - $x->{_p} = 2 ok 411 - $x->{_a} = 2 ok 412 - $x->{_p} = undef ok 413 - $x->{_a} = undef ok 414 - $x->{_p} = 2 ok 415 - $x->{_a} = 2 ok 416 - $x->{_p} = undef ok 417 - $x->{_a} = undef ok 418 - $x->{_p} = 2 ok 419 - $x->accuracy() = 2 ok 420 - $x->accuracy() = 2 ok 421 - $x->precision() = -2 ok 422 - $x->precision() = -2 ok 423 - $x->accuracy() = 2 ok 424 - $x->accuracy() = 2 ok 425 - $x->precision() = -2 ok 426 - $x->precision() = -2 ok 427 - mixing A and P creates a NaN ok 428 - $class->new(123) = "NaN" ok 429 - mixing A and P creates a NaN ok 430 - $class->new(123) = "NaN" ok 431 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->badd($y); ok 432 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bsub($y); ok 433 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bmul($y); ok 434 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bpow($y); ok 435 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bmod($y); ok 436 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->badd($y); ok 437 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bsub($y); ok 438 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bmul($y); ok 439 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bpow($y); ok 440 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bmod($y); ok 441 - my $x = Math::BigInt->new(1234, 5, -3); ok 442 - my $x = Math::BigInt->bsqrt(1234, 5, -3); ok 443 - $x = 120 ok 444 - $x = 120 ok 445 - $x = 120 ok 446 - $x = 120 ok 447 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->$f($y); ok 448 - is a valid object ok 449 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("0"); $x->$f($y); ok 450 - is a valid object ok 451 - $x->{_a} == 3 ok 452 - $x->{_p} is undef ok 453 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("0"); $x->$f($y); ok 454 - is a valid object ok 455 - $x->{_p} == -3 ok 456 - $x->{_a} is undef ok 457 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->accuracy(3); $x->$f($y); ok 458 - is a valid object ok 459 - $x->{_a} == 3 ok 460 - $x->{_p} is undef ok 461 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->precision(-3); $x->$f($y); ok 462 - is a valid object ok 463 - $x->{_p} == -3 ok 464 - $x->{_a} is undef ok 465 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->$f($y); ok 466 - is a valid object ok 467 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("0"); $x->$f($y); ok 468 - is a valid object ok 469 - $x->{_a} == 3 ok 470 - $x->{_p} is undef ok 471 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("0"); $x->$f($y); ok 472 - is a valid object ok 473 - $x->{_p} == -3 ok 474 - $x->{_a} is undef ok 475 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->accuracy(3); $x->$f($y); ok 476 - is a valid object ok 477 - $x->{_a} == 3 ok 478 - $x->{_p} is undef ok 479 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->precision(-3); $x->$f($y); ok 480 - is a valid object ok 481 - $x->{_p} == -3 ok 482 - $x->{_a} is undef ok 483 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("1"); $x->$f($y); ok 484 - is a valid object ok 485 - $x->{_a} == 3 ok 486 - $x->{_p} is undef ok 487 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("1"); $x->$f($y); ok 488 - is a valid object ok 489 - $x->{_p} == -3 ok 490 - $x->{_a} is undef ok 491 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->accuracy(3); $x->$f($y); ok 492 - is a valid object ok 493 - $x->{_a} == 3 ok 494 - $x->{_p} is undef ok 495 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->precision(-3); $x->$f($y); ok 496 - is a valid object ok 497 - $x->{_p} == -3 ok 498 - $x->{_a} is undef ok 499 - $x = Math::BigInt->new("1"); $x->accuracy(3); $y = Math::BigInt->new("123"); $x->$f($y); ok 500 - is a valid object ok 501 - $x->{_a} == 3 ok 502 - $x->{_p} is undef ok 503 - $x = Math::BigInt->new("1"); $x->precision(-3); $y = Math::BigInt->new("123"); $x->$f($y); ok 504 - is a valid object ok 505 - $x->{_p} == -3 ok 506 - $x->{_a} is undef ok 507 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->accuracy(3); $x->$f($y); ok 508 - is a valid object ok 509 - $x->{_a} == 3 ok 510 - $x->{_p} is undef ok 511 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->precision(-3); $x->$f($y); ok 512 - is a valid object ok 513 - $x->{_p} == -3 ok 514 - $x->{_a} is undef ok 515 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->$f($y); ok 516 - is a valid object ok 517 - $x = Math::BigInt->new("123"); $x->accuracy(4); $y = Math::BigInt->new("1"); $x->$f($y); ok 518 - is a valid object ok 519 - $x->{_a} == 4 ok 520 - $x->{_p} is undef ok 521 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->accuracy(4); $x->$f($y); ok 522 - is a valid object ok 523 - $x->{_a} == 4 ok 524 - $x->{_p} is undef ok 525 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->precision(-4); $x->$f($y); ok 526 - is a valid object ok 527 - $x->{_p} == -4 ok 528 - $x->{_a} is undef ok 529 - $x = Math::BigInt->new("123"); $x->precision(-4); $y = Math::BigInt->new("1"); $x->$f($y); ok 530 - is a valid object ok 531 - $x->{_p} == -4 ok 532 - $x->{_a} is undef ok 533 - $x = Math::BigInt->new("1"); $x->accuracy(4); $y = Math::BigInt->new("123"); $x->$f($y); ok 534 - is a valid object ok 535 - $x->{_a} == 4 ok 536 - $x->{_p} is undef ok 537 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->accuracy(4); $x->$f($y); ok 538 - is a valid object ok 539 - $x->{_a} == 4 ok 540 - $x->{_p} is undef ok 541 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->precision(-4); $x->$f($y); ok 542 - is a valid object ok 543 - $x->{_p} == -4 ok 544 - $x->{_a} is undef ok 545 - $x = Math::BigInt->new("1"); $x->precision(-4); $y = Math::BigInt->new("123"); $x->$f($y); ok 546 - is a valid object ok 547 - $x->{_p} == -4 ok 548 - $x->{_a} is undef ok 549 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->$f($y); ok 550 - is a valid object ok 551 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->$f($y); ok 552 - is a valid object ok 553 - $x->{_a} == 1 ok 554 - $x->{_p} is undef ok 555 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->$f($y); ok 556 - is a valid object ok 557 - $x->{_a} == 1 ok 558 - $x->{_p} is undef ok 559 - $x = Math::BigInt->new("1234"); $x->precision(-1); $y = Math::BigInt->new("0"); $x->$f($y); ok 560 - is a valid object ok 561 - $x->{_p} == -1 ok 562 - $x->{_a} is undef ok 563 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(-1); $x->$f($y); ok 564 - is a valid object ok 565 - $x->{_p} == -1 ok 566 - $x->{_a} is undef ok 567 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->$f($y); ok 568 - is a valid object ok 569 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 570 - is a valid object ok 571 - $x->{_a} == 2 ok 572 - $x->{_p} is undef ok 573 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->accuracy(2); $x->$f($y); ok 574 - is a valid object ok 575 - $x->{_a} == 2 ok 576 - $x->{_p} is undef ok 577 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 578 - is a valid object ok 579 - $x->{_p} == 1 ok 580 - $x->{_a} is undef ok 581 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->$f($y); ok 582 - is a valid object ok 583 - $x->{_p} == 1 ok 584 - $x->{_a} is undef ok 585 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->$f($y); ok 586 - is a valid object ok 587 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->$f($y); ok 588 - is a valid object ok 589 - $x->{_a} == 1 ok 590 - $x->{_p} is undef ok 591 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->$f($y); ok 592 - is a valid object ok 593 - $x->{_a} == 1 ok 594 - $x->{_p} is undef ok 595 - $x = Math::BigInt->new("1234"); $x->precision(3); $y = Math::BigInt->new("0"); $x->$f($y); ok 596 - is a valid object ok 597 - $x->{_p} == 3 ok 598 - $x->{_a} is undef ok 599 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(3); $x->$f($y); ok 600 - is a valid object ok 601 - $x->{_p} == 3 ok 602 - $x->{_a} is undef ok 603 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->$f($y); ok 604 - is a valid object ok 605 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 606 - is a valid object ok 607 - $x->{_a} == 2 ok 608 - $x->{_p} is undef ok 609 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->accuracy(2); $x->$f($y); ok 610 - is a valid object ok 611 - $x->{_a} == 2 ok 612 - $x->{_p} is undef ok 613 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 614 - is a valid object ok 615 - $x->{_p} == 1 ok 616 - $x->{_a} is undef ok 617 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->$f($y); ok 618 - is a valid object ok 619 - $x->{_p} == 1 ok 620 - $x->{_a} is undef ok 621 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFFF"); $x->$f($y); ok 622 - is a valid object ok 623 - $x->{_a} == 2 ok 624 - $x->{_p} is undef ok 625 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFFF"); $y->accuracy(2); $x->$f($y); ok 626 - is a valid object ok 627 - $x->{_a} == 2 ok 628 - $x->{_p} is undef ok 629 - $x = Math::BigInt->new("0xFF"); $x->precision(2); $y = Math::BigInt->new("0xFFF"); $x->$f($y); ok 630 - is a valid object ok 631 - $x->{_p} == 2 ok 632 - $x->{_a} is undef ok 633 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFFF"); $y->precision(2); $x->$f($y); ok 634 - is a valid object ok 635 - $x->{_p} == 2 ok 636 - $x->{_a} is undef ok 637 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->$f($y); ok 638 - is a valid object ok 639 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->$f($y); ok 640 - is a valid object ok 641 - $x->{_a} == 1 ok 642 - $x->{_p} is undef ok 643 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->$f($y); ok 644 - is a valid object ok 645 - $x->{_a} == 1 ok 646 - $x->{_p} is undef ok 647 - $x = Math::BigInt->new("1234"); $x->precision(3); $y = Math::BigInt->new("0"); $x->$f($y); ok 648 - is a valid object ok 649 - $x->{_p} == 3 ok 650 - $x->{_a} is undef ok 651 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(3); $x->$f($y); ok 652 - is a valid object ok 653 - $x->{_p} == 3 ok 654 - $x->{_a} is undef ok 655 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->$f($y); ok 656 - is a valid object ok 657 - $x = Math::BigInt->new("250"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 658 - is a valid object ok 659 - $x->{_a} == 2 ok 660 - $x->{_p} is undef ok 661 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("250"); $y->accuracy(2); $x->$f($y); ok 662 - is a valid object ok 663 - $x->{_a} == 2 ok 664 - $x->{_p} is undef ok 665 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->$f($y); ok 666 - is a valid object ok 667 - $x->{_p} == 1 ok 668 - $x->{_a} is undef ok 669 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->$f($y); ok 670 - is a valid object ok 671 - $x->{_p} == 1 ok 672 - $x->{_a} is undef ok 673 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->$f($y); ok 674 - is a valid object ok 675 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->$f($y); ok 676 - is a valid object ok 677 - $x = Math::BigInt->new("2"); $x->accuracy(2); $y = Math::BigInt->new("0"); $x->$f($y); ok 678 - is a valid object ok 679 - $x->{_a} == 2 ok 680 - $x->{_p} is undef ok 681 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $y->accuracy(2); $x->$f($y); ok 682 - is a valid object ok 683 - $x->{_a} == 2 ok 684 - $x->{_p} is undef ok 685 - $Math::BigInt::rnd_mode = "even" ok 686 - $Math::BigFloat::rnd_mode = "even" ok 687 - $mbi->round_mode("huhmbi") ok 688 - $mbf->round_mode("huhmbf") ok 689 - $Math::BigInt::rnd_mode = "huhmbi" ok 690 - $Math::BigFloat::rnd_mode = "huhmbf" ok 691 - $Math::BigInt::rnd_mode = "odd" ok 692 - $Math::BigInt::rnd_mode = "odd" ok 693 - set A ... ok 694 - ... and now P must be cleared ok 695 - set P ... ok 696 - ... and now A must be cleared ok 697 - set A ... ok 698 - ... and now P must be cleared ok 699 - set P ... ok 700 - ... and now A must be cleared ok 701 - $x has A of 42 ok 702 - $x has A from global ok 703 - $x has still A of 42 ok 704 - $x has A of 42 ok 705 - $x has A from global ok 706 - $x has still A of 42 ok 707 - bug with blog(Math::BigFloat, Math::BigInt) ok 708 - $x->bsqrt() with many digits ok 709 - $x->bsqrt() with many digits ok 710 - $x->bsqrt() with many digits ok t\nan_cmp.t ............ 1..26 ok 1 - Math::BigInt->bone() == Math::BigInt->bone() ok 2 - Math::BigInt->bone() != Math::BigInt->bnan() ok 3 - Math::BigInt->bnan() != Math::BigInt->bone() ok 4 - Math::BigInt->bnan() != Math::BigInt->bnan() ok 5 - Math::BigInt->bnan() == Math::BigInt->bone() ok 6 - Math::BigInt->bone() == Math::BigInt->bnan() ok 7 - Math::BigInt->bnan() == Math::BigInt->bnan() ok 8 - Math::BigInt->bnan() <= Math::BigInt->bone() ok 9 - Math::BigInt->bone() <= Math::BigInt->bnan() ok 10 - Math::BigInt->bnan() <= Math::BigInt->bnan() ok 11 - Math::BigInt->bnan() >= Math::BigInt->bone() ok 12 - Math::BigInt->bone() >= Math::BigInt->bnan() ok 13 - Math::BigInt->bnan() >= Math::BigInt->bnan() ok 14 - Math::BigFloat->bone() == Math::BigFloat->bone() ok 15 - Math::BigFloat->bone() != Math::BigFloat->bnan() ok 16 - Math::BigFloat->bnan() != Math::BigFloat->bone() ok 17 - Math::BigFloat->bnan() != Math::BigFloat->bnan() ok 18 - Math::BigFloat->bnan() == Math::BigFloat->bone() ok 19 - Math::BigFloat->bone() == Math::BigFloat->bnan() ok 20 - Math::BigFloat->bnan() == Math::BigFloat->bnan() ok 21 - Math::BigFloat->bnan() <= Math::BigFloat->bone() ok 22 - Math::BigFloat->bone() <= Math::BigFloat->bnan() ok 23 - Math::BigFloat->bnan() <= Math::BigFloat->bnan() ok 24 - Math::BigFloat->bnan() >= Math::BigFloat->bone() ok 25 - Math::BigFloat->bone() >= Math::BigFloat->bnan() ok 26 - Math::BigFloat->bnan() >= Math::BigFloat->bnan() ok t\new_overloaded.t ..... 1..4 ok 1 - Overloaded::Num->new(2.23) ok 2 - Math::BigFloat->new() accepts overloaded numbers ok 3 - Math::BigInt->new() accepts overloaded numbers ok 4 - Math::BigFloat->new() accepts a Math::BigInt ok t\objectify_mbf.t ...... 1..6 ok 1 - $float = Math::BigFloat -> new(10); $float_percent1 = My::Percent::Float1 -> new(100); $float * $float_percent1; ok 2 - $float = Math::BigFloat -> new(10); $float_percent2 = My::Percent::Float2 -> new(100); $float * $float_percent2; ok 3 - $float = Math::BigFloat -> new(10); $float_percent3 = My::Percent::Float3 -> new(100); $float * $float_percent3; ok 4 - $float = Math::BigFloat::Subclass -> new(10); $float_percent1 = My::Percent::Float1 -> new(100); $float * $float_percent1; ok 5 - $float = Math::BigFloat::Subclass -> new(10); $float_percent2 = My::Percent::Float2 -> new(100); $float * $float_percent2; ok 6 - $float = Math::BigFloat::Subclass -> new(10); $float_percent3 = My::Percent::Float3 -> new(100); $float * $float_percent3; ok t\objectify_mbi.t ...... 1..10 ok 1 - $class -> new(10); $int_percent1 = My::Percent::Int1 -> new(100); $int * $int_percent1 ok 2 - $class -> new(10); $int_percent2 = My::Percent::Int2 -> new(100); $int * $int_percent2 ok 3 - $class -> new(10); $int_percent3 = My::Percent::Int3 -> new(100); $int * $int_percent3 ok 4 - $class -> new(10); $int_percent4 = My::Percent::Int4 -> new(100); $int * $int_percent4 ok 5 - $class -> new(10); $int_percent5 = My::Percent::Int5 -> new(100); $int * $int_percent5 ok 6 - $class -> new(10); $int_percent1 = My::Percent::Int1 -> new(100); $int * $int_percent1 ok 7 - $class -> new(10); $int_percent2 = My::Percent::Int2 -> new(100); $int * $int_percent2 ok 8 - $class -> new(10); $int_percent3 = My::Percent::Int3 -> new(100); $int * $int_percent3 ok 9 - $class -> new(10); $int_percent4 = My::Percent::Int4 -> new(100); $int * $int_percent4 ok 10 - $class -> new(10); $int_percent5 = My::Percent::Int5 -> new(100); $int * $int_percent5 ok t\req_mbf0.t ........... 1..1 ok 1 - $x is 1 ok t\req_mbf1.t ........... 1..1 ok 1 - $x is 1 ok t\req_mbfa.t ........... 1..1 ok 1 - $x is NaN ok t\req_mbfi.t ........... 1..1 ok 1 - $x is inf ok t\req_mbfn.t ........... 1..1 ok 1 - $x is 2 ok t\req_mbfw.t ........... 1..3 ok 1 - $x is 2 ok 2 - "with" ignored ok 3 - "with" ignored ok t\require.t ............ 1..1 ok 1 - $x is 2 ok t\round.t .............. 1..95 ok 1 - round(3) ok 2 - round(3.1) ok 3 - round(3.5) ok 4 - round(3.6) ok 5 - round(3.9) ok 6 - bfround(3) ok 7 - bfround(3.1) ok 8 - bfround(3.5) ok 9 - bfround(3.6) ok 10 - bfround(3.9) ok 11 - bfround(2) ok 12 - bfround(2.1) ok 13 - bfround(2.5) ok 14 - bfround(2.6) ok 15 - bfround(2.9) ok 16 - bfround(-2) ok 17 - bfround(-2.1) ok 18 - bfround(-2.5) ok 19 - bfround(-2.6) ok 20 - bfround(-2.9) ok 21 - bfround(-3) ok 22 - bfround(-3.1) ok 23 - bfround(-3.5) ok 24 - bfround(-3.6) ok 25 - bfround(-3.9) ok 26 - bround(4) ok 27 - bround(4.1) ok 28 - bround(4.5) ok 29 - bround(4.6) ok 30 - bround(4.9) ok 31 - bround(3) ok 32 - bround(3.1) ok 33 - bround(3.5) ok 34 - bround(3.6) ok 35 - bround(3.9) ok 36 - bround(2) ok 37 - bround(2.1) ok 38 - bround(2.5) ok 39 - bround(2.6) ok 40 - bround(2.9) ok 41 - bsqrt(4) ok 42 - bsqrt(4.1) ok 43 - bsqrt(4.5) ok 44 - bsqrt(4.6) ok 45 - bsqrt(4.9) ok 46 - bsqrt(3) ok 47 - bsqrt(3.1) ok 48 - bsqrt(3.5) ok 49 - bsqrt(3.6) ok 50 - bsqrt(3.9) ok 51 - bsqrt(2) ok 52 - bsqrt(2.1) ok 53 - bsqrt(2.5) ok 54 - bsqrt(2.6) ok 55 - bsqrt(2.9) ok 56 - bsqrt(undef, 2) ok 57 - bsqrt(undef, 2.1) ok 58 - bsqrt(undef.2.5) ok 59 - bsqrt(undef, 2.6) ok 60 - bsqrt(undef, 2.9) ok 61 - bsqrt(undef, -2) ok 62 - bsqrt(undef, -2.1) ok 63 - bsqrt(undef.-2.5) ok 64 - bsqrt(undef, -2.6) ok 65 - bsqrt(undef, -2.9) ok 66 - bdiv(2, 6) ok 67 - bdiv(2, 6.1) ok 68 - bdiv(2, 6.5) ok 69 - bdiv(2, 6.6) ok 70 - bdiv(2, 6.9) ok 71 - bdiv(2, 4) ok 72 - bdiv(2, 4.1) ok 73 - bdiv(2, 4.5) ok 74 - bdiv(2, 4.6) ok 75 - bdiv(2, 4.9) ok 76 - bdiv(2, 3) ok 77 - bdiv(2, 3.1) ok 78 - bdiv(2, 3.5) ok 79 - bdiv(2, 3.6) ok 80 - bdiv(2, 3.9) ok 81 - bdiv(undef, -6) ok 82 - bdiv(2, undef, -6.1) ok 83 - bdiv(2, undef, -6.5) ok 84 - bdiv(2, undef, -6.6) ok 85 - bdiv(2, undef, -6.9) ok 86 - bdiv(undef, -4) ok 87 - bdiv(2, undef, -4.1) ok 88 - bdiv(2, undef, -4.5) ok 89 - bdiv(2, undef, -4.6) ok 90 - bdiv(2, undef, -4.9) ok 91 - bdiv(undef, -3) ok 92 - bdiv(2, undef, -3.1) ok 93 - bdiv(2, undef, -3.5) ok 94 - bdiv(2, undef, -3.6) ok 95 - bdiv(2, undef, -3.9) ok t\rt-16221.t ........... 1..2 ok 1 - $int * $int_percent = 10 ok 2 - $float * $float_percent = 10 ok t\sub_ali.t ............ 1..6 ok 1 - Math::BigInt::Subclass -> new(123) -> is_pos() ok 2 - Math::BigInt::Subclass -> new(123) -> is_neg() ok 3 - Math::BigInt::Subclass -> new(123) -> as_int() ok 4 - ref(Math::BigInt::Subclass -> new(123) -> as_int()) ok 5 - Math::BigInt::Subclass -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigInt::Subclass -> new(123) -> bneg() -> is_neg() ok t\sub_mbf.t ............ 1..2415 ok 1 - Math::BigFloat::Subclass->config()->{lib} ok 2 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("12"); Math::BigFloat::Subclass::bgcd($x, $y); ok 3 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("12"); Math::BigFloat::Subclass::bgcd($x, $y); ok 4 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("12"); Math::BigFloat::Subclass::bgcd($x, $y); ok 5 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("12"); Math::BigFloat::Subclass::bgcd($x, $y); ok 6 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 7 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 8 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 9 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 10 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 11 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 12 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 13 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 14 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 15 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass::bgcd($x, $y); ok 16 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass::bgcd($x, $y); ok 17 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass::bgcd($x, $y); ok 18 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::bgcd($x, $y); ok 19 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::bgcd($x, $y); ok 20 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass::bgcd($x, $y); ok 21 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass::bgcd($x, $y); ok 22 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::bgcd($x, $y); ok 23 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::bgcd($x, $y); ok 24 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass::bgcd($x, $y); ok 25 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass::bgcd($x, $y); ok 26 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::bgcd($x, $y); ok 27 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::bgcd($x, $y); ok 28 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass::bgcd($x, $y); ok 29 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass::bgcd($x, $y); ok 30 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); Math::BigFloat::Subclass::bgcd($x, $y); ok 31 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); Math::BigFloat::Subclass::bgcd($x, $y); ok 32 - $x = Math::BigFloat::Subclass->new("+3"); $y = Math::BigFloat::Subclass->new("+2"); Math::BigFloat::Subclass::bgcd($x, $y); ok 33 - $x = Math::BigFloat::Subclass->new("+3"); $y = Math::BigFloat::Subclass->new("+2"); Math::BigFloat::Subclass::bgcd($x, $y); ok 34 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("+2"); Math::BigFloat::Subclass::bgcd($x, $y); ok 35 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("+2"); Math::BigFloat::Subclass::bgcd($x, $y); ok 36 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-2"); Math::BigFloat::Subclass::bgcd($x, $y); ok 37 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-2"); Math::BigFloat::Subclass::bgcd($x, $y); ok 38 - $x = Math::BigFloat::Subclass->new("-144"); $y = Math::BigFloat::Subclass->new("-60"); Math::BigFloat::Subclass::bgcd($x, $y); ok 39 - $x = Math::BigFloat::Subclass->new("-144"); $y = Math::BigFloat::Subclass->new("-60"); Math::BigFloat::Subclass::bgcd($x, $y); ok 40 - $x = Math::BigFloat::Subclass->new("144"); $y = Math::BigFloat::Subclass->new("-60"); Math::BigFloat::Subclass::bgcd($x, $y); ok 41 - $x = Math::BigFloat::Subclass->new("144"); $y = Math::BigFloat::Subclass->new("-60"); Math::BigFloat::Subclass::bgcd($x, $y); ok 42 - $x = Math::BigFloat::Subclass->new("144"); $y = Math::BigFloat::Subclass->new("60"); Math::BigFloat::Subclass::bgcd($x, $y); ok 43 - $x = Math::BigFloat::Subclass->new("144"); $y = Math::BigFloat::Subclass->new("60"); Math::BigFloat::Subclass::bgcd($x, $y); ok 44 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("625"); Math::BigFloat::Subclass::bgcd($x, $y); ok 45 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("625"); Math::BigFloat::Subclass::bgcd($x, $y); ok 46 - $x = Math::BigFloat::Subclass->new("4096"); $y = Math::BigFloat::Subclass->new("81"); Math::BigFloat::Subclass::bgcd($x, $y); ok 47 - $x = Math::BigFloat::Subclass->new("4096"); $y = Math::BigFloat::Subclass->new("81"); Math::BigFloat::Subclass::bgcd($x, $y); ok 48 - $x = Math::BigFloat::Subclass->new("1034"); $y = Math::BigFloat::Subclass->new("804"); Math::BigFloat::Subclass::bgcd($x, $y); ok 49 - $x = Math::BigFloat::Subclass->new("1034"); $y = Math::BigFloat::Subclass->new("804"); Math::BigFloat::Subclass::bgcd($x, $y); ok 50 - $x = Math::BigFloat::Subclass->new("27"); $y = Math::BigFloat::Subclass->new("90"); $z = Math::BigFloat::Subclass->new("56"); Math::BigFloat::Subclass::bgcd($x, $y, $z); ok 51 - $x = Math::BigFloat::Subclass->new("27"); $y = Math::BigFloat::Subclass->new("90"); $z = Math::BigFloat::Subclass->new("56"); Math::BigFloat::Subclass::bgcd($x, $y, $z); ok 52 - $x = Math::BigFloat::Subclass->new("27"); $y = Math::BigFloat::Subclass->new("90"); $z = Math::BigFloat::Subclass->new("54"); Math::BigFloat::Subclass::bgcd($x, $y, $z); ok 53 - $x = Math::BigFloat::Subclass->new("27"); $y = Math::BigFloat::Subclass->new("90"); $z = Math::BigFloat::Subclass->new("54"); Math::BigFloat::Subclass::bgcd($x, $y, $z); ok 54 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass::blcm($x, $y); ok 55 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass::blcm($x, $y); ok 56 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::blcm($x, $y); ok 57 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::blcm($x, $y); ok 58 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass::blcm($x, $y); ok 59 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass::blcm($x, $y); ok 60 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::blcm($x, $y); ok 61 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::blcm($x, $y); ok 62 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::blcm($x, $y); ok 63 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass::blcm($x, $y); ok 64 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass::blcm($x, $y); ok 65 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass::blcm($x, $y); ok 66 - $x = Math::BigFloat::Subclass->new("+27"); $y = Math::BigFloat::Subclass->new("+90"); Math::BigFloat::Subclass::blcm($x, $y); ok 67 - $x = Math::BigFloat::Subclass->new("+27"); $y = Math::BigFloat::Subclass->new("+90"); Math::BigFloat::Subclass::blcm($x, $y); ok 68 - $x = Math::BigFloat::Subclass->new("+1034"); $y = Math::BigFloat::Subclass->new("+804"); Math::BigFloat::Subclass::blcm($x, $y); ok 69 - $x = Math::BigFloat::Subclass->new("+1034"); $y = Math::BigFloat::Subclass->new("+804"); Math::BigFloat::Subclass::blcm($x, $y); ok 70 - $x = Math::BigFloat::Subclass->new("1.2"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 71 - $x = Math::BigFloat::Subclass->new("1.2"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 72 - $x = Math::BigFloat::Subclass->new("2.4"); $y = Math::BigFloat::Subclass->new("12"); $x->bcos($y); ok 73 - $x = Math::BigFloat::Subclass->new("2.4"); $y = Math::BigFloat::Subclass->new("12"); $x->bcos($y); ok 74 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 75 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 76 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("20"); $x->bcos($y); ok 77 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("20"); $x->bcos($y); ok 78 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 79 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 80 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("12"); $x->bcos($y); ok 81 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("12"); $x->bcos($y); ok 82 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 83 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 84 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 85 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 86 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("20"); $x->bsin($y); ok 87 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("20"); $x->bsin($y); ok 88 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("12"); $x->bsin($y); ok 89 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("12"); $x->bsin($y); ok 90 - $x = Math::BigFloat::Subclass->new("1.2"); $y = Math::BigFloat::Subclass->new("13"); $x->bsin($y); ok 91 - $x = Math::BigFloat::Subclass->new("1.2"); $y = Math::BigFloat::Subclass->new("13"); $x->bsin($y); ok 92 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("13"); $x->bsin($y); ok 93 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("13"); $x->bsin($y); ok 94 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("12"); $x->bsin($y); ok 95 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("12"); $x->bsin($y); ok 96 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("10"); $x->batan($y); ok 97 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("10"); $x->batan($y); ok 98 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 99 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 100 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 101 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 102 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 103 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 104 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->batan($y); ok 105 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->batan($y); ok 106 - $x = Math::BigFloat::Subclass->new("0.1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 107 - $x = Math::BigFloat::Subclass->new("0.1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 108 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("13"); $x->batan($y); ok 109 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("13"); $x->batan($y); ok 110 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 111 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 112 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 113 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 114 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 115 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 116 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 117 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 118 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 119 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 120 - $x = Math::BigFloat::Subclass->new("2.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 121 - $x = Math::BigFloat::Subclass->new("2.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 122 - $x = Math::BigFloat::Subclass->new("2.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 123 - $x = Math::BigFloat::Subclass->new("2.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 124 - $x = Math::BigFloat::Subclass->new("3.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 125 - $x = Math::BigFloat::Subclass->new("3.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 126 - $x = Math::BigFloat::Subclass->new("6.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 127 - $x = Math::BigFloat::Subclass->new("6.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 128 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 129 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 130 - $x = Math::BigFloat::Subclass->new("24"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 131 - $x = Math::BigFloat::Subclass->new("24"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 132 - $x = Math::BigFloat::Subclass->new("48"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 133 - $x = Math::BigFloat::Subclass->new("48"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 134 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 135 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 136 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 137 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 138 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 139 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 140 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 141 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 142 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 143 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 144 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 145 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 146 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 147 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 148 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 149 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 150 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 151 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 152 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 153 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 154 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 155 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 156 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 157 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 158 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 159 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 160 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 161 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 162 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 163 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 164 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 165 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 166 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 167 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 168 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 169 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 170 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 171 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 172 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 173 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 174 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 175 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 176 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 177 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 178 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 179 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 180 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 181 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 182 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 183 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 184 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 185 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 186 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 187 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 188 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 189 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 190 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("13"); $x->batan2($y, $z); ok 191 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("13"); $x->batan2($y, $z); ok 192 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 193 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 194 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 195 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 196 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 197 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 198 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("11"); $x->batan2($y, $z); ok 199 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("11"); $x->batan2($y, $z); ok 200 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("77"); $x->batan2($y, $z); ok 201 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("77"); $x->batan2($y, $z); ok 202 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("77"); $x->batan2($y, $z); ok 203 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("77"); $x->batan2($y, $z); ok 204 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 205 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 206 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 207 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 208 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("8"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 209 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("8"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 210 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("8"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 211 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("8"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 212 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $z = Math::BigFloat::Subclass->new("24"); $x->batan2($y, $z); ok 213 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $z = Math::BigFloat::Subclass->new("24"); $x->batan2($y, $z); ok 214 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 215 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 216 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 217 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 218 - $x = Math::BigFloat::Subclass->new("150"); Math::BigFloat::Subclass->bpi($x); ok 219 - $x = Math::BigFloat::Subclass->new("150"); Math::BigFloat::Subclass->bpi($x); ok 220 - $x = Math::BigFloat::Subclass->new("77"); Math::BigFloat::Subclass->bpi($x); ok 221 - $x = Math::BigFloat::Subclass->new("77"); Math::BigFloat::Subclass->bpi($x); ok 222 - $x = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bpi($x); ok 223 - $x = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bpi($x); ok 224 - $x = Math::BigFloat::Subclass->new("11"); Math::BigFloat::Subclass->bpi($x); ok 225 - $x = Math::BigFloat::Subclass->new("11"); Math::BigFloat::Subclass->bpi($x); ok 226 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bnok($y); ok 227 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bnok($y); ok 228 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bnok($y); ok 229 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bnok($y); ok 230 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 231 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 232 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bnok($y); ok 233 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bnok($y); ok 234 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 235 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 236 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bnok($y); ok 237 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bnok($y); ok 238 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("3"); $x->bnok($y); ok 239 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("3"); $x->bnok($y); ok 240 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-2"); $x->bnok($y); ok 241 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-2"); $x->bnok($y); ok 242 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("3"); $x->bnok($y); ok 243 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("3"); $x->bnok($y); ok 244 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("6"); $x->bnok($y); ok 245 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("6"); $x->bnok($y); ok 246 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("90"); $x->bnok($y); ok 247 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("90"); $x->bnok($y); ok 248 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("95"); $x->bnok($y); ok 249 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("95"); $x->bnok($y); ok 250 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $x->bnok($y); ok 251 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $x->bnok($y); ok 252 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("0"); $x->bnok($y); ok 253 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("0"); $x->bnok($y); ok 254 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 255 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 256 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 257 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 258 - $x = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 259 - $x = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 260 - $x = Math::BigFloat::Subclass->new("-2"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 261 - $x = Math::BigFloat::Subclass->new("-2"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 262 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(-1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 263 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(-1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 264 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(0); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 265 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(0); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 266 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 267 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 268 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 269 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 270 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new(1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 271 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new(1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 272 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new(2); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 273 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new(2); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 274 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 275 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 276 - $x = Math::BigFloat::Subclass->new("2.718281828"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 277 - $x = Math::BigFloat::Subclass->new("2.718281828"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 278 - $x = Math::BigFloat::Subclass->new("2.718281828"); $Math::BigFloat::Subclass::div_scale = 20; $x->blog(); ok 279 - $x = Math::BigFloat::Subclass->new("2.718281828"); $Math::BigFloat::Subclass::div_scale = 20; $x->blog(); ok 280 - $x = Math::BigFloat::Subclass->new("123"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 281 - $x = Math::BigFloat::Subclass->new("123"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 282 - $x = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 283 - $x = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 284 - $x = Math::BigFloat::Subclass->new("1000"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 285 - $x = Math::BigFloat::Subclass->new("1000"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 286 - $x = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 287 - $x = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 288 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 289 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 290 - $x = Math::BigFloat::Subclass->new("3.1415"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 291 - $x = Math::BigFloat::Subclass->new("3.1415"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 292 - $x = Math::BigFloat::Subclass->new("12345"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 293 - $x = Math::BigFloat::Subclass->new("12345"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 294 - $x = Math::BigFloat::Subclass->new("0.001"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 295 - $x = Math::BigFloat::Subclass->new("0.001"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 296 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new(10); $Math::BigFloat::Subclass::div_scale = 15; $x->blog($y); ok 297 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new(10); $Math::BigFloat::Subclass::div_scale = 15; $x->blog($y); ok 298 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new(100); $Math::BigFloat::Subclass::div_scale = 15; $x->blog($y); ok 299 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new(100); $Math::BigFloat::Subclass::div_scale = 15; $x->blog($y); ok 300 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 301 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 302 - $x = Math::BigFloat::Subclass->new("NaNbrsft"); $y = Math::BigFloat::Subclass->new("2"); $x >> $y; ok 303 - $x = Math::BigFloat::Subclass->new("NaNbrsft"); $y = Math::BigFloat::Subclass->new("2"); $x >> $y; ok 304 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $x >> $y; ok 305 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $x >> $y; ok 306 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x >> $y; ok 307 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x >> $y; ok 308 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x >> $y; ok 309 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x >> $y; ok 310 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("1"); $x >> $y; ok 311 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("1"); $x >> $y; ok 312 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("1"); $x >> $y; ok 313 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("1"); $x >> $y; ok 314 - $x = Math::BigFloat::Subclass->new("32"); $y = Math::BigFloat::Subclass->new("3"); $x >> $y; ok 315 - $x = Math::BigFloat::Subclass->new("32"); $y = Math::BigFloat::Subclass->new("3"); $x >> $y; ok 316 - $x = Math::BigFloat::Subclass->new("NaNblsft"); $y = Math::BigFloat::Subclass->new("0"); $x << $y; ok 317 - $x = Math::BigFloat::Subclass->new("NaNblsft"); $y = Math::BigFloat::Subclass->new("0"); $x << $y; ok 318 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x << $y; ok 319 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x << $y; ok 320 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x << $y; ok 321 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x << $y; ok 322 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("3"); $x << $y; ok 323 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("3"); $x << $y; ok 324 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x << $y; ok 325 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x << $y; ok 326 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("5"); $x << $y; ok 327 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("5"); $x << $y; ok 328 - $x = Math::BigFloat::Subclass->new("1"); $x; ok 329 - $x = Math::BigFloat::Subclass->new("1"); $x; ok 330 - $x = Math::BigFloat::Subclass->new("-0"); $x; ok 331 - $x = Math::BigFloat::Subclass->new("-0"); $x; ok 332 - $x = Math::BigFloat::Subclass->new("bnormNaN"); $x; ok 333 - $x = Math::BigFloat::Subclass->new("bnormNaN"); $x; ok 334 - $x = Math::BigFloat::Subclass->new("+inf"); $x; ok 335 - $x = Math::BigFloat::Subclass->new("+inf"); $x; ok 336 - $x = Math::BigFloat::Subclass->new("-inf"); $x; ok 337 - $x = Math::BigFloat::Subclass->new("-inf"); $x; ok 338 - $x = Math::BigFloat::Subclass->new("123"); $x; ok 339 - $x = Math::BigFloat::Subclass->new("123"); $x; ok 340 - $x = Math::BigFloat::Subclass->new("-123.4567"); $x; ok 341 - $x = Math::BigFloat::Subclass->new("-123.4567"); $x; ok 342 - $x = Math::BigFloat::Subclass->new("1__2"); $x; ok 343 - $x = Math::BigFloat::Subclass->new("1__2"); $x; ok 344 - $x = Math::BigFloat::Subclass->new("1E1__2"); $x; ok 345 - $x = Math::BigFloat::Subclass->new("1E1__2"); $x; ok 346 - $x = Math::BigFloat::Subclass->new("11__2E2"); $x; ok 347 - $x = Math::BigFloat::Subclass->new("11__2E2"); $x; ok 348 - $x = Math::BigFloat::Subclass->new(".2E-3."); $x; ok 349 - $x = Math::BigFloat::Subclass->new(".2E-3."); $x; ok 350 - $x = Math::BigFloat::Subclass->new("1e3e4"); $x; ok 351 - $x = Math::BigFloat::Subclass->new("1e3e4"); $x; ok 352 - $x = Math::BigFloat::Subclass->new(".2E2"); $x; ok 353 - $x = Math::BigFloat::Subclass->new(".2E2"); $x; ok 354 - $x = Math::BigFloat::Subclass->new("1.E3"); $x; ok 355 - $x = Math::BigFloat::Subclass->new("1.E3"); $x; ok 356 - $x = Math::BigFloat::Subclass->new("0e0"); $x; ok 357 - $x = Math::BigFloat::Subclass->new("0e0"); $x; ok 358 - $x = Math::BigFloat::Subclass->new("+0e0"); $x; ok 359 - $x = Math::BigFloat::Subclass->new("+0e0"); $x; ok 360 - $x = Math::BigFloat::Subclass->new("+0e+0"); $x; ok 361 - $x = Math::BigFloat::Subclass->new("+0e+0"); $x; ok 362 - $x = Math::BigFloat::Subclass->new("-0e+0"); $x; ok 363 - $x = Math::BigFloat::Subclass->new("-0e+0"); $x; ok 364 - $x = Math::BigFloat::Subclass->new("0e-0"); $x; ok 365 - $x = Math::BigFloat::Subclass->new("0e-0"); $x; ok 366 - $x = Math::BigFloat::Subclass->new("-0e-0"); $x; ok 367 - $x = Math::BigFloat::Subclass->new("-0e-0"); $x; ok 368 - $x = Math::BigFloat::Subclass->new("+0e-0"); $x; ok 369 - $x = Math::BigFloat::Subclass->new("+0e-0"); $x; ok 370 - $x = Math::BigFloat::Subclass->new("000"); $x; ok 371 - $x = Math::BigFloat::Subclass->new("000"); $x; ok 372 - $x = Math::BigFloat::Subclass->new("00e2"); $x; ok 373 - $x = Math::BigFloat::Subclass->new("00e2"); $x; ok 374 - $x = Math::BigFloat::Subclass->new("00e02"); $x; ok 375 - $x = Math::BigFloat::Subclass->new("00e02"); $x; ok 376 - $x = Math::BigFloat::Subclass->new("000e002"); $x; ok 377 - $x = Math::BigFloat::Subclass->new("000e002"); $x; ok 378 - $x = Math::BigFloat::Subclass->new("000e1230"); $x; ok 379 - $x = Math::BigFloat::Subclass->new("000e1230"); $x; ok 380 - $x = Math::BigFloat::Subclass->new("00e-3"); $x; ok 381 - $x = Math::BigFloat::Subclass->new("00e-3"); $x; ok 382 - $x = Math::BigFloat::Subclass->new("00e+3"); $x; ok 383 - $x = Math::BigFloat::Subclass->new("00e+3"); $x; ok 384 - $x = Math::BigFloat::Subclass->new("00e-03"); $x; ok 385 - $x = Math::BigFloat::Subclass->new("00e-03"); $x; ok 386 - $x = Math::BigFloat::Subclass->new("00e+03"); $x; ok 387 - $x = Math::BigFloat::Subclass->new("00e+03"); $x; ok 388 - $x = Math::BigFloat::Subclass->new("-000"); $x; ok 389 - $x = Math::BigFloat::Subclass->new("-000"); $x; ok 390 - $x = Math::BigFloat::Subclass->new("-00e2"); $x; ok 391 - $x = Math::BigFloat::Subclass->new("-00e2"); $x; ok 392 - $x = Math::BigFloat::Subclass->new("-00e02"); $x; ok 393 - $x = Math::BigFloat::Subclass->new("-00e02"); $x; ok 394 - $x = Math::BigFloat::Subclass->new("-000e002"); $x; ok 395 - $x = Math::BigFloat::Subclass->new("-000e002"); $x; ok 396 - $x = Math::BigFloat::Subclass->new("-000e1230"); $x; ok 397 - $x = Math::BigFloat::Subclass->new("-000e1230"); $x; ok 398 - $x = Math::BigFloat::Subclass->new("-00e-3"); $x; ok 399 - $x = Math::BigFloat::Subclass->new("-00e-3"); $x; ok 400 - $x = Math::BigFloat::Subclass->new("-00e+3"); $x; ok 401 - $x = Math::BigFloat::Subclass->new("-00e+3"); $x; ok 402 - $x = Math::BigFloat::Subclass->new("-00e-03"); $x; ok 403 - $x = Math::BigFloat::Subclass->new("-00e-03"); $x; ok 404 - $x = Math::BigFloat::Subclass->new("-00e+03"); $x; ok 405 - $x = Math::BigFloat::Subclass->new("-00e+03"); $x; ok 406 - $x = Math::BigFloat::Subclass->new("0"); $x->as_number(); ok 407 - $x = Math::BigFloat::Subclass->new("1"); $x->as_number(); ok 408 - $x = Math::BigFloat::Subclass->new("1.2"); $x->as_number(); ok 409 - $x = Math::BigFloat::Subclass->new("2.345"); $x->as_number(); ok 410 - $x = Math::BigFloat::Subclass->new("-2"); $x->as_number(); ok 411 - $x = Math::BigFloat::Subclass->new("-123.456"); $x->as_number(); ok 412 - $x = Math::BigFloat::Subclass->new("-200"); $x->as_number(); ok 413 - $x = Math::BigFloat::Subclass->new("-inf"); $x->as_number(); ok 414 - $x = Math::BigFloat::Subclass->new("inf"); $x->as_number(); ok 415 - $x = Math::BigFloat::Subclass->new("NaN"); $x->as_number(); ok 416 - $x = Math::BigFloat::Subclass->new("71243225429896467497217836789578596379"); $x->as_number(); ok 417 - $x = Math::BigFloat::Subclass->new("0.000641"); $x->as_number(); ok 418 - $x = Math::BigFloat::Subclass->new("0.0006412"); $x->as_number(); ok 419 - $x = Math::BigFloat::Subclass->new("0.00064123"); $x->as_number(); ok 420 - $x = Math::BigFloat::Subclass->new("0.000641234"); $x->as_number(); ok 421 - $x = Math::BigFloat::Subclass->new("0.0006412345"); $x->as_number(); ok 422 - $x = Math::BigFloat::Subclass->new("0.00064123456"); $x->as_number(); ok 423 - $x = Math::BigFloat::Subclass->new("0.000641234567"); $x->as_number(); ok 424 - $x = Math::BigFloat::Subclass->new("0.0006412345678"); $x->as_number(); ok 425 - $x = Math::BigFloat::Subclass->new("0.00064123456789"); $x->as_number(); ok 426 - $x = Math::BigFloat::Subclass->new("0.1"); $x->as_number(); ok 427 - $x = Math::BigFloat::Subclass->new("0.01"); $x->as_number(); ok 428 - $x = Math::BigFloat::Subclass->new("0.001"); $x->as_number(); ok 429 - $x = Math::BigFloat::Subclass->new("0.0001"); $x->as_number(); ok 430 - $x = Math::BigFloat::Subclass->new("0.00001"); $x->as_number(); ok 431 - $x = Math::BigFloat::Subclass->new("0.000001"); $x->as_number(); ok 432 - $x = Math::BigFloat::Subclass->new("0.0000001"); $x->as_number(); ok 433 - $x = Math::BigFloat::Subclass->new("0.00000001"); $x->as_number(); ok 434 - $x = Math::BigFloat::Subclass->new("0.000000001"); $x->as_number(); ok 435 - $x = Math::BigFloat::Subclass->new("0.0000000001"); $x->as_number(); ok 436 - $x = Math::BigFloat::Subclass->new("0.00000000001"); $x->as_number(); ok 437 - $x = Math::BigFloat::Subclass->new("0.12345"); $x->as_number(); ok 438 - $x = Math::BigFloat::Subclass->new("0.123456"); $x->as_number(); ok 439 - $x = Math::BigFloat::Subclass->new("0.1234567"); $x->as_number(); ok 440 - $x = Math::BigFloat::Subclass->new("0.12345678"); $x->as_number(); ok 441 - $x = Math::BigFloat::Subclass->new("0.123456789"); $x->as_number(); ok 442 - $x = Math::BigFloat::Subclass->new("1"); $x->binf("+"); ok 443 - $x = Math::BigFloat::Subclass->new("1"); $x->binf("+"); ok 444 - $x = Math::BigFloat::Subclass->new("2"); $x->binf("-"); ok 445 - $x = Math::BigFloat::Subclass->new("2"); $x->binf("-"); ok 446 - $x = Math::BigFloat::Subclass->new("3"); $x->binf("abc"); ok 447 - $x = Math::BigFloat::Subclass->new("3"); $x->binf("abc"); ok 448 - $x = Math::BigFloat::Subclass->new("+inf"); $x->as_hex(); ok 449 - $x = Math::BigFloat::Subclass->new("-inf"); $x->as_hex(); ok 450 - $x = Math::BigFloat::Subclass->new("hexNaN"); $x->as_hex(); ok 451 - $x = Math::BigFloat::Subclass->new("0"); $x->as_hex(); ok 452 - $x = Math::BigFloat::Subclass->new("5"); $x->as_hex(); ok 453 - $x = Math::BigFloat::Subclass->new("-5"); $x->as_hex(); ok 454 - $x = Math::BigFloat::Subclass->new("+inf"); $x->as_bin(); ok 455 - $x = Math::BigFloat::Subclass->new("-inf"); $x->as_bin(); ok 456 - $x = Math::BigFloat::Subclass->new("hexNaN"); $x->as_bin(); ok 457 - $x = Math::BigFloat::Subclass->new("0"); $x->as_bin(); ok 458 - $x = Math::BigFloat::Subclass->new("5"); $x->as_bin(); ok 459 - $x = Math::BigFloat::Subclass->new("-5"); $x->as_bin(); ok 460 - $x = Math::BigFloat::Subclass->new("0"); $x->numify(); ok 461 - $x = Math::BigFloat::Subclass->new("+1"); $x->numify(); ok 462 - $x = Math::BigFloat::Subclass->new("1234"); $x->numify(); ok 463 - $x = Math::BigFloat::Subclass->new("-5"); $x->numify(); ok 464 - $x = Math::BigFloat::Subclass->new("100"); $x->numify(); ok 465 - $x = Math::BigFloat::Subclass->new("-100"); $x->numify(); ok 466 - $x = Math::BigFloat::Subclass->new("abc"); $x->bnan(); ok 467 - $x = Math::BigFloat::Subclass->new("abc"); $x->bnan(); ok 468 - $x = Math::BigFloat::Subclass->new("2"); $x->bnan(); ok 469 - $x = Math::BigFloat::Subclass->new("2"); $x->bnan(); ok 470 - $x = Math::BigFloat::Subclass->new("-2"); $x->bnan(); ok 471 - $x = Math::BigFloat::Subclass->new("-2"); $x->bnan(); ok 472 - $x = Math::BigFloat::Subclass->new("0"); $x->bnan(); ok 473 - $x = Math::BigFloat::Subclass->new("0"); $x->bnan(); ok 474 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("+"); ok 475 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("+"); ok 476 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone("-"); ok 477 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone("-"); ok 478 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone("+"); ok 479 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone("+"); ok 480 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("-"); ok 481 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("-"); ok 482 - $x = Math::BigFloat::Subclass->new("0"); $x->bone(""); ok 483 - $x = Math::BigFloat::Subclass->new("0"); $x->bone(""); ok 484 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone(""); ok 485 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone(""); ok 486 - $x = Math::BigFloat::Subclass->new("abc"); $x->bone(""); ok 487 - $x = Math::BigFloat::Subclass->new("abc"); $x->bone(""); ok 488 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("abc"); ok 489 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("abc"); ok 490 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bsstr(); ok 491 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bsstr(); ok 492 - $x = Math::BigFloat::Subclass->new("abcfsstr"); $x->bsstr(); ok 493 - $x = Math::BigFloat::Subclass->new("-abcfsstr"); $x->bsstr(); ok 494 - $x = Math::BigFloat::Subclass->new("1234.567"); $x->bsstr(); ok 495 - $x = Math::BigFloat::Subclass->new("123"); $x->bsstr(); ok 496 - $x = Math::BigFloat::Subclass->new("-5"); $x->bsstr(); ok 497 - $x = Math::BigFloat::Subclass->new("-100"); $x->bsstr(); ok 498 - $x = Math::BigFloat::Subclass->new("+inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 499 - $x = Math::BigFloat::Subclass->new("-inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 500 - $x = Math::BigFloat::Subclass->new("abcfstr"); $x->accuracy(); $x->precision(); $x->bstr(); ok 501 - $x = Math::BigFloat::Subclass->new("1234.567"); $x->accuracy(9); $x->precision(); $x->bstr(); ok 502 - $x = Math::BigFloat::Subclass->new("1234.567"); $x->accuracy(); $x->precision(-6); $x->bstr(); ok 503 - $x = Math::BigFloat::Subclass->new("12345"); $x->accuracy(5); $x->precision(); $x->bstr(); ok 504 - $x = Math::BigFloat::Subclass->new("0.001234"); $x->accuracy(6); $x->precision(); $x->bstr(); ok 505 - $x = Math::BigFloat::Subclass->new("0.001234"); $x->accuracy(); $x->precision(-8); $x->bstr(); ok 506 - $x = Math::BigFloat::Subclass->new("0"); $x->accuracy(4); $x->precision(); $x->bstr(); ok 507 - $x = Math::BigFloat::Subclass->new("0"); $x->accuracy(); $x->precision(-4); $x->bstr(); ok 508 - $x = Math::BigFloat::Subclass->new("inf"); $x; ok 509 - $x = Math::BigFloat::Subclass->new("inf"); $x; ok 510 - $x = Math::BigFloat::Subclass->new("+inf"); $x; ok 511 - $x = Math::BigFloat::Subclass->new("+inf"); $x; ok 512 - $x = Math::BigFloat::Subclass->new("-inf"); $x; ok 513 - $x = Math::BigFloat::Subclass->new("-inf"); $x; ok 514 - $x = Math::BigFloat::Subclass->new("+infinity"); $x; ok 515 - $x = Math::BigFloat::Subclass->new("+infinity"); $x; ok 516 - $x = Math::BigFloat::Subclass->new("+-inf"); $x; ok 517 - $x = Math::BigFloat::Subclass->new("+-inf"); $x; ok 518 - $x = Math::BigFloat::Subclass->new("abc"); $x; ok 519 - $x = Math::BigFloat::Subclass->new("abc"); $x; ok 520 - $x = Math::BigFloat::Subclass->new(" 1 a"); $x; ok 521 - $x = Math::BigFloat::Subclass->new(" 1 a"); $x; ok 522 - $x = Math::BigFloat::Subclass->new("1bcd2"); $x; ok 523 - $x = Math::BigFloat::Subclass->new("1bcd2"); $x; ok 524 - $x = Math::BigFloat::Subclass->new("11111b"); $x; ok 525 - $x = Math::BigFloat::Subclass->new("11111b"); $x; ok 526 - $x = Math::BigFloat::Subclass->new("+1z"); $x; ok 527 - $x = Math::BigFloat::Subclass->new("+1z"); $x; ok 528 - $x = Math::BigFloat::Subclass->new("-1z"); $x; ok 529 - $x = Math::BigFloat::Subclass->new("-1z"); $x; ok 530 - $x = Math::BigFloat::Subclass->new("0e999"); $x; ok 531 - $x = Math::BigFloat::Subclass->new("0e999"); $x; ok 532 - $x = Math::BigFloat::Subclass->new("0e-999"); $x; ok 533 - $x = Math::BigFloat::Subclass->new("0e-999"); $x; ok 534 - $x = Math::BigFloat::Subclass->new("-0e999"); $x; ok 535 - $x = Math::BigFloat::Subclass->new("-0e999"); $x; ok 536 - $x = Math::BigFloat::Subclass->new("-0e-999"); $x; ok 537 - $x = Math::BigFloat::Subclass->new("-0e-999"); $x; ok 538 - $x = Math::BigFloat::Subclass->new("0"); $x; ok 539 - $x = Math::BigFloat::Subclass->new("0"); $x; ok 540 - $x = Math::BigFloat::Subclass->new("+0"); $x; ok 541 - $x = Math::BigFloat::Subclass->new("+0"); $x; ok 542 - $x = Math::BigFloat::Subclass->new("+00"); $x; ok 543 - $x = Math::BigFloat::Subclass->new("+00"); $x; ok 544 - $x = Math::BigFloat::Subclass->new("+0_0_0"); $x; ok 545 - $x = Math::BigFloat::Subclass->new("+0_0_0"); $x; ok 546 - $x = Math::BigFloat::Subclass->new("000000_0000000_00000"); $x; ok 547 - $x = Math::BigFloat::Subclass->new("000000_0000000_00000"); $x; ok 548 - $x = Math::BigFloat::Subclass->new("-0"); $x; ok 549 - $x = Math::BigFloat::Subclass->new("-0"); $x; ok 550 - $x = Math::BigFloat::Subclass->new("-0000"); $x; ok 551 - $x = Math::BigFloat::Subclass->new("-0000"); $x; ok 552 - $x = Math::BigFloat::Subclass->new("+1"); $x; ok 553 - $x = Math::BigFloat::Subclass->new("+1"); $x; ok 554 - $x = Math::BigFloat::Subclass->new("+01"); $x; ok 555 - $x = Math::BigFloat::Subclass->new("+01"); $x; ok 556 - $x = Math::BigFloat::Subclass->new("+001"); $x; ok 557 - $x = Math::BigFloat::Subclass->new("+001"); $x; ok 558 - $x = Math::BigFloat::Subclass->new("+00000100000"); $x; ok 559 - $x = Math::BigFloat::Subclass->new("+00000100000"); $x; ok 560 - $x = Math::BigFloat::Subclass->new("123456789"); $x; ok 561 - $x = Math::BigFloat::Subclass->new("123456789"); $x; ok 562 - $x = Math::BigFloat::Subclass->new("-1"); $x; ok 563 - $x = Math::BigFloat::Subclass->new("-1"); $x; ok 564 - $x = Math::BigFloat::Subclass->new("-01"); $x; ok 565 - $x = Math::BigFloat::Subclass->new("-01"); $x; ok 566 - $x = Math::BigFloat::Subclass->new("-001"); $x; ok 567 - $x = Math::BigFloat::Subclass->new("-001"); $x; ok 568 - $x = Math::BigFloat::Subclass->new("-123456789"); $x; ok 569 - $x = Math::BigFloat::Subclass->new("-123456789"); $x; ok 570 - $x = Math::BigFloat::Subclass->new("-00000100000"); $x; ok 571 - $x = Math::BigFloat::Subclass->new("-00000100000"); $x; ok 572 - $x = Math::BigFloat::Subclass->new("123.456a"); $x; ok 573 - $x = Math::BigFloat::Subclass->new("123.456a"); $x; ok 574 - $x = Math::BigFloat::Subclass->new("123.456"); $x; ok 575 - $x = Math::BigFloat::Subclass->new("123.456"); $x; ok 576 - $x = Math::BigFloat::Subclass->new("0.01"); $x; ok 577 - $x = Math::BigFloat::Subclass->new("0.01"); $x; ok 578 - $x = Math::BigFloat::Subclass->new(".002"); $x; ok 579 - $x = Math::BigFloat::Subclass->new(".002"); $x; ok 580 - $x = Math::BigFloat::Subclass->new("+.2"); $x; ok 581 - $x = Math::BigFloat::Subclass->new("+.2"); $x; ok 582 - $x = Math::BigFloat::Subclass->new("-0.0003"); $x; ok 583 - $x = Math::BigFloat::Subclass->new("-0.0003"); $x; ok 584 - $x = Math::BigFloat::Subclass->new("-.0000000004"); $x; ok 585 - $x = Math::BigFloat::Subclass->new("-.0000000004"); $x; ok 586 - $x = Math::BigFloat::Subclass->new("123456E2"); $x; ok 587 - $x = Math::BigFloat::Subclass->new("123456E2"); $x; ok 588 - $x = Math::BigFloat::Subclass->new("123456E-2"); $x; ok 589 - $x = Math::BigFloat::Subclass->new("123456E-2"); $x; ok 590 - $x = Math::BigFloat::Subclass->new("-123456E2"); $x; ok 591 - $x = Math::BigFloat::Subclass->new("-123456E2"); $x; ok 592 - $x = Math::BigFloat::Subclass->new("-123456E-2"); $x; ok 593 - $x = Math::BigFloat::Subclass->new("-123456E-2"); $x; ok 594 - $x = Math::BigFloat::Subclass->new("1e1"); $x; ok 595 - $x = Math::BigFloat::Subclass->new("1e1"); $x; ok 596 - $x = Math::BigFloat::Subclass->new("2e-11"); $x; ok 597 - $x = Math::BigFloat::Subclass->new("2e-11"); $x; ok 598 - $x = Math::BigFloat::Subclass->new(" .02e-1"); $x; ok 599 - $x = Math::BigFloat::Subclass->new(" .02e-1"); $x; ok 600 - $x = Math::BigFloat::Subclass->new(" 000001"); $x; ok 601 - $x = Math::BigFloat::Subclass->new(" 000001"); $x; ok 602 - $x = Math::BigFloat::Subclass->new(" -00001"); $x; ok 603 - $x = Math::BigFloat::Subclass->new(" -00001"); $x; ok 604 - $x = Math::BigFloat::Subclass->new(" -1"); $x; ok 605 - $x = Math::BigFloat::Subclass->new(" -1"); $x; ok 606 - $x = Math::BigFloat::Subclass->new(" 000.01"); $x; ok 607 - $x = Math::BigFloat::Subclass->new(" 000.01"); $x; ok 608 - $x = Math::BigFloat::Subclass->new(" -000.0023"); $x; ok 609 - $x = Math::BigFloat::Subclass->new(" -000.0023"); $x; ok 610 - $x = Math::BigFloat::Subclass->new(" 1.1e1"); $x; ok 611 - $x = Math::BigFloat::Subclass->new(" 1.1e1"); $x; ok 612 - $x = Math::BigFloat::Subclass->new("-3e111"); $x; ok 613 - $x = Math::BigFloat::Subclass->new("-3e111"); $x; ok 614 - $x = Math::BigFloat::Subclass->new("-4e-1111"); $x; ok 615 - $x = Math::BigFloat::Subclass->new("-4e-1111"); $x; ok 616 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x ** $y; ok 617 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x ** $y; ok 618 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $x ** $y; ok 619 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $x ** $y; ok 620 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $x ** $y; ok 621 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $x ** $y; ok 622 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $x ** $y; ok 623 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $x ** $y; ok 624 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-21"); $x ** $y; ok 625 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-21"); $x ** $y; ok 626 - $x = Math::BigFloat::Subclass->new("-21"); $y = Math::BigFloat::Subclass->new("NaN"); $x ** $y; ok 627 - $x = Math::BigFloat::Subclass->new("-21"); $y = Math::BigFloat::Subclass->new("NaN"); $x ** $y; ok 628 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("21"); $x ** $y; ok 629 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("21"); $x ** $y; ok 630 - $x = Math::BigFloat::Subclass->new("21"); $y = Math::BigFloat::Subclass->new("NaN"); $x ** $y; ok 631 - $x = Math::BigFloat::Subclass->new("21"); $y = Math::BigFloat::Subclass->new("NaN"); $x ** $y; ok 632 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $x ** $y; ok 633 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $x ** $y; ok 634 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x ** $y; ok 635 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x ** $y; ok 636 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("9"); $x ** $y; ok 637 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("9"); $x ** $y; ok 638 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-2"); $x ** $y; ok 639 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-2"); $x ** $y; ok 640 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 641 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 642 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 643 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 644 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x ** $y; ok 645 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x ** $y; ok 646 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 647 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 648 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("3"); $x ** $y; ok 649 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("3"); $x ** $y; ok 650 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 651 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 652 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-2"); $x ** $y; ok 653 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-2"); $x ** $y; ok 654 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-3"); $x ** $y; ok 655 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-3"); $x ** $y; ok 656 - $x = Math::BigFloat::Subclass->new("128"); $y = Math::BigFloat::Subclass->new("-2"); $x ** $y; ok 657 - $x = Math::BigFloat::Subclass->new("128"); $y = Math::BigFloat::Subclass->new("-2"); $x ** $y; ok 658 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("123.456"); $x ** $y; ok 659 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("123.456"); $x ** $y; ok 660 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("abc"); $x ** $y; ok 661 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("abc"); $x ** $y; ok 662 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("123.45"); $x ** $y; ok 663 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("123.45"); $x ** $y; ok 664 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("123.45"); $x ** $y; ok 665 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("123.45"); $x ** $y; ok 666 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-123.45"); $x ** $y; ok 667 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-123.45"); $x ** $y; ok 668 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-123.45"); $x ** $y; ok 669 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-123.45"); $x ** $y; ok 670 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 671 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 672 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x ** $y; ok 673 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x ** $y; ok 674 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("4"); $x ** $y; ok 675 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("4"); $x ** $y; ok 676 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("5"); $x ** $y; ok 677 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("5"); $x ** $y; ok 678 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 679 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("2"); $x ** $y; ok 680 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("3"); $x ** $y; ok 681 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("3"); $x ** $y; ok 682 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $x ** $y; ok 683 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $x ** $y; ok 684 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("5"); $x ** $y; ok 685 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("5"); $x ** $y; ok 686 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0.5"); $x ** $y; ok 687 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0.5"); $x ** $y; ok 688 - $x = Math::BigFloat::Subclass->new("bnegNaN"); $x->bneg(); ok 689 - $x = Math::BigFloat::Subclass->new("bnegNaN"); $x->bneg(); ok 690 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bneg(); ok 691 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bneg(); ok 692 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bneg(); ok 693 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bneg(); ok 694 - $x = Math::BigFloat::Subclass->new("+0"); $x->bneg(); ok 695 - $x = Math::BigFloat::Subclass->new("+0"); $x->bneg(); ok 696 - $x = Math::BigFloat::Subclass->new("+1"); $x->bneg(); ok 697 - $x = Math::BigFloat::Subclass->new("+1"); $x->bneg(); ok 698 - $x = Math::BigFloat::Subclass->new("-1"); $x->bneg(); ok 699 - $x = Math::BigFloat::Subclass->new("-1"); $x->bneg(); ok 700 - $x = Math::BigFloat::Subclass->new("+123456789"); $x->bneg(); ok 701 - $x = Math::BigFloat::Subclass->new("+123456789"); $x->bneg(); ok 702 - $x = Math::BigFloat::Subclass->new("-123456789"); $x->bneg(); ok 703 - $x = Math::BigFloat::Subclass->new("-123456789"); $x->bneg(); ok 704 - $x = Math::BigFloat::Subclass->new("+123.456789"); $x->bneg(); ok 705 - $x = Math::BigFloat::Subclass->new("+123.456789"); $x->bneg(); ok 706 - $x = Math::BigFloat::Subclass->new("-123456.789"); $x->bneg(); ok 707 - $x = Math::BigFloat::Subclass->new("-123456.789"); $x->bneg(); ok 708 - $x = Math::BigFloat::Subclass->new("babsNaN"); $x->babs(); ok 709 - $x = Math::BigFloat::Subclass->new("babsNaN"); $x->babs(); ok 710 - $x = Math::BigFloat::Subclass->new("+inf"); $x->babs(); ok 711 - $x = Math::BigFloat::Subclass->new("+inf"); $x->babs(); ok 712 - $x = Math::BigFloat::Subclass->new("-inf"); $x->babs(); ok 713 - $x = Math::BigFloat::Subclass->new("-inf"); $x->babs(); ok 714 - $x = Math::BigFloat::Subclass->new("+0"); $x->babs(); ok 715 - $x = Math::BigFloat::Subclass->new("+0"); $x->babs(); ok 716 - $x = Math::BigFloat::Subclass->new("+1"); $x->babs(); ok 717 - $x = Math::BigFloat::Subclass->new("+1"); $x->babs(); ok 718 - $x = Math::BigFloat::Subclass->new("-1"); $x->babs(); ok 719 - $x = Math::BigFloat::Subclass->new("-1"); $x->babs(); ok 720 - $x = Math::BigFloat::Subclass->new("+123456789"); $x->babs(); ok 721 - $x = Math::BigFloat::Subclass->new("+123456789"); $x->babs(); ok 722 - $x = Math::BigFloat::Subclass->new("-123456789"); $x->babs(); ok 723 - $x = Math::BigFloat::Subclass->new("-123456789"); $x->babs(); ok 724 - $x = Math::BigFloat::Subclass->new("+123.456789"); $x->babs(); ok 725 - $x = Math::BigFloat::Subclass->new("+123.456789"); $x->babs(); ok 726 - $x = Math::BigFloat::Subclass->new("-123456.789"); $x->babs(); ok 727 - $x = Math::BigFloat::Subclass->new("-123456.789"); $x->babs(); ok 728 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 729 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 730 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 731 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 732 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 733 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 734 - $x = Math::BigFloat::Subclass->new("NaNfround"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 735 - $x = Math::BigFloat::Subclass->new("NaNfround"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 736 - $x = Math::BigFloat::Subclass->new("+10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 737 - $x = Math::BigFloat::Subclass->new("+10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 738 - $x = Math::BigFloat::Subclass->new("-10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 739 - $x = Math::BigFloat::Subclass->new("-10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 740 - $x = Math::BigFloat::Subclass->new("+10123456789.123"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 741 - $x = Math::BigFloat::Subclass->new("+10123456789.123"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 742 - $x = Math::BigFloat::Subclass->new("-10123456789.123"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 743 - $x = Math::BigFloat::Subclass->new("-10123456789.123"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 744 - $x = Math::BigFloat::Subclass->new("+10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(9); ok 745 - $x = Math::BigFloat::Subclass->new("+10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(9); ok 746 - $x = Math::BigFloat::Subclass->new("-10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(9); ok 747 - $x = Math::BigFloat::Subclass->new("-10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(9); ok 748 - $x = Math::BigFloat::Subclass->new("+101234500"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(6); ok 749 - $x = Math::BigFloat::Subclass->new("+101234500"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(6); ok 750 - $x = Math::BigFloat::Subclass->new("-101234500"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(6); ok 751 - $x = Math::BigFloat::Subclass->new("-101234500"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(6); ok 752 - $x = Math::BigFloat::Subclass->new("+20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 753 - $x = Math::BigFloat::Subclass->new("+20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 754 - $x = Math::BigFloat::Subclass->new("-20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 755 - $x = Math::BigFloat::Subclass->new("-20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 756 - $x = Math::BigFloat::Subclass->new("+20123456789.123"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 757 - $x = Math::BigFloat::Subclass->new("+20123456789.123"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 758 - $x = Math::BigFloat::Subclass->new("-20123456789.123"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 759 - $x = Math::BigFloat::Subclass->new("-20123456789.123"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 760 - $x = Math::BigFloat::Subclass->new("+20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(9); ok 761 - $x = Math::BigFloat::Subclass->new("+20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(9); ok 762 - $x = Math::BigFloat::Subclass->new("-20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(9); ok 763 - $x = Math::BigFloat::Subclass->new("-20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(9); ok 764 - $x = Math::BigFloat::Subclass->new("+201234500"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(6); ok 765 - $x = Math::BigFloat::Subclass->new("+201234500"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(6); ok 766 - $x = Math::BigFloat::Subclass->new("-201234500"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(6); ok 767 - $x = Math::BigFloat::Subclass->new("-201234500"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(6); ok 768 - $x = Math::BigFloat::Subclass->new("+30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 769 - $x = Math::BigFloat::Subclass->new("+30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 770 - $x = Math::BigFloat::Subclass->new("-30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 771 - $x = Math::BigFloat::Subclass->new("-30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 772 - $x = Math::BigFloat::Subclass->new("+30123456789.123"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 773 - $x = Math::BigFloat::Subclass->new("+30123456789.123"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 774 - $x = Math::BigFloat::Subclass->new("-30123456789.123"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 775 - $x = Math::BigFloat::Subclass->new("-30123456789.123"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 776 - $x = Math::BigFloat::Subclass->new("+30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(9); ok 777 - $x = Math::BigFloat::Subclass->new("+30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(9); ok 778 - $x = Math::BigFloat::Subclass->new("-30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(9); ok 779 - $x = Math::BigFloat::Subclass->new("-30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(9); ok 780 - $x = Math::BigFloat::Subclass->new("+301234500"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(6); ok 781 - $x = Math::BigFloat::Subclass->new("+301234500"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(6); ok 782 - $x = Math::BigFloat::Subclass->new("-301234500"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(6); ok 783 - $x = Math::BigFloat::Subclass->new("-301234500"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(6); ok 784 - $x = Math::BigFloat::Subclass->new("+40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 785 - $x = Math::BigFloat::Subclass->new("+40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 786 - $x = Math::BigFloat::Subclass->new("-40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 787 - $x = Math::BigFloat::Subclass->new("-40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 788 - $x = Math::BigFloat::Subclass->new("+40123456789.123"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 789 - $x = Math::BigFloat::Subclass->new("+40123456789.123"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 790 - $x = Math::BigFloat::Subclass->new("-40123456789.123"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 791 - $x = Math::BigFloat::Subclass->new("-40123456789.123"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 792 - $x = Math::BigFloat::Subclass->new("+40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(9); ok 793 - $x = Math::BigFloat::Subclass->new("+40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(9); ok 794 - $x = Math::BigFloat::Subclass->new("-40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(9); ok 795 - $x = Math::BigFloat::Subclass->new("-40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(9); ok 796 - $x = Math::BigFloat::Subclass->new("+401234500"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(6); ok 797 - $x = Math::BigFloat::Subclass->new("+401234500"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(6); ok 798 - $x = Math::BigFloat::Subclass->new("-401234500"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(6); ok 799 - $x = Math::BigFloat::Subclass->new("-401234500"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(6); ok 800 - $x = Math::BigFloat::Subclass->new("+50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 801 - $x = Math::BigFloat::Subclass->new("+50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 802 - $x = Math::BigFloat::Subclass->new("-50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 803 - $x = Math::BigFloat::Subclass->new("-50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 804 - $x = Math::BigFloat::Subclass->new("+50123456789.123"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 805 - $x = Math::BigFloat::Subclass->new("+50123456789.123"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 806 - $x = Math::BigFloat::Subclass->new("-50123456789.123"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 807 - $x = Math::BigFloat::Subclass->new("-50123456789.123"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 808 - $x = Math::BigFloat::Subclass->new("+50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(9); ok 809 - $x = Math::BigFloat::Subclass->new("+50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(9); ok 810 - $x = Math::BigFloat::Subclass->new("-50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(9); ok 811 - $x = Math::BigFloat::Subclass->new("-50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(9); ok 812 - $x = Math::BigFloat::Subclass->new("+501234500"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(6); ok 813 - $x = Math::BigFloat::Subclass->new("+501234500"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(6); ok 814 - $x = Math::BigFloat::Subclass->new("-501234500"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(6); ok 815 - $x = Math::BigFloat::Subclass->new("-501234500"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(6); ok 816 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 817 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 818 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 819 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 820 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(9); ok 821 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(9); ok 822 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(9); ok 823 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(9); ok 824 - $x = Math::BigFloat::Subclass->new("+601234500"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(6); ok 825 - $x = Math::BigFloat::Subclass->new("+601234500"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(6); ok 826 - $x = Math::BigFloat::Subclass->new("-601234500"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(6); ok 827 - $x = Math::BigFloat::Subclass->new("-601234500"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(6); ok 828 - $x = Math::BigFloat::Subclass->new("+60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 829 - $x = Math::BigFloat::Subclass->new("+60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 830 - $x = Math::BigFloat::Subclass->new("-60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 831 - $x = Math::BigFloat::Subclass->new("-60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 832 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 833 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 834 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 835 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 836 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 837 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 838 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 839 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 840 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(9); ok 841 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(9); ok 842 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(9); ok 843 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(9); ok 844 - $x = Math::BigFloat::Subclass->new("+601234500"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 845 - $x = Math::BigFloat::Subclass->new("+601234500"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 846 - $x = Math::BigFloat::Subclass->new("-601234500"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 847 - $x = Math::BigFloat::Subclass->new("-601234500"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 848 - $x = Math::BigFloat::Subclass->new("+601234400"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 849 - $x = Math::BigFloat::Subclass->new("+601234400"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 850 - $x = Math::BigFloat::Subclass->new("-601234400"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 851 - $x = Math::BigFloat::Subclass->new("-601234400"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 852 - $x = Math::BigFloat::Subclass->new("+601234600"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 853 - $x = Math::BigFloat::Subclass->new("+601234600"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 854 - $x = Math::BigFloat::Subclass->new("-601234600"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 855 - $x = Math::BigFloat::Subclass->new("-601234600"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 856 - $x = Math::BigFloat::Subclass->new("+601234300"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 857 - $x = Math::BigFloat::Subclass->new("+601234300"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 858 - $x = Math::BigFloat::Subclass->new("+60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 859 - $x = Math::BigFloat::Subclass->new("+60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 860 - $x = Math::BigFloat::Subclass->new("-60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 861 - $x = Math::BigFloat::Subclass->new("-60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 862 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 863 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 864 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 865 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 866 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 867 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 868 - $x = Math::BigFloat::Subclass->new("NaNffround"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 869 - $x = Math::BigFloat::Subclass->new("NaNffround"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 870 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 871 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 872 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 873 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 874 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 875 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 876 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 877 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 878 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 879 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 880 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 881 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 882 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 883 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 884 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 885 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 886 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 887 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 888 - $x = Math::BigFloat::Subclass->new("-1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 889 - $x = Math::BigFloat::Subclass->new("-1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 890 - $x = Math::BigFloat::Subclass->new("+1.27"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 891 - $x = Math::BigFloat::Subclass->new("+1.27"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 892 - $x = Math::BigFloat::Subclass->new("-1.27"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 893 - $x = Math::BigFloat::Subclass->new("-1.27"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 894 - $x = Math::BigFloat::Subclass->new("+1.25"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 895 - $x = Math::BigFloat::Subclass->new("+1.25"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 896 - $x = Math::BigFloat::Subclass->new("-1.25"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 897 - $x = Math::BigFloat::Subclass->new("-1.25"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 898 - $x = Math::BigFloat::Subclass->new("+1.35"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 899 - $x = Math::BigFloat::Subclass->new("+1.35"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 900 - $x = Math::BigFloat::Subclass->new("-1.35"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 901 - $x = Math::BigFloat::Subclass->new("-1.35"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 902 - $x = Math::BigFloat::Subclass->new("-0.0061234567890"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 903 - $x = Math::BigFloat::Subclass->new("-0.0061234567890"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 904 - $x = Math::BigFloat::Subclass->new("-0.0061"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 905 - $x = Math::BigFloat::Subclass->new("-0.0061"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 906 - $x = Math::BigFloat::Subclass->new("-0.00612"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 907 - $x = Math::BigFloat::Subclass->new("-0.00612"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 908 - $x = Math::BigFloat::Subclass->new("-0.00612"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 909 - $x = Math::BigFloat::Subclass->new("-0.00612"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 910 - $x = Math::BigFloat::Subclass->new("-0.006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 911 - $x = Math::BigFloat::Subclass->new("-0.006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 912 - $x = Math::BigFloat::Subclass->new("-0.006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 913 - $x = Math::BigFloat::Subclass->new("-0.006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 914 - $x = Math::BigFloat::Subclass->new("-0.0006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 915 - $x = Math::BigFloat::Subclass->new("-0.0006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 916 - $x = Math::BigFloat::Subclass->new("-0.0006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 917 - $x = Math::BigFloat::Subclass->new("-0.0006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 918 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 919 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-4); ok 920 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-5); ok 921 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 922 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 923 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 924 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 925 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 926 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 927 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 928 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 929 - $x = Math::BigFloat::Subclass->new("+2.23"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 930 - $x = Math::BigFloat::Subclass->new("-2.23"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 931 - $x = Math::BigFloat::Subclass->new("+2.27"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 932 - $x = Math::BigFloat::Subclass->new("-2.27"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 933 - $x = Math::BigFloat::Subclass->new("+2.25"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 934 - $x = Math::BigFloat::Subclass->new("-2.25"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 935 - $x = Math::BigFloat::Subclass->new("+2.35"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 936 - $x = Math::BigFloat::Subclass->new("-2.35"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 937 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 938 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 939 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-2); ok 940 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-3); ok 941 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-4); ok 942 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-5); ok 943 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 944 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 945 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 946 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 947 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 948 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 949 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 950 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 951 - $x = Math::BigFloat::Subclass->new("+3.23"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 952 - $x = Math::BigFloat::Subclass->new("-3.23"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 953 - $x = Math::BigFloat::Subclass->new("+3.27"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 954 - $x = Math::BigFloat::Subclass->new("-3.27"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 955 - $x = Math::BigFloat::Subclass->new("+3.25"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 956 - $x = Math::BigFloat::Subclass->new("-3.25"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 957 - $x = Math::BigFloat::Subclass->new("+3.35"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 958 - $x = Math::BigFloat::Subclass->new("-3.35"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 959 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 960 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 961 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-2); ok 962 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-3); ok 963 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-4); ok 964 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-5); ok 965 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 966 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 967 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 968 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 969 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 970 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 971 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 972 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 973 - $x = Math::BigFloat::Subclass->new("+4.23"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 974 - $x = Math::BigFloat::Subclass->new("-4.23"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 975 - $x = Math::BigFloat::Subclass->new("+4.27"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 976 - $x = Math::BigFloat::Subclass->new("-4.27"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 977 - $x = Math::BigFloat::Subclass->new("+4.25"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 978 - $x = Math::BigFloat::Subclass->new("-4.25"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 979 - $x = Math::BigFloat::Subclass->new("+4.35"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 980 - $x = Math::BigFloat::Subclass->new("-4.35"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 981 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 982 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 983 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-2); ok 984 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-3); ok 985 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-4); ok 986 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-5); ok 987 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 988 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 989 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 990 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 991 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 992 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 993 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 994 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 995 - $x = Math::BigFloat::Subclass->new("+5.23"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 996 - $x = Math::BigFloat::Subclass->new("-5.23"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 997 - $x = Math::BigFloat::Subclass->new("+5.27"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 998 - $x = Math::BigFloat::Subclass->new("-5.27"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 999 - $x = Math::BigFloat::Subclass->new("+5.25"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1000 - $x = Math::BigFloat::Subclass->new("-5.25"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1001 - $x = Math::BigFloat::Subclass->new("+5.35"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1002 - $x = Math::BigFloat::Subclass->new("-5.35"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1003 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1004 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1005 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-2); ok 1006 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-3); ok 1007 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-4); ok 1008 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-5); ok 1009 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1010 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1011 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1012 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1013 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1014 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1015 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1016 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1017 - $x = Math::BigFloat::Subclass->new("+6.23"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1018 - $x = Math::BigFloat::Subclass->new("-6.23"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1019 - $x = Math::BigFloat::Subclass->new("+6.27"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1020 - $x = Math::BigFloat::Subclass->new("-6.27"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1021 - $x = Math::BigFloat::Subclass->new("+6.25"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1022 - $x = Math::BigFloat::Subclass->new("-6.25"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1023 - $x = Math::BigFloat::Subclass->new("+6.35"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1024 - $x = Math::BigFloat::Subclass->new("-6.35"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1025 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1026 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1027 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-2); ok 1028 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-3); ok 1029 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-4); ok 1030 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-5); ok 1031 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1032 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1033 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1034 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1035 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1036 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1037 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1038 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1039 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-3); ok 1040 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-3); ok 1041 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-4); ok 1042 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-4); ok 1043 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-5); ok 1044 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-5); ok 1045 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-6); ok 1046 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-6); ok 1047 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-7); ok 1048 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-7); ok 1049 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-8); ok 1050 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-8); ok 1051 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-9); ok 1052 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-9); ok 1053 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-12); ok 1054 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-12); ok 1055 - $x = Math::BigFloat::Subclass->new("bcmpNaN"); $y = Math::BigFloat::Subclass->new("bcmpNaN"); $x->bcmp($y); ok 1056 - $x = Math::BigFloat::Subclass->new("bcmpNaN"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1057 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("bcmpNaN"); $x->bcmp($y); ok 1058 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1059 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1060 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bcmp($y); ok 1061 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1062 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->bcmp($y); ok 1063 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bcmp($y); ok 1064 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bcmp($y); ok 1065 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bcmp($y); ok 1066 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bcmp($y); ok 1067 - $x = Math::BigFloat::Subclass->new("-1.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1068 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1.1"); $x->bcmp($y); ok 1069 - $x = Math::BigFloat::Subclass->new("+1.1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1070 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1.1"); $x->bcmp($y); ok 1071 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+123"); $x->bcmp($y); ok 1072 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+12"); $x->bcmp($y); ok 1073 - $x = Math::BigFloat::Subclass->new("+12"); $y = Math::BigFloat::Subclass->new("+123"); $x->bcmp($y); ok 1074 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-123"); $x->bcmp($y); ok 1075 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-12"); $x->bcmp($y); ok 1076 - $x = Math::BigFloat::Subclass->new("-12"); $y = Math::BigFloat::Subclass->new("-123"); $x->bcmp($y); ok 1077 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+124"); $x->bcmp($y); ok 1078 - $x = Math::BigFloat::Subclass->new("+124"); $y = Math::BigFloat::Subclass->new("+123"); $x->bcmp($y); ok 1079 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-124"); $x->bcmp($y); ok 1080 - $x = Math::BigFloat::Subclass->new("-124"); $y = Math::BigFloat::Subclass->new("-123"); $x->bcmp($y); ok 1081 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.01"); $x->bcmp($y); ok 1082 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bcmp($y); ok 1083 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.0001"); $x->bcmp($y); ok 1084 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.1"); $x->bcmp($y); ok 1085 - $x = Math::BigFloat::Subclass->new("0.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1086 - $x = Math::BigFloat::Subclass->new("0.00001"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1087 - $x = Math::BigFloat::Subclass->new("-0.0001"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1088 - $x = Math::BigFloat::Subclass->new("-0.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1089 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.0001234"); $x->bcmp($y); ok 1090 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.0001234"); $x->bcmp($y); ok 1091 - $x = Math::BigFloat::Subclass->new("0.0001234"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1092 - $x = Math::BigFloat::Subclass->new("-0.0001234"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1093 - $x = Math::BigFloat::Subclass->new("0.0001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1094 - $x = Math::BigFloat::Subclass->new("0.0005"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bcmp($y); ok 1095 - $x = Math::BigFloat::Subclass->new("0.005"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bcmp($y); ok 1096 - $x = Math::BigFloat::Subclass->new("0.001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1097 - $x = Math::BigFloat::Subclass->new("0.000001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1098 - $x = Math::BigFloat::Subclass->new("0.00000123"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1099 - $x = Math::BigFloat::Subclass->new("0.00512"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bcmp($y); ok 1100 - $x = Math::BigFloat::Subclass->new("0.005"); $y = Math::BigFloat::Subclass->new("0.000112"); $x->bcmp($y); ok 1101 - $x = Math::BigFloat::Subclass->new("0.00123"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1102 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bcmp($y); ok 1103 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bcmp($y); ok 1104 - $x = Math::BigFloat::Subclass->new("1.54321"); $y = Math::BigFloat::Subclass->new("234"); $x->bcmp($y); ok 1105 - $x = Math::BigFloat::Subclass->new("234"); $y = Math::BigFloat::Subclass->new("1.54321"); $x->bcmp($y); ok 1106 - $x = Math::BigFloat::Subclass->new("1e1234567890987654321"); $y = Math::BigFloat::Subclass->new("1e1234567890987654320"); $x->bcmp($y); ok 1107 - $x = Math::BigFloat::Subclass->new("1e-1234567890987654321"); $y = Math::BigFloat::Subclass->new("1e-1234567890987654320"); $x->bcmp($y); ok 1108 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5432112345"); $x->bcmp($y); ok 1109 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("5432112345"); $x->bcmp($y); ok 1110 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-5432112345"); $x->bcmp($y); ok 1111 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-5432112345"); $x->bcmp($y); ok 1112 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("54321.12345"); $x->bcmp($y); ok 1113 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("54321.12345"); $x->bcmp($y); ok 1114 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-54321.12345"); $x->bcmp($y); ok 1115 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-54321.12345"); $x->bcmp($y); ok 1116 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bcmp($y); ok 1117 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bcmp($y); ok 1118 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bcmp($y); ok 1119 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bcmp($y); ok 1120 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bcmp($y); ok 1121 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $x->bcmp($y); ok 1122 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bcmp($y); ok 1123 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bcmp($y); ok 1124 - $x = Math::BigFloat::Subclass->new("bcmpNaN"); $y = Math::BigFloat::Subclass->new("bcmpNaN"); $x->bacmp($y); ok 1125 - $x = Math::BigFloat::Subclass->new("bcmpNaN"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1126 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("bcmpNaN"); $x->bacmp($y); ok 1127 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1128 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1129 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bacmp($y); ok 1130 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1131 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->bacmp($y); ok 1132 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bacmp($y); ok 1133 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bacmp($y); ok 1134 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bacmp($y); ok 1135 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bacmp($y); ok 1136 - $x = Math::BigFloat::Subclass->new("-1.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1137 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1.1"); $x->bacmp($y); ok 1138 - $x = Math::BigFloat::Subclass->new("+1.1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1139 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1.1"); $x->bacmp($y); ok 1140 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+123"); $x->bacmp($y); ok 1141 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+12"); $x->bacmp($y); ok 1142 - $x = Math::BigFloat::Subclass->new("+12"); $y = Math::BigFloat::Subclass->new("+123"); $x->bacmp($y); ok 1143 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-123"); $x->bacmp($y); ok 1144 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-12"); $x->bacmp($y); ok 1145 - $x = Math::BigFloat::Subclass->new("-12"); $y = Math::BigFloat::Subclass->new("-123"); $x->bacmp($y); ok 1146 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+124"); $x->bacmp($y); ok 1147 - $x = Math::BigFloat::Subclass->new("+124"); $y = Math::BigFloat::Subclass->new("+123"); $x->bacmp($y); ok 1148 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-124"); $x->bacmp($y); ok 1149 - $x = Math::BigFloat::Subclass->new("-124"); $y = Math::BigFloat::Subclass->new("-123"); $x->bacmp($y); ok 1150 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.01"); $x->bacmp($y); ok 1151 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bacmp($y); ok 1152 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.0001"); $x->bacmp($y); ok 1153 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.1"); $x->bacmp($y); ok 1154 - $x = Math::BigFloat::Subclass->new("0.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1155 - $x = Math::BigFloat::Subclass->new("0.00001"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1156 - $x = Math::BigFloat::Subclass->new("-0.0001"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1157 - $x = Math::BigFloat::Subclass->new("-0.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1158 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.0001234"); $x->bacmp($y); ok 1159 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.0001234"); $x->bacmp($y); ok 1160 - $x = Math::BigFloat::Subclass->new("0.0001234"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1161 - $x = Math::BigFloat::Subclass->new("-0.0001234"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1162 - $x = Math::BigFloat::Subclass->new("0.0001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1163 - $x = Math::BigFloat::Subclass->new("0.0005"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bacmp($y); ok 1164 - $x = Math::BigFloat::Subclass->new("0.005"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bacmp($y); ok 1165 - $x = Math::BigFloat::Subclass->new("0.001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1166 - $x = Math::BigFloat::Subclass->new("0.000001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1167 - $x = Math::BigFloat::Subclass->new("0.00000123"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1168 - $x = Math::BigFloat::Subclass->new("0.00512"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bacmp($y); ok 1169 - $x = Math::BigFloat::Subclass->new("0.005"); $y = Math::BigFloat::Subclass->new("0.000112"); $x->bacmp($y); ok 1170 - $x = Math::BigFloat::Subclass->new("0.00123"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1171 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bacmp($y); ok 1172 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bacmp($y); ok 1173 - $x = Math::BigFloat::Subclass->new("1.54321"); $y = Math::BigFloat::Subclass->new("234"); $x->bacmp($y); ok 1174 - $x = Math::BigFloat::Subclass->new("234"); $y = Math::BigFloat::Subclass->new("1.54321"); $x->bacmp($y); ok 1175 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5432112345"); $x->bacmp($y); ok 1176 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("5432112345"); $x->bacmp($y); ok 1177 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-5432112345"); $x->bacmp($y); ok 1178 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-5432112345"); $x->bacmp($y); ok 1179 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("54321.12345"); $x->bacmp($y); ok 1180 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("54321.12345"); $x->bacmp($y); ok 1181 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-54321.12345"); $x->bacmp($y); ok 1182 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-54321.12345"); $x->bacmp($y); ok 1183 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bacmp($y); ok 1184 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1185 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1186 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bacmp($y); ok 1187 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bacmp($y); ok 1188 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $x->bacmp($y); ok 1189 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1190 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1191 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("bacmpNaN"); $x->bacmp($y); ok 1192 - $x = Math::BigFloat::Subclass->new("bacmpNaN"); $y = Math::BigFloat::Subclass->new("inf"); $x->bacmp($y); ok 1193 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("bacmpNaN"); $x->bacmp($y); ok 1194 - $x = Math::BigFloat::Subclass->new("bacmpNaN"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1195 - $x = Math::BigFloat::Subclass->new("bdecNaN"); --$x; ok 1196 - $x = Math::BigFloat::Subclass->new("bdecNaN"); --$x; ok 1197 - $x = Math::BigFloat::Subclass->new("+inf"); --$x; ok 1198 - $x = Math::BigFloat::Subclass->new("+inf"); --$x; ok 1199 - $x = Math::BigFloat::Subclass->new("-inf"); --$x; ok 1200 - $x = Math::BigFloat::Subclass->new("-inf"); --$x; ok 1201 - $x = Math::BigFloat::Subclass->new("+0"); --$x; ok 1202 - $x = Math::BigFloat::Subclass->new("+0"); --$x; ok 1203 - $x = Math::BigFloat::Subclass->new("+1"); --$x; ok 1204 - $x = Math::BigFloat::Subclass->new("+1"); --$x; ok 1205 - $x = Math::BigFloat::Subclass->new("-1"); --$x; ok 1206 - $x = Math::BigFloat::Subclass->new("-1"); --$x; ok 1207 - $x = Math::BigFloat::Subclass->new("1.23"); --$x; ok 1208 - $x = Math::BigFloat::Subclass->new("1.23"); --$x; ok 1209 - $x = Math::BigFloat::Subclass->new("-1.23"); --$x; ok 1210 - $x = Math::BigFloat::Subclass->new("-1.23"); --$x; ok 1211 - $x = Math::BigFloat::Subclass->new("100"); --$x; ok 1212 - $x = Math::BigFloat::Subclass->new("100"); --$x; ok 1213 - $x = Math::BigFloat::Subclass->new("101"); --$x; ok 1214 - $x = Math::BigFloat::Subclass->new("101"); --$x; ok 1215 - $x = Math::BigFloat::Subclass->new("-100"); --$x; ok 1216 - $x = Math::BigFloat::Subclass->new("-100"); --$x; ok 1217 - $x = Math::BigFloat::Subclass->new("-99"); --$x; ok 1218 - $x = Math::BigFloat::Subclass->new("-99"); --$x; ok 1219 - $x = Math::BigFloat::Subclass->new("-98"); --$x; ok 1220 - $x = Math::BigFloat::Subclass->new("-98"); --$x; ok 1221 - $x = Math::BigFloat::Subclass->new("99"); --$x; ok 1222 - $x = Math::BigFloat::Subclass->new("99"); --$x; ok 1223 - $x = Math::BigFloat::Subclass->new("bincNaN"); ++$x; ok 1224 - $x = Math::BigFloat::Subclass->new("bincNaN"); ++$x; ok 1225 - $x = Math::BigFloat::Subclass->new("+inf"); ++$x; ok 1226 - $x = Math::BigFloat::Subclass->new("+inf"); ++$x; ok 1227 - $x = Math::BigFloat::Subclass->new("-inf"); ++$x; ok 1228 - $x = Math::BigFloat::Subclass->new("-inf"); ++$x; ok 1229 - $x = Math::BigFloat::Subclass->new("+0"); ++$x; ok 1230 - $x = Math::BigFloat::Subclass->new("+0"); ++$x; ok 1231 - $x = Math::BigFloat::Subclass->new("+1"); ++$x; ok 1232 - $x = Math::BigFloat::Subclass->new("+1"); ++$x; ok 1233 - $x = Math::BigFloat::Subclass->new("-1"); ++$x; ok 1234 - $x = Math::BigFloat::Subclass->new("-1"); ++$x; ok 1235 - $x = Math::BigFloat::Subclass->new("1.23"); ++$x; ok 1236 - $x = Math::BigFloat::Subclass->new("1.23"); ++$x; ok 1237 - $x = Math::BigFloat::Subclass->new("-1.23"); ++$x; ok 1238 - $x = Math::BigFloat::Subclass->new("-1.23"); ++$x; ok 1239 - $x = Math::BigFloat::Subclass->new("100"); ++$x; ok 1240 - $x = Math::BigFloat::Subclass->new("100"); ++$x; ok 1241 - $x = Math::BigFloat::Subclass->new("-100"); ++$x; ok 1242 - $x = Math::BigFloat::Subclass->new("-100"); ++$x; ok 1243 - $x = Math::BigFloat::Subclass->new("-99"); ++$x; ok 1244 - $x = Math::BigFloat::Subclass->new("-99"); ++$x; ok 1245 - $x = Math::BigFloat::Subclass->new("-101"); ++$x; ok 1246 - $x = Math::BigFloat::Subclass->new("-101"); ++$x; ok 1247 - $x = Math::BigFloat::Subclass->new("99"); ++$x; ok 1248 - $x = Math::BigFloat::Subclass->new("99"); ++$x; ok 1249 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x + $y; ok 1250 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x + $y; ok 1251 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x + $y; ok 1252 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x + $y; ok 1253 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x + $y; ok 1254 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x + $y; ok 1255 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x + $y; ok 1256 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x + $y; ok 1257 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x + $y; ok 1258 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x + $y; ok 1259 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x + $y; ok 1260 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x + $y; ok 1261 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x + $y; ok 1262 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x + $y; ok 1263 - $x = Math::BigFloat::Subclass->new("baddNaN"); $y = Math::BigFloat::Subclass->new("+inf"); $x + $y; ok 1264 - $x = Math::BigFloat::Subclass->new("baddNaN"); $y = Math::BigFloat::Subclass->new("+inf"); $x + $y; ok 1265 - $x = Math::BigFloat::Subclass->new("baddNaN"); $y = Math::BigFloat::Subclass->new("+inf"); $x + $y; ok 1266 - $x = Math::BigFloat::Subclass->new("baddNaN"); $y = Math::BigFloat::Subclass->new("+inf"); $x + $y; ok 1267 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("baddNaN"); $x + $y; ok 1268 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("baddNaN"); $x + $y; ok 1269 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("baddNaN"); $x + $y; ok 1270 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("baddNaN"); $x + $y; ok 1271 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x + $y; ok 1272 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x + $y; ok 1273 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x + $y; ok 1274 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x + $y; ok 1275 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1276 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1277 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1278 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1279 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x + $y; ok 1280 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x + $y; ok 1281 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1282 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1283 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1284 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1285 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1286 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1287 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1288 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1289 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1290 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1291 - $x = Math::BigFloat::Subclass->new("+99"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1292 - $x = Math::BigFloat::Subclass->new("+99"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1293 - $x = Math::BigFloat::Subclass->new("+999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1294 - $x = Math::BigFloat::Subclass->new("+999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1295 - $x = Math::BigFloat::Subclass->new("+9999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1296 - $x = Math::BigFloat::Subclass->new("+9999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1297 - $x = Math::BigFloat::Subclass->new("+99999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1298 - $x = Math::BigFloat::Subclass->new("+99999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1299 - $x = Math::BigFloat::Subclass->new("+999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1300 - $x = Math::BigFloat::Subclass->new("+999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1301 - $x = Math::BigFloat::Subclass->new("+9999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1302 - $x = Math::BigFloat::Subclass->new("+9999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1303 - $x = Math::BigFloat::Subclass->new("+99999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1304 - $x = Math::BigFloat::Subclass->new("+99999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1305 - $x = Math::BigFloat::Subclass->new("+999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1306 - $x = Math::BigFloat::Subclass->new("+999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1307 - $x = Math::BigFloat::Subclass->new("+9999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1308 - $x = Math::BigFloat::Subclass->new("+9999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1309 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1310 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x + $y; ok 1311 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1312 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1313 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1314 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1315 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1316 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1317 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1318 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1319 - $x = Math::BigFloat::Subclass->new("+100000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1320 - $x = Math::BigFloat::Subclass->new("+100000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1321 - $x = Math::BigFloat::Subclass->new("+1000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1322 - $x = Math::BigFloat::Subclass->new("+1000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1323 - $x = Math::BigFloat::Subclass->new("+10000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1324 - $x = Math::BigFloat::Subclass->new("+10000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1325 - $x = Math::BigFloat::Subclass->new("+100000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1326 - $x = Math::BigFloat::Subclass->new("+100000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1327 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1328 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1329 - $x = Math::BigFloat::Subclass->new("+10000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1330 - $x = Math::BigFloat::Subclass->new("+10000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x + $y; ok 1331 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x + $y; ok 1332 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x + $y; ok 1333 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x + $y; ok 1334 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x + $y; ok 1335 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x + $y; ok 1336 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x + $y; ok 1337 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x + $y; ok 1338 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x + $y; ok 1339 - $x = Math::BigFloat::Subclass->new("0.001234"); $y = Math::BigFloat::Subclass->new("0.0001234"); $x + $y; ok 1340 - $x = Math::BigFloat::Subclass->new("0.001234"); $y = Math::BigFloat::Subclass->new("0.0001234"); $x + $y; ok 1341 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x - $y; ok 1342 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x - $y; ok 1343 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x - $y; ok 1344 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x - $y; ok 1345 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x - $y; ok 1346 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x - $y; ok 1347 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x - $y; ok 1348 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x - $y; ok 1349 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x - $y; ok 1350 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x - $y; ok 1351 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x - $y; ok 1352 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x - $y; ok 1353 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x - $y; ok 1354 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x - $y; ok 1355 - $x = Math::BigFloat::Subclass->new("baddNaN"); $y = Math::BigFloat::Subclass->new("+inf"); $x - $y; ok 1356 - $x = Math::BigFloat::Subclass->new("baddNaN"); $y = Math::BigFloat::Subclass->new("+inf"); $x - $y; ok 1357 - $x = Math::BigFloat::Subclass->new("baddNaN"); $y = Math::BigFloat::Subclass->new("+inf"); $x - $y; ok 1358 - $x = Math::BigFloat::Subclass->new("baddNaN"); $y = Math::BigFloat::Subclass->new("+inf"); $x - $y; ok 1359 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("baddNaN"); $x - $y; ok 1360 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("baddNaN"); $x - $y; ok 1361 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("baddNaN"); $x - $y; ok 1362 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("baddNaN"); $x - $y; ok 1363 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x - $y; ok 1364 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x - $y; ok 1365 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x - $y; ok 1366 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x - $y; ok 1367 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1368 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1369 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1370 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1371 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x - $y; ok 1372 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x - $y; ok 1373 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1374 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1375 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1376 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1377 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1378 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1379 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1380 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1381 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1382 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1383 - $x = Math::BigFloat::Subclass->new("+99"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1384 - $x = Math::BigFloat::Subclass->new("+99"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1385 - $x = Math::BigFloat::Subclass->new("+999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1386 - $x = Math::BigFloat::Subclass->new("+999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1387 - $x = Math::BigFloat::Subclass->new("+9999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1388 - $x = Math::BigFloat::Subclass->new("+9999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1389 - $x = Math::BigFloat::Subclass->new("+99999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1390 - $x = Math::BigFloat::Subclass->new("+99999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1391 - $x = Math::BigFloat::Subclass->new("+999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1392 - $x = Math::BigFloat::Subclass->new("+999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1393 - $x = Math::BigFloat::Subclass->new("+9999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1394 - $x = Math::BigFloat::Subclass->new("+9999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1395 - $x = Math::BigFloat::Subclass->new("+99999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1396 - $x = Math::BigFloat::Subclass->new("+99999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1397 - $x = Math::BigFloat::Subclass->new("+999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1398 - $x = Math::BigFloat::Subclass->new("+999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1399 - $x = Math::BigFloat::Subclass->new("+9999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1400 - $x = Math::BigFloat::Subclass->new("+9999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1401 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1402 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x - $y; ok 1403 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1404 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1405 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1406 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1407 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1408 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1409 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1410 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1411 - $x = Math::BigFloat::Subclass->new("+100000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1412 - $x = Math::BigFloat::Subclass->new("+100000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1413 - $x = Math::BigFloat::Subclass->new("+1000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1414 - $x = Math::BigFloat::Subclass->new("+1000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1415 - $x = Math::BigFloat::Subclass->new("+10000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1416 - $x = Math::BigFloat::Subclass->new("+10000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1417 - $x = Math::BigFloat::Subclass->new("+100000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1418 - $x = Math::BigFloat::Subclass->new("+100000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1419 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1420 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1421 - $x = Math::BigFloat::Subclass->new("+10000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1422 - $x = Math::BigFloat::Subclass->new("+10000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x - $y; ok 1423 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x - $y; ok 1424 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x - $y; ok 1425 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x - $y; ok 1426 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x - $y; ok 1427 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x - $y; ok 1428 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x - $y; ok 1429 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x - $y; ok 1430 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x - $y; ok 1431 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1432 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1433 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1434 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1435 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1436 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1437 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("abc"); $x->bmuladd($y, $z); ok 1438 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("abc"); $x->bmuladd($y, $z); ok 1439 - $x = Math::BigFloat::Subclass->new("NaNmul"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1440 - $x = Math::BigFloat::Subclass->new("NaNmul"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1441 - $x = Math::BigFloat::Subclass->new("NaNmul"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1442 - $x = Math::BigFloat::Subclass->new("NaNmul"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1443 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaNmul"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1444 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaNmul"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1445 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaNmul"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1446 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaNmul"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1447 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1448 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1449 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1450 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1451 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1452 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1453 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1454 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1455 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1456 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1457 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1458 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1459 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1460 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1461 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1462 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1463 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1464 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1465 - $x = Math::BigFloat::Subclass->new("123456789123456789"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1466 - $x = Math::BigFloat::Subclass->new("123456789123456789"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1467 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("123456789123456789"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1468 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("123456789123456789"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1469 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1470 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1471 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1472 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1473 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1474 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1475 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1476 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1477 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1478 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1479 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1480 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1481 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("+3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1482 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("+3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1483 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("-3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1484 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("-3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1485 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1486 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1487 - $x = Math::BigFloat::Subclass->new("111"); $y = Math::BigFloat::Subclass->new("111"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1488 - $x = Math::BigFloat::Subclass->new("111"); $y = Math::BigFloat::Subclass->new("111"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1489 - $x = Math::BigFloat::Subclass->new("10101"); $y = Math::BigFloat::Subclass->new("10101"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1490 - $x = Math::BigFloat::Subclass->new("10101"); $y = Math::BigFloat::Subclass->new("10101"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1491 - $x = Math::BigFloat::Subclass->new("1001001"); $y = Math::BigFloat::Subclass->new("1001001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1492 - $x = Math::BigFloat::Subclass->new("1001001"); $y = Math::BigFloat::Subclass->new("1001001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1493 - $x = Math::BigFloat::Subclass->new("100010001"); $y = Math::BigFloat::Subclass->new("100010001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1494 - $x = Math::BigFloat::Subclass->new("100010001"); $y = Math::BigFloat::Subclass->new("100010001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1495 - $x = Math::BigFloat::Subclass->new("10000100001"); $y = Math::BigFloat::Subclass->new("10000100001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1496 - $x = Math::BigFloat::Subclass->new("10000100001"); $y = Math::BigFloat::Subclass->new("10000100001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1497 - $x = Math::BigFloat::Subclass->new("11111111111"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1498 - $x = Math::BigFloat::Subclass->new("11111111111"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1499 - $x = Math::BigFloat::Subclass->new("22222222222"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1500 - $x = Math::BigFloat::Subclass->new("22222222222"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1501 - $x = Math::BigFloat::Subclass->new("33333333333"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1502 - $x = Math::BigFloat::Subclass->new("33333333333"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1503 - $x = Math::BigFloat::Subclass->new("44444444444"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1504 - $x = Math::BigFloat::Subclass->new("44444444444"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1505 - $x = Math::BigFloat::Subclass->new("55555555555"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1506 - $x = Math::BigFloat::Subclass->new("55555555555"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1507 - $x = Math::BigFloat::Subclass->new("66666666666"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1508 - $x = Math::BigFloat::Subclass->new("66666666666"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1509 - $x = Math::BigFloat::Subclass->new("77777777777"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1510 - $x = Math::BigFloat::Subclass->new("77777777777"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1511 - $x = Math::BigFloat::Subclass->new("88888888888"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1512 - $x = Math::BigFloat::Subclass->new("88888888888"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1513 - $x = Math::BigFloat::Subclass->new("99999999999"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1514 - $x = Math::BigFloat::Subclass->new("99999999999"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1515 - $x = Math::BigFloat::Subclass->new("11111111111"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1516 - $x = Math::BigFloat::Subclass->new("11111111111"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1517 - $x = Math::BigFloat::Subclass->new("22222222222"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1518 - $x = Math::BigFloat::Subclass->new("22222222222"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1519 - $x = Math::BigFloat::Subclass->new("33333333333"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1520 - $x = Math::BigFloat::Subclass->new("33333333333"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1521 - $x = Math::BigFloat::Subclass->new("44444444444"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1522 - $x = Math::BigFloat::Subclass->new("44444444444"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1523 - $x = Math::BigFloat::Subclass->new("55555555555"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1524 - $x = Math::BigFloat::Subclass->new("55555555555"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1525 - $x = Math::BigFloat::Subclass->new("66666666666"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1526 - $x = Math::BigFloat::Subclass->new("66666666666"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1527 - $x = Math::BigFloat::Subclass->new("77777777777"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1528 - $x = Math::BigFloat::Subclass->new("77777777777"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1529 - $x = Math::BigFloat::Subclass->new("88888888888"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1530 - $x = Math::BigFloat::Subclass->new("88888888888"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1531 - $x = Math::BigFloat::Subclass->new("99999999999"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1532 - $x = Math::BigFloat::Subclass->new("99999999999"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1533 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1534 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1535 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1536 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1537 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1538 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1539 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1540 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1541 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("5"); $x->bmuladd($y, $z); ok 1542 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("5"); $x->bmuladd($y, $z); ok 1543 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("5"); $x->bmuladd($y, $z); ok 1544 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("5"); $x->bmuladd($y, $z); ok 1545 - $x = Math::BigFloat::Subclass->new("9999999999999999999"); $y = Math::BigFloat::Subclass->new("10000000000000000000"); $z = Math::BigFloat::Subclass->new("1234567890"); $x->bmuladd($y, $z); ok 1546 - $x = Math::BigFloat::Subclass->new("9999999999999999999"); $y = Math::BigFloat::Subclass->new("10000000000000000000"); $z = Math::BigFloat::Subclass->new("1234567890"); $x->bmuladd($y, $z); ok 1547 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("5.7"); $z = Math::BigFloat::Subclass->new("8.9"); $x->bmuladd($y, $z); ok 1548 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("5.7"); $z = Math::BigFloat::Subclass->new("8.9"); $x->bmuladd($y, $z); ok 1549 - $x = Math::BigFloat::Subclass->new("-3.2"); $y = Math::BigFloat::Subclass->new("5.197"); $z = Math::BigFloat::Subclass->new("6.05"); $x->bmuladd($y, $z); ok 1550 - $x = Math::BigFloat::Subclass->new("-3.2"); $y = Math::BigFloat::Subclass->new("5.197"); $z = Math::BigFloat::Subclass->new("6.05"); $x->bmuladd($y, $z); ok 1551 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("8"); $x->bmodpow($y, $z); ok 1552 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("8"); $x->bmodpow($y, $z); ok 1553 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("7"); $x->bmodpow($y, $z); ok 1554 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("7"); $x->bmodpow($y, $z); ok 1555 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("7"); $x->bmodpow($y, $z); ok 1556 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("7"); $x->bmodpow($y, $z); ok 1557 - $x = Math::BigFloat::Subclass->new("77777"); $y = Math::BigFloat::Subclass->new("777"); $z = Math::BigFloat::Subclass->new("123456789"); $x->bmodpow($y, $z); ok 1558 - $x = Math::BigFloat::Subclass->new("77777"); $y = Math::BigFloat::Subclass->new("777"); $z = Math::BigFloat::Subclass->new("123456789"); $x->bmodpow($y, $z); ok 1559 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("6.2"); $z = Math::BigFloat::Subclass->new("5.2"); $x->bmodpow($y, $z); ok 1560 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("6.2"); $z = Math::BigFloat::Subclass->new("5.2"); $x->bmodpow($y, $z); ok 1561 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x * $y; ok 1562 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x * $y; ok 1563 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1564 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1565 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x * $y; ok 1566 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x * $y; ok 1567 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaNmul"); $x * $y; ok 1568 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaNmul"); $x * $y; ok 1569 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaNmul"); $x * $y; ok 1570 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaNmul"); $x * $y; ok 1571 - $x = Math::BigFloat::Subclass->new("NaNmul"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1572 - $x = Math::BigFloat::Subclass->new("NaNmul"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1573 - $x = Math::BigFloat::Subclass->new("NaNmul"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1574 - $x = Math::BigFloat::Subclass->new("NaNmul"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1575 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1576 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1577 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1578 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1579 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1580 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1581 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1582 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1583 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("123.34"); $x * $y; ok 1584 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("123.34"); $x * $y; ok 1585 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-123.34"); $x * $y; ok 1586 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-123.34"); $x * $y; ok 1587 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("123.34"); $x * $y; ok 1588 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("123.34"); $x * $y; ok 1589 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-123.34"); $x * $y; ok 1590 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-123.34"); $x * $y; ok 1591 - $x = Math::BigFloat::Subclass->new("123.34"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1592 - $x = Math::BigFloat::Subclass->new("123.34"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1593 - $x = Math::BigFloat::Subclass->new("-123.34"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1594 - $x = Math::BigFloat::Subclass->new("-123.34"); $y = Math::BigFloat::Subclass->new("+inf"); $x * $y; ok 1595 - $x = Math::BigFloat::Subclass->new("123.34"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1596 - $x = Math::BigFloat::Subclass->new("123.34"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1597 - $x = Math::BigFloat::Subclass->new("-123.34"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1598 - $x = Math::BigFloat::Subclass->new("-123.34"); $y = Math::BigFloat::Subclass->new("-inf"); $x * $y; ok 1599 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1600 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1601 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x * $y; ok 1602 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x * $y; ok 1603 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1604 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1605 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x * $y; ok 1606 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x * $y; ok 1607 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1608 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1609 - $x = Math::BigFloat::Subclass->new("+123456789123456789"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1610 - $x = Math::BigFloat::Subclass->new("+123456789123456789"); $y = Math::BigFloat::Subclass->new("+0"); $x * $y; ok 1611 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+123456789123456789"); $x * $y; ok 1612 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+123456789123456789"); $x * $y; ok 1613 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x * $y; ok 1614 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x * $y; ok 1615 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x * $y; ok 1616 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x * $y; ok 1617 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x * $y; ok 1618 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x * $y; ok 1619 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x * $y; ok 1620 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x * $y; ok 1621 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); $x * $y; ok 1622 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); $x * $y; ok 1623 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("+3"); $x * $y; ok 1624 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("+3"); $x * $y; ok 1625 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("-3"); $x * $y; ok 1626 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("-3"); $x * $y; ok 1627 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x * $y; ok 1628 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x * $y; ok 1629 - $x = Math::BigFloat::Subclass->new("+111"); $y = Math::BigFloat::Subclass->new("+111"); $x * $y; ok 1630 - $x = Math::BigFloat::Subclass->new("+111"); $y = Math::BigFloat::Subclass->new("+111"); $x * $y; ok 1631 - $x = Math::BigFloat::Subclass->new("+10101"); $y = Math::BigFloat::Subclass->new("+10101"); $x * $y; ok 1632 - $x = Math::BigFloat::Subclass->new("+10101"); $y = Math::BigFloat::Subclass->new("+10101"); $x * $y; ok 1633 - $x = Math::BigFloat::Subclass->new("+1001001"); $y = Math::BigFloat::Subclass->new("+1001001"); $x * $y; ok 1634 - $x = Math::BigFloat::Subclass->new("+1001001"); $y = Math::BigFloat::Subclass->new("+1001001"); $x * $y; ok 1635 - $x = Math::BigFloat::Subclass->new("+100010001"); $y = Math::BigFloat::Subclass->new("+100010001"); $x * $y; ok 1636 - $x = Math::BigFloat::Subclass->new("+100010001"); $y = Math::BigFloat::Subclass->new("+100010001"); $x * $y; ok 1637 - $x = Math::BigFloat::Subclass->new("+10000100001"); $y = Math::BigFloat::Subclass->new("+10000100001"); $x * $y; ok 1638 - $x = Math::BigFloat::Subclass->new("+10000100001"); $y = Math::BigFloat::Subclass->new("+10000100001"); $x * $y; ok 1639 - $x = Math::BigFloat::Subclass->new("+11111111111"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1640 - $x = Math::BigFloat::Subclass->new("+11111111111"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1641 - $x = Math::BigFloat::Subclass->new("+22222222222"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1642 - $x = Math::BigFloat::Subclass->new("+22222222222"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1643 - $x = Math::BigFloat::Subclass->new("+33333333333"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1644 - $x = Math::BigFloat::Subclass->new("+33333333333"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1645 - $x = Math::BigFloat::Subclass->new("+44444444444"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1646 - $x = Math::BigFloat::Subclass->new("+44444444444"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1647 - $x = Math::BigFloat::Subclass->new("+55555555555"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1648 - $x = Math::BigFloat::Subclass->new("+55555555555"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1649 - $x = Math::BigFloat::Subclass->new("+66666666666"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1650 - $x = Math::BigFloat::Subclass->new("+66666666666"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1651 - $x = Math::BigFloat::Subclass->new("+77777777777"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1652 - $x = Math::BigFloat::Subclass->new("+77777777777"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1653 - $x = Math::BigFloat::Subclass->new("+88888888888"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1654 - $x = Math::BigFloat::Subclass->new("+88888888888"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1655 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1656 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+9"); $x * $y; ok 1657 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("120"); $x * $y; ok 1658 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("120"); $x * $y; ok 1659 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("10000"); $x * $y; ok 1660 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("10000"); $x * $y; ok 1661 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 1662 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 1663 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 1664 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("5"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 1665 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 1666 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 1667 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 1668 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 1669 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1670 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1671 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1672 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1673 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1674 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1675 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1676 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1677 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1678 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1679 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1680 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1681 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1682 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1683 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1684 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1685 - $x = Math::BigFloat::Subclass->new("+3214"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1686 - $x = Math::BigFloat::Subclass->new("+3214"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1687 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1688 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1689 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1690 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1691 - $x = Math::BigFloat::Subclass->new("-3214"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1692 - $x = Math::BigFloat::Subclass->new("-3214"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1693 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1694 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1695 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1696 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1697 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1698 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1699 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1700 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1701 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+2"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1702 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+2"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1703 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1704 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1705 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1706 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1707 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1708 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1709 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("+5"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1710 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("+5"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1711 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("+4"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1712 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("+4"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1713 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("+8"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1714 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("+8"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1715 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("+16"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1716 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("+16"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1717 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-16"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1718 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-16"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1719 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1720 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1721 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+99"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1722 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+99"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1723 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1724 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1725 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+9999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1726 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+9999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1727 - $x = Math::BigFloat::Subclass->new("+999999999999999"); $y = Math::BigFloat::Subclass->new("+99999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1728 - $x = Math::BigFloat::Subclass->new("+999999999999999"); $y = Math::BigFloat::Subclass->new("+99999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1729 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1730 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1731 - $x = Math::BigFloat::Subclass->new("+2000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1732 - $x = Math::BigFloat::Subclass->new("+2000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1733 - $x = Math::BigFloat::Subclass->new("+3000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1734 - $x = Math::BigFloat::Subclass->new("+3000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1735 - $x = Math::BigFloat::Subclass->new("+4000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1736 - $x = Math::BigFloat::Subclass->new("+4000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1737 - $x = Math::BigFloat::Subclass->new("+5000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1738 - $x = Math::BigFloat::Subclass->new("+5000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1739 - $x = Math::BigFloat::Subclass->new("+6000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1740 - $x = Math::BigFloat::Subclass->new("+6000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1741 - $x = Math::BigFloat::Subclass->new("+7000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1742 - $x = Math::BigFloat::Subclass->new("+7000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1743 - $x = Math::BigFloat::Subclass->new("+8000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1744 - $x = Math::BigFloat::Subclass->new("+8000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1745 - $x = Math::BigFloat::Subclass->new("+9000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1746 - $x = Math::BigFloat::Subclass->new("+9000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1747 - $x = Math::BigFloat::Subclass->new("+35500000"); $y = Math::BigFloat::Subclass->new("+113"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1748 - $x = Math::BigFloat::Subclass->new("+35500000"); $y = Math::BigFloat::Subclass->new("+113"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1749 - $x = Math::BigFloat::Subclass->new("+71000000"); $y = Math::BigFloat::Subclass->new("+226"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1750 - $x = Math::BigFloat::Subclass->new("+71000000"); $y = Math::BigFloat::Subclass->new("+226"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1751 - $x = Math::BigFloat::Subclass->new("+106500000"); $y = Math::BigFloat::Subclass->new("+339"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1752 - $x = Math::BigFloat::Subclass->new("+106500000"); $y = Math::BigFloat::Subclass->new("+339"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1753 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1754 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1755 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1756 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1757 - $x = Math::BigFloat::Subclass->new("123456"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1758 - $x = Math::BigFloat::Subclass->new("123456"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; $x / $y; ok 1759 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1760 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1761 - $x = Math::BigFloat::Subclass->new("+2000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1762 - $x = Math::BigFloat::Subclass->new("+2000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1763 - $x = Math::BigFloat::Subclass->new("+3000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1764 - $x = Math::BigFloat::Subclass->new("+3000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1765 - $x = Math::BigFloat::Subclass->new("+4000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1766 - $x = Math::BigFloat::Subclass->new("+4000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1767 - $x = Math::BigFloat::Subclass->new("+5000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1768 - $x = Math::BigFloat::Subclass->new("+5000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1769 - $x = Math::BigFloat::Subclass->new("+6000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1770 - $x = Math::BigFloat::Subclass->new("+6000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1771 - $x = Math::BigFloat::Subclass->new("+7000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1772 - $x = Math::BigFloat::Subclass->new("+7000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1773 - $x = Math::BigFloat::Subclass->new("+8000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1774 - $x = Math::BigFloat::Subclass->new("+8000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1775 - $x = Math::BigFloat::Subclass->new("+9000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1776 - $x = Math::BigFloat::Subclass->new("+9000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1777 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1778 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1779 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1780 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1781 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1000"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1782 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1000"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1783 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10000"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1784 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10000"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1785 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("504"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1786 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("504"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1787 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.987654321"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1788 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.987654321"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1789 - $x = Math::BigFloat::Subclass->new("123456789.123456789123456789123456789"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1790 - $x = Math::BigFloat::Subclass->new("123456789.123456789123456789123456789"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1791 - $x = Math::BigFloat::Subclass->new("+35500000"); $y = Math::BigFloat::Subclass->new("+113"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1792 - $x = Math::BigFloat::Subclass->new("+35500000"); $y = Math::BigFloat::Subclass->new("+113"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1793 - $x = Math::BigFloat::Subclass->new("+71000000"); $y = Math::BigFloat::Subclass->new("+226"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1794 - $x = Math::BigFloat::Subclass->new("+71000000"); $y = Math::BigFloat::Subclass->new("+226"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1795 - $x = Math::BigFloat::Subclass->new("+106500000"); $y = Math::BigFloat::Subclass->new("+339"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1796 - $x = Math::BigFloat::Subclass->new("+106500000"); $y = Math::BigFloat::Subclass->new("+339"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1797 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1798 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 20; $x / $y; ok 1799 - $x = Math::BigFloat::Subclass->new("+124"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 1; $x / $y; ok 1800 - $x = Math::BigFloat::Subclass->new("+124"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 1; $x / $y; ok 1801 - $x = Math::BigFloat::Subclass->new("123456789.1234"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 1; $x / $y; ok 1802 - $x = Math::BigFloat::Subclass->new("123456789.1234"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 1; $x / $y; ok 1803 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("4"); $x % $y; ok 1804 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("4"); $x % $y; ok 1805 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1806 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1807 - $x = Math::BigFloat::Subclass->new("+9000"); $y = Math::BigFloat::Subclass->new("56"); $x % $y; ok 1808 - $x = Math::BigFloat::Subclass->new("+9000"); $y = Math::BigFloat::Subclass->new("56"); $x % $y; ok 1809 - $x = Math::BigFloat::Subclass->new("+56"); $y = Math::BigFloat::Subclass->new("9000"); $x % $y; ok 1810 - $x = Math::BigFloat::Subclass->new("+56"); $y = Math::BigFloat::Subclass->new("9000"); $x % $y; ok 1811 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1812 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1813 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1814 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1815 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1816 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1817 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1818 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1819 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1820 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1821 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1822 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1823 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1824 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1825 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1826 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1827 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1828 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1829 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1830 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1831 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1832 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1833 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1834 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1835 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1836 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1837 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1838 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1839 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1840 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $x % $y; ok 1841 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1842 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x % $y; ok 1843 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1844 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1845 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1846 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1847 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1848 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1849 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1850 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1851 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1852 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1853 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x % $y; ok 1854 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x % $y; ok 1855 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1856 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1857 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("abc"); $x % $y; ok 1858 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("abc"); $x % $y; ok 1859 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1860 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1861 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1862 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1863 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1864 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1865 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1866 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $x % $y; ok 1867 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1868 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1869 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1870 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1871 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1872 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1873 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1874 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1875 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x % $y; ok 1876 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x % $y; ok 1877 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1878 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1879 - $x = Math::BigFloat::Subclass->new("1000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1880 - $x = Math::BigFloat::Subclass->new("1000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1881 - $x = Math::BigFloat::Subclass->new("2000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1882 - $x = Math::BigFloat::Subclass->new("2000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1883 - $x = Math::BigFloat::Subclass->new("3000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1884 - $x = Math::BigFloat::Subclass->new("3000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1885 - $x = Math::BigFloat::Subclass->new("4000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1886 - $x = Math::BigFloat::Subclass->new("4000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1887 - $x = Math::BigFloat::Subclass->new("5000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1888 - $x = Math::BigFloat::Subclass->new("5000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1889 - $x = Math::BigFloat::Subclass->new("6000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1890 - $x = Math::BigFloat::Subclass->new("6000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1891 - $x = Math::BigFloat::Subclass->new("7000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1892 - $x = Math::BigFloat::Subclass->new("7000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1893 - $x = Math::BigFloat::Subclass->new("8000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1894 - $x = Math::BigFloat::Subclass->new("8000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1895 - $x = Math::BigFloat::Subclass->new("9000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1896 - $x = Math::BigFloat::Subclass->new("9000000000"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1897 - $x = Math::BigFloat::Subclass->new("35500000"); $y = Math::BigFloat::Subclass->new("113"); $x % $y; ok 1898 - $x = Math::BigFloat::Subclass->new("35500000"); $y = Math::BigFloat::Subclass->new("113"); $x % $y; ok 1899 - $x = Math::BigFloat::Subclass->new("71000000"); $y = Math::BigFloat::Subclass->new("226"); $x % $y; ok 1900 - $x = Math::BigFloat::Subclass->new("71000000"); $y = Math::BigFloat::Subclass->new("226"); $x % $y; ok 1901 - $x = Math::BigFloat::Subclass->new("106500000"); $y = Math::BigFloat::Subclass->new("339"); $x % $y; ok 1902 - $x = Math::BigFloat::Subclass->new("106500000"); $y = Math::BigFloat::Subclass->new("339"); $x % $y; ok 1903 - $x = Math::BigFloat::Subclass->new("1000000000"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1904 - $x = Math::BigFloat::Subclass->new("1000000000"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1905 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1906 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("5"); $x % $y; ok 1907 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("4"); $x % $y; ok 1908 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("4"); $x % $y; ok 1909 - $x = Math::BigFloat::Subclass->new("1000"); $y = Math::BigFloat::Subclass->new("8"); $x % $y; ok 1910 - $x = Math::BigFloat::Subclass->new("1000"); $y = Math::BigFloat::Subclass->new("8"); $x % $y; ok 1911 - $x = Math::BigFloat::Subclass->new("10000"); $y = Math::BigFloat::Subclass->new("16"); $x % $y; ok 1912 - $x = Math::BigFloat::Subclass->new("10000"); $y = Math::BigFloat::Subclass->new("16"); $x % $y; ok 1913 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1914 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("9"); $x % $y; ok 1915 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("99"); $x % $y; ok 1916 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("99"); $x % $y; ok 1917 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("999"); $x % $y; ok 1918 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("999"); $x % $y; ok 1919 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("9999"); $x % $y; ok 1920 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("9999"); $x % $y; ok 1921 - $x = Math::BigFloat::Subclass->new("999999999999999"); $y = Math::BigFloat::Subclass->new("99999"); $x % $y; ok 1922 - $x = Math::BigFloat::Subclass->new("999999999999999"); $y = Math::BigFloat::Subclass->new("99999"); $x % $y; ok 1923 - $x = Math::BigFloat::Subclass->new("-9"); $y = Math::BigFloat::Subclass->new("+5"); $x % $y; ok 1924 - $x = Math::BigFloat::Subclass->new("-9"); $y = Math::BigFloat::Subclass->new("+5"); $x % $y; ok 1925 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1926 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1927 - $x = Math::BigFloat::Subclass->new("-9"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1928 - $x = Math::BigFloat::Subclass->new("-9"); $y = Math::BigFloat::Subclass->new("-5"); $x % $y; ok 1929 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1930 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1931 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1932 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1933 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1934 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1935 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1936 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1937 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-3"); $x % $y; ok 1938 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-3"); $x % $y; ok 1939 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x % $y; ok 1940 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x % $y; ok 1941 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("-3"); $x % $y; ok 1942 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("-3"); $x % $y; ok 1943 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-3"); $x % $y; ok 1944 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-3"); $x % $y; ok 1945 - $x = Math::BigFloat::Subclass->new("4095"); $y = Math::BigFloat::Subclass->new("4095"); $x % $y; ok 1946 - $x = Math::BigFloat::Subclass->new("4095"); $y = Math::BigFloat::Subclass->new("4095"); $x % $y; ok 1947 - $x = Math::BigFloat::Subclass->new("100041000510123"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1948 - $x = Math::BigFloat::Subclass->new("100041000510123"); $y = Math::BigFloat::Subclass->new("3"); $x % $y; ok 1949 - $x = Math::BigFloat::Subclass->new("152403346"); $y = Math::BigFloat::Subclass->new("12345"); $x % $y; ok 1950 - $x = Math::BigFloat::Subclass->new("152403346"); $y = Math::BigFloat::Subclass->new("12345"); $x % $y; ok 1951 - $x = Math::BigFloat::Subclass->new("87654321"); $y = Math::BigFloat::Subclass->new("87654321"); $x % $y; ok 1952 - $x = Math::BigFloat::Subclass->new("87654321"); $y = Math::BigFloat::Subclass->new("87654321"); $x % $y; ok 1953 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("2.5"); $x % $y; ok 1954 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("2.5"); $x % $y; ok 1955 - $x = Math::BigFloat::Subclass->new("1230"); $y = Math::BigFloat::Subclass->new("2.5"); $x % $y; ok 1956 - $x = Math::BigFloat::Subclass->new("1230"); $y = Math::BigFloat::Subclass->new("2.5"); $x % $y; ok 1957 - $x = Math::BigFloat::Subclass->new("123.4"); $y = Math::BigFloat::Subclass->new("2.5"); $x % $y; ok 1958 - $x = Math::BigFloat::Subclass->new("123.4"); $y = Math::BigFloat::Subclass->new("2.5"); $x % $y; ok 1959 - $x = Math::BigFloat::Subclass->new("123e1"); $y = Math::BigFloat::Subclass->new("25"); $x % $y; ok 1960 - $x = Math::BigFloat::Subclass->new("123e1"); $y = Math::BigFloat::Subclass->new("25"); $x % $y; ok 1961 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1962 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1963 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1964 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1965 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1966 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1967 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1968 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1969 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1970 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1971 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1972 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1"); $x % $y; ok 1973 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1974 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1975 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1976 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-1"); $x % $y; ok 1977 - $x = Math::BigFloat::Subclass->new("Nanfac"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1978 - $x = Math::BigFloat::Subclass->new("Nanfac"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1979 - $x = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1980 - $x = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1981 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1982 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1983 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1984 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1985 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1986 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1987 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1988 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1989 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1990 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1991 - $x = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1992 - $x = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1993 - $x = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1994 - $x = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1995 - $x = Math::BigFloat::Subclass->new("5"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1996 - $x = Math::BigFloat::Subclass->new("5"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1997 - $x = Math::BigFloat::Subclass->new("6"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1998 - $x = Math::BigFloat::Subclass->new("6"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 1999 - $x = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 2000 - $x = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 2001 - $x = Math::BigFloat::Subclass->new("11"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 2002 - $x = Math::BigFloat::Subclass->new("11"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 2003 - $x = Math::BigFloat::Subclass->new("12"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 2004 - $x = Math::BigFloat::Subclass->new("12"); $Math::BigFloat::Subclass::div_scale = 40; $x->bfac(); ok 2005 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2006 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2007 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2008 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2009 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2010 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2011 - $x = Math::BigFloat::Subclass->new("-123.456"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2012 - $x = Math::BigFloat::Subclass->new("-123.456"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2013 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2014 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2015 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2016 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2017 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2018 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2019 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2020 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2021 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2022 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2023 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2024 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2025 - $x = Math::BigFloat::Subclass->new("16"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2026 - $x = Math::BigFloat::Subclass->new("16"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2027 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2028 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2029 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2030 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2031 - $x = Math::BigFloat::Subclass->new("15241.38393"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2032 - $x = Math::BigFloat::Subclass->new("15241.38393"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2033 - $x = Math::BigFloat::Subclass->new("1.44"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2034 - $x = Math::BigFloat::Subclass->new("1.44"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2035 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2036 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2037 - $x = Math::BigFloat::Subclass->new("0.49"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2038 - $x = Math::BigFloat::Subclass->new("0.49"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2039 - $x = Math::BigFloat::Subclass->new("0.0049"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2040 - $x = Math::BigFloat::Subclass->new("0.0049"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2041 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2042 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2043 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2044 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2045 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2046 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2047 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2048 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2049 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2050 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2051 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2052 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2053 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2054 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2055 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2056 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2057 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2058 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2059 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2060 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2061 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2062 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2063 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2064 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2065 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2066 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2067 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2068 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2069 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2070 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2071 - $x = Math::BigFloat::Subclass->new("-123.45"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2072 - $x = Math::BigFloat::Subclass->new("-123.45"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2073 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2074 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2075 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2076 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2077 - $x = Math::BigFloat::Subclass->new("-12"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2078 - $x = Math::BigFloat::Subclass->new("-12"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2079 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2080 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2081 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2082 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2083 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2084 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2085 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2086 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2087 - $x = Math::BigFloat::Subclass->new("16"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2088 - $x = Math::BigFloat::Subclass->new("16"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2089 - $x = Math::BigFloat::Subclass->new("81"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2090 - $x = Math::BigFloat::Subclass->new("81"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2091 - $x = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2092 - $x = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2093 - $x = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2094 - $x = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2095 - $x = Math::BigFloat::Subclass->new("-2"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2096 - $x = Math::BigFloat::Subclass->new("-2"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2097 - $x = Math::BigFloat::Subclass->new("-16"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2098 - $x = Math::BigFloat::Subclass->new("-16"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2099 - $x = Math::BigFloat::Subclass->new("-123.45"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2100 - $x = Math::BigFloat::Subclass->new("-123.45"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2101 - $x = Math::BigFloat::Subclass->new("nanbsqrt"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2102 - $x = Math::BigFloat::Subclass->new("nanbsqrt"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2103 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2104 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2105 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2106 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2107 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2108 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2109 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2110 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2111 - $x = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2112 - $x = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2113 - $x = Math::BigFloat::Subclass->new("9"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2114 - $x = Math::BigFloat::Subclass->new("9"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2115 - $x = Math::BigFloat::Subclass->new("16"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2116 - $x = Math::BigFloat::Subclass->new("16"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2117 - $x = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2118 - $x = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2119 - $x = Math::BigFloat::Subclass->new("123.456"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2120 - $x = Math::BigFloat::Subclass->new("123.456"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2121 - $x = Math::BigFloat::Subclass->new("15241.38393"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2122 - $x = Math::BigFloat::Subclass->new("15241.38393"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2123 - $x = Math::BigFloat::Subclass->new("1.44"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2124 - $x = Math::BigFloat::Subclass->new("1.44"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2125 - $x = Math::BigFloat::Subclass->new("1.44E10"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2126 - $x = Math::BigFloat::Subclass->new("1.44E10"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2127 - $x = Math::BigFloat::Subclass->new("2e10"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2128 - $x = Math::BigFloat::Subclass->new("2e10"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2129 - $x = Math::BigFloat::Subclass->new("144e20"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2130 - $x = Math::BigFloat::Subclass->new("144e20"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2131 - $x = Math::BigFloat::Subclass->new("12"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2132 - $x = Math::BigFloat::Subclass->new("12"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2133 - $x = Math::BigFloat::Subclass->new("0.49"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2134 - $x = Math::BigFloat::Subclass->new("0.49"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2135 - $x = Math::BigFloat::Subclass->new("0.0049"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2136 - $x = Math::BigFloat::Subclass->new("0.0049"); $Math::BigFloat::Subclass::div_scale = 40; $x->bsqrt(); ok 2137 - $x = Math::BigFloat::Subclass->new("123"); $x->is_nan(); ok 2138 - $x = Math::BigFloat::Subclass->new("abc"); $x->is_nan(); ok 2139 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_nan(); ok 2140 - $x = Math::BigFloat::Subclass->new("-123"); $x->is_nan(); ok 2141 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf(""); ok 2142 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf(""); ok 2143 - $x = Math::BigFloat::Subclass->new("abc"); $x->is_inf(""); ok 2144 - $x = Math::BigFloat::Subclass->new("1"); $x->is_inf(""); ok 2145 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_inf(""); ok 2146 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_inf(""); ok 2147 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf("-"); ok 2148 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf("+"); ok 2149 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf("-"); ok 2150 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf("+"); ok 2151 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf("-inf"); ok 2152 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf("+inf"); ok 2153 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf("-inf"); ok 2154 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf("+inf"); ok 2155 - $x = Math::BigFloat::Subclass->new("+iNfInItY"); $x->is_inf(""); ok 2156 - $x = Math::BigFloat::Subclass->new("-InFiNiTy"); $x->is_inf(""); ok 2157 - $x = Math::BigFloat::Subclass->new("abc"); $x->is_odd(); ok 2158 - $x = Math::BigFloat::Subclass->new("0"); $x->is_odd(); ok 2159 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_odd(); ok 2160 - $x = Math::BigFloat::Subclass->new("-3"); $x->is_odd(); ok 2161 - $x = Math::BigFloat::Subclass->new("1"); $x->is_odd(); ok 2162 - $x = Math::BigFloat::Subclass->new("3"); $x->is_odd(); ok 2163 - $x = Math::BigFloat::Subclass->new("1000001"); $x->is_odd(); ok 2164 - $x = Math::BigFloat::Subclass->new("1000002"); $x->is_odd(); ok 2165 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_odd(); ok 2166 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_odd(); ok 2167 - $x = Math::BigFloat::Subclass->new("123.45"); $x->is_odd(); ok 2168 - $x = Math::BigFloat::Subclass->new("-123.45"); $x->is_odd(); ok 2169 - $x = Math::BigFloat::Subclass->new("2"); $x->is_odd(); ok 2170 - $x = Math::BigFloat::Subclass->new("NaNis_int"); $x->is_int(); ok 2171 - $x = Math::BigFloat::Subclass->new("0"); $x->is_int(); ok 2172 - $x = Math::BigFloat::Subclass->new("1"); $x->is_int(); ok 2173 - $x = Math::BigFloat::Subclass->new("2"); $x->is_int(); ok 2174 - $x = Math::BigFloat::Subclass->new("-2"); $x->is_int(); ok 2175 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_int(); ok 2176 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_int(); ok 2177 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_int(); ok 2178 - $x = Math::BigFloat::Subclass->new("123.4567"); $x->is_int(); ok 2179 - $x = Math::BigFloat::Subclass->new("-0.1"); $x->is_int(); ok 2180 - $x = Math::BigFloat::Subclass->new("-0.002"); $x->is_int(); ok 2181 - $x = Math::BigFloat::Subclass->new("abc"); $x->is_even(); ok 2182 - $x = Math::BigFloat::Subclass->new("0"); $x->is_even(); ok 2183 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_even(); ok 2184 - $x = Math::BigFloat::Subclass->new("-3"); $x->is_even(); ok 2185 - $x = Math::BigFloat::Subclass->new("1"); $x->is_even(); ok 2186 - $x = Math::BigFloat::Subclass->new("3"); $x->is_even(); ok 2187 - $x = Math::BigFloat::Subclass->new("1000001"); $x->is_even(); ok 2188 - $x = Math::BigFloat::Subclass->new("1000002"); $x->is_even(); ok 2189 - $x = Math::BigFloat::Subclass->new("2"); $x->is_even(); ok 2190 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_even(); ok 2191 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_even(); ok 2192 - $x = Math::BigFloat::Subclass->new("123.456"); $x->is_even(); ok 2193 - $x = Math::BigFloat::Subclass->new("-123.456"); $x->is_even(); ok 2194 - $x = Math::BigFloat::Subclass->new("0.01"); $x->is_even(); ok 2195 - $x = Math::BigFloat::Subclass->new("-0.01"); $x->is_even(); ok 2196 - $x = Math::BigFloat::Subclass->new("120"); $x->is_even(); ok 2197 - $x = Math::BigFloat::Subclass->new("1200"); $x->is_even(); ok 2198 - $x = Math::BigFloat::Subclass->new("-1200"); $x->is_even(); ok 2199 - $x = Math::BigFloat::Subclass->new("0"); $x->is_positive(); ok 2200 - $x = Math::BigFloat::Subclass->new("1"); $x->is_positive(); ok 2201 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_positive(); ok 2202 - $x = Math::BigFloat::Subclass->new("-123"); $x->is_positive(); ok 2203 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_positive(); ok 2204 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_positive(); ok 2205 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_positive(); ok 2206 - $x = Math::BigFloat::Subclass->new("0"); $x->is_negative(); ok 2207 - $x = Math::BigFloat::Subclass->new("1"); $x->is_negative(); ok 2208 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_negative(); ok 2209 - $x = Math::BigFloat::Subclass->new("-123"); $x->is_negative(); ok 2210 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_negative(); ok 2211 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_negative(); ok 2212 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_negative(); ok 2213 - $x = Math::BigFloat::Subclass->new("0"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2214 - $x = Math::BigFloat::Subclass->new("1"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2215 - $x = Math::BigFloat::Subclass->new("123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2216 - $x = Math::BigFloat::Subclass->new("-123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2217 - $x = Math::BigFloat::Subclass->new("-1200"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2218 - $x = Math::BigFloat::Subclass->new("NaNparts"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2219 - $x = Math::BigFloat::Subclass->new("+inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2220 - $x = Math::BigFloat::Subclass->new("-inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2221 - $x = Math::BigFloat::Subclass->new("0"); $x->exponent()->bstr(); ok 2222 - $x = Math::BigFloat::Subclass->new("1"); $x->exponent()->bstr(); ok 2223 - $x = Math::BigFloat::Subclass->new("123"); $x->exponent()->bstr(); ok 2224 - $x = Math::BigFloat::Subclass->new("-123"); $x->exponent()->bstr(); ok 2225 - $x = Math::BigFloat::Subclass->new("-1200"); $x->exponent()->bstr(); ok 2226 - $x = Math::BigFloat::Subclass->new("+inf"); $x->exponent()->bstr(); ok 2227 - $x = Math::BigFloat::Subclass->new("-inf"); $x->exponent()->bstr(); ok 2228 - $x = Math::BigFloat::Subclass->new("NaNexponent"); $x->exponent()->bstr(); ok 2229 - $x = Math::BigFloat::Subclass->new("0"); $x->mantissa()->bstr(); ok 2230 - $x = Math::BigFloat::Subclass->new("1"); $x->mantissa()->bstr(); ok 2231 - $x = Math::BigFloat::Subclass->new("123"); $x->mantissa()->bstr(); ok 2232 - $x = Math::BigFloat::Subclass->new("-123"); $x->mantissa()->bstr(); ok 2233 - $x = Math::BigFloat::Subclass->new("-1200"); $x->mantissa()->bstr(); ok 2234 - $x = Math::BigFloat::Subclass->new("+inf"); $x->mantissa()->bstr(); ok 2235 - $x = Math::BigFloat::Subclass->new("-inf"); $x->mantissa()->bstr(); ok 2236 - $x = Math::BigFloat::Subclass->new("NaNmantissa"); $x->mantissa()->bstr(); ok 2237 - $x = Math::BigFloat::Subclass->new("123"); $x->length(); ok 2238 - $x = Math::BigFloat::Subclass->new("-123"); $x->length(); ok 2239 - $x = Math::BigFloat::Subclass->new("0"); $x->length(); ok 2240 - $x = Math::BigFloat::Subclass->new("1"); $x->length(); ok 2241 - $x = Math::BigFloat::Subclass->new("12345678901234567890"); $x->length(); ok 2242 - $x = Math::BigFloat::Subclass->new("NaNzero"); $x->is_zero(); ok 2243 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_zero(); ok 2244 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_zero(); ok 2245 - $x = Math::BigFloat::Subclass->new("0"); $x->is_zero(); ok 2246 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_zero(); ok 2247 - $x = Math::BigFloat::Subclass->new("1"); $x->is_zero(); ok 2248 - $x = Math::BigFloat::Subclass->new("NaNone"); $x->is_one(); ok 2249 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_one(); ok 2250 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_one(); ok 2251 - $x = Math::BigFloat::Subclass->new("0"); $x->is_one(); ok 2252 - $x = Math::BigFloat::Subclass->new("2"); $x->is_one(); ok 2253 - $x = Math::BigFloat::Subclass->new("1"); $x->is_one(); ok 2254 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_one(); ok 2255 - $x = Math::BigFloat::Subclass->new("-2"); $x->is_one(); ok 2256 - $x = Math::BigFloat::Subclass->new("0"); $x->bfloor(); ok 2257 - $x = Math::BigFloat::Subclass->new("0"); $x->bfloor(); ok 2258 - $x = Math::BigFloat::Subclass->new("abc"); $x->bfloor(); ok 2259 - $x = Math::BigFloat::Subclass->new("abc"); $x->bfloor(); ok 2260 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bfloor(); ok 2261 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bfloor(); ok 2262 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bfloor(); ok 2263 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bfloor(); ok 2264 - $x = Math::BigFloat::Subclass->new("1"); $x->bfloor(); ok 2265 - $x = Math::BigFloat::Subclass->new("1"); $x->bfloor(); ok 2266 - $x = Math::BigFloat::Subclass->new("-51"); $x->bfloor(); ok 2267 - $x = Math::BigFloat::Subclass->new("-51"); $x->bfloor(); ok 2268 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bfloor(); ok 2269 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bfloor(); ok 2270 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bfloor(); ok 2271 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bfloor(); ok 2272 - $x = Math::BigFloat::Subclass->new("0.12345"); $x->bfloor(); ok 2273 - $x = Math::BigFloat::Subclass->new("0.12345"); $x->bfloor(); ok 2274 - $x = Math::BigFloat::Subclass->new("0.123456"); $x->bfloor(); ok 2275 - $x = Math::BigFloat::Subclass->new("0.123456"); $x->bfloor(); ok 2276 - $x = Math::BigFloat::Subclass->new("0.1234567"); $x->bfloor(); ok 2277 - $x = Math::BigFloat::Subclass->new("0.1234567"); $x->bfloor(); ok 2278 - $x = Math::BigFloat::Subclass->new("0.12345678"); $x->bfloor(); ok 2279 - $x = Math::BigFloat::Subclass->new("0.12345678"); $x->bfloor(); ok 2280 - $x = Math::BigFloat::Subclass->new("0.123456789"); $x->bfloor(); ok 2281 - $x = Math::BigFloat::Subclass->new("0.123456789"); $x->bfloor(); ok 2282 - $x = Math::BigFloat::Subclass->new("0"); $x->bceil(); ok 2283 - $x = Math::BigFloat::Subclass->new("0"); $x->bceil(); ok 2284 - $x = Math::BigFloat::Subclass->new("abc"); $x->bceil(); ok 2285 - $x = Math::BigFloat::Subclass->new("abc"); $x->bceil(); ok 2286 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bceil(); ok 2287 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bceil(); ok 2288 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bceil(); ok 2289 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bceil(); ok 2290 - $x = Math::BigFloat::Subclass->new("1"); $x->bceil(); ok 2291 - $x = Math::BigFloat::Subclass->new("1"); $x->bceil(); ok 2292 - $x = Math::BigFloat::Subclass->new("-51"); $x->bceil(); ok 2293 - $x = Math::BigFloat::Subclass->new("-51"); $x->bceil(); ok 2294 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bceil(); ok 2295 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bceil(); ok 2296 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bceil(); ok 2297 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bceil(); ok 2298 - $x = Math::BigFloat::Subclass->new("-0.4"); $x->bceil(); ok 2299 - $x = Math::BigFloat::Subclass->new("-0.4"); $x->bceil(); ok 2300 - $x = Math::BigFloat::Subclass->new("0"); $x->bint(); ok 2301 - $x = Math::BigFloat::Subclass->new("0"); $x->bint(); ok 2302 - $x = Math::BigFloat::Subclass->new("NaN"); $x->bint(); ok 2303 - $x = Math::BigFloat::Subclass->new("NaN"); $x->bint(); ok 2304 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bint(); ok 2305 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bint(); ok 2306 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bint(); ok 2307 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bint(); ok 2308 - $x = Math::BigFloat::Subclass->new("1"); $x->bint(); ok 2309 - $x = Math::BigFloat::Subclass->new("1"); $x->bint(); ok 2310 - $x = Math::BigFloat::Subclass->new("-51"); $x->bint(); ok 2311 - $x = Math::BigFloat::Subclass->new("-51"); $x->bint(); ok 2312 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bint(); ok 2313 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bint(); ok 2314 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bint(); ok 2315 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bint(); ok 2316 - $x = Math::BigFloat::Subclass->new("-0.4"); $x->bint(); ok 2317 - $x = Math::BigFloat::Subclass->new("-0.4"); $x->bint(); ok 2318 - $x = Math::BigFloat::Subclass->new("-1"); $x = log($x); ok 2319 - $x = Math::BigFloat::Subclass->new("-1"); $x = log($x); ok 2320 - $x = Math::BigFloat::Subclass->new("0"); $x = log($x); ok 2321 - $x = Math::BigFloat::Subclass->new("0"); $x = log($x); ok 2322 - $x = Math::BigFloat::Subclass->new("1"); $x = log($x); ok 2323 - $x = Math::BigFloat::Subclass->new("1"); $x = log($x); ok 2324 - $x = Math::BigFloat::Subclass->new("2"); $x = log($x); ok 2325 - $x = Math::BigFloat::Subclass->new("2"); $x = log($x); ok 2326 - $x = Math::BigFloat::Subclass->new("3"); $x = log($x); ok 2327 - $x = Math::BigFloat::Subclass->new("3"); $x = log($x); ok 2328 - $x = Math::BigFloat::Subclass->new("123456789"); $x = log($x); ok 2329 - $x = Math::BigFloat::Subclass->new("123456789"); $x = log($x); ok 2330 - $x = Math::BigFloat::Subclass->new("1234567890987654321"); $x = log($x); ok 2331 - $x = Math::BigFloat::Subclass->new("1234567890987654321"); $x = log($x); ok 2332 - $x = Math::BigFloat::Subclass->new("-inf"); $x = log($x); ok 2333 - $x = Math::BigFloat::Subclass->new("-inf"); $x = log($x); ok 2334 - $x = Math::BigFloat::Subclass->new("inf"); $x = log($x); ok 2335 - $x = Math::BigFloat::Subclass->new("inf"); $x = log($x); ok 2336 - $x = Math::BigFloat::Subclass->new("NaN"); $x = log($x); ok 2337 - $x = Math::BigFloat::Subclass->new("NaN"); $x = log($x); ok 2338 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $y ok 2339 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $x ok 2340 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890")->bsstr() ok 2341 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890")->exponent() ok 2342 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890") > 0 ok 2343 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890")->bsub("1e1234567890123456789012345678901234567890") ok 2344 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890")->bmul(2)->bsstr() ok 2345 - Math::BigFloat::Subclass->new("1234567890123456789012345678901234567890e2")->mantissa() ok 2346 - $x = Math::BigFloat::Subclass->new(2); $x->bzero(); $x->{_a} ok 2347 - $x = Math::BigFloat::Subclass->new(2); $x->bzero(); $x->{_p} ok 2348 - $x = Math::BigFloat::Subclass->new(2); $x->binf(); $x->{_a} ok 2349 - $x = Math::BigFloat::Subclass->new(2); $x->binf(); $x->{_p} ok 2350 - $x = Math::BigFloat::Subclass->new(2); $x->bone(); $x->{_a} ok 2351 - $x = Math::BigFloat::Subclass->new(2); $x->bone(); $x->{_p} ok 2352 - $x = Math::BigFloat::Subclass->new(2); $x->bnan(); $x->{_a} ok 2353 - $x = Math::BigFloat::Subclass->new(2); $x->bnan(); $x->{_p} ok 2354 - Math::BigFloat::Subclass->bzero() ok 2355 - Math::BigFloat::Subclass->bone() ok 2356 - Math::BigFloat::Subclass->bone("+") ok 2357 - Math::BigFloat::Subclass->bone("-") ok 2358 - Math::BigFloat::Subclass->bnan() ok 2359 - Math::BigFloat::Subclass->binf() ok 2360 - Math::BigFloat::Subclass->binf("+") ok 2361 - Math::BigFloat::Subclass->binf("-") ok 2362 - Math::BigFloat::Subclass->binf("-inf") ok 2363 - $x = Math::BigFloat::Subclass->new("0.008"); $y = Math::BigFloat::Subclass->new(2); $x->bdiv(3, $y); ok 2364 - Math::BigFloat::Subclass->new("12345e67")->numify() ok 2365 - Math::BigFloat::Subclass->new("1e-9999")->numify() ok 2366 - Math::BigFloat::Subclass->new("1e9999")->numify() ok 2367 - numify of +Inf ok 2368 - numify of -Inf ok 2369 - numify of NaN ok 2370 - $x = Math::BigFloat::Subclass->new(12); Math::BigFloat::Subclass->precision(-2); $x->bsqrt(); ok 2371 - Math::BigFloat::Subclass->precision(undef); $x = Math::BigFloat::Subclass->new(12); Math::BigFloat::Subclass->precision(0); $x->bsqrt(); ok 2372 - Math::BigFloat::Subclass->precision(-3); $x = Math::BigFloat::Subclass->new(12); $x->bsqrt(); ok 2373 - A and P set => NaN ok 2374 - supplied arg overrides set global ok 2375 - @args = Math::BigFloat::Subclass::objectify(2, Math::BigFloat::Subclass, 4, 5); join(" ", @args); ok 2376 - Math::BigFloat::Subclass->new(-1)->is_one() ok 2377 - Math::BigFloat::Subclass->new(-1)->is_one("-") ok 2378 - Math::BigFloat::Subclass->new(1)->bdiv("0.5")->bsstr() ok 2379 - $x = Math::BigFloat::Subclass->new(3); $x -= $x; ok 2380 - $x = Math::BigFloat::Subclass->new(-3); $x -= $x; ok 2381 - $x = Math::BigFloat::Subclass->new(3); $x += $x; ok 2382 - $x = Math::BigFloat::Subclass->new(-3); $x += $x; ok 2383 - $x = Math::BigFloat::Subclass->new("NaN"); $x -= $x; ok 2384 - $x = Math::BigFloat::Subclass->new("inf"); $x -= $x; ok 2385 - $x = Math::BigFloat::Subclass->new("-inf"); $x -= $x; ok 2386 - $x = Math::BigFloat::Subclass->new("NaN"); $x += $x; ok 2387 - $x = Math::BigFloat::Subclass->new("inf"); $x += $x; ok 2388 - $x = Math::BigFloat::Subclass->new("-inf"); $x += $x; ok 2389 - $x = Math::BigFloat::Subclass->new("3.14"); $x -= $x; ok 2390 - $x = Math::BigFloat::Subclass->new("-3.14"); $x -= $x; ok 2391 - 6.28 = Math::BigFloat::Subclass->new("3.14"); 6.28 += 6.28; ok 2392 - -6.28 = Math::BigFloat::Subclass->new("-3.14"); -6.28 += -6.28; ok 2393 - 9.8596 = Math::BigFloat::Subclass->new("3.14"); 9.8596 *= 9.8596; ok 2394 - 9.8596 = Math::BigFloat::Subclass->new("-3.14"); 9.8596 *= 9.8596; ok 2395 - 1 = Math::BigFloat::Subclass->new("3.14"); 1 /= 1; ok 2396 - 1 = Math::BigFloat::Subclass->new("-3.14"); 1 /= 1; ok 2397 - 0 = Math::BigFloat::Subclass->new("3.14"); 0 %= 0; ok 2398 - 0 = Math::BigFloat::Subclass->new("-3.14"); 0 %= 0; ok 2399 - $x = Math::BigFloat::Subclass->new(0); $y = Math::BigFloat::Subclass->new("0.1"); $x ** $y ok 2400 - 1 = Math::BigFloat::Subclass->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 2401 - value of ((2**148)+1)/17 ok 2402 - number of digits in ((2**148)+1)/17 ok 2403 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18"); $x <<= $y ok 2404 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18"); $x <<= $y; $x ok 2405 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18"); $x <<= $y; $x >>= $y ok 2406 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18"); $x <<= $y; $x >>= $y; $x ok 2407 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); ok 2408 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 2409 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y; $x ok 2410 - $ms has custom attribute \$ms->{_custom} ok 2411 - An object of class 'Math::BigFloat::Subclass' isa 'Math::BigFloat' ok 2412 - An object of class 'Math::BigFloat::Subclass' isn't a 'Math::BigFloat' ok 2413 - $ms is 46 ok 2414 - $ms has custom attribute $ms->{_custom} ok 2415 - $ms is not an object of class 'Math::BigFloat::Subclass' ok t\sub_mbi.t ............ 1..3729 ok 1 - Math::BigInt::Subclass->config()->{lib} ok 2 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("-345"); $x .= $y; ok 3 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x += $y; ok 4 - is a valid object ok 5 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $x += $y; ok 6 - is a valid object ok 7 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x -= $y; ok 8 - is a valid object ok 9 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $x -= $y; ok 10 - is a valid object ok 11 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x *= $y; ok 12 - is a valid object ok 13 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("5"); $x *= $y; ok 14 - is a valid object ok 15 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("3"); $x %= $y; ok 16 - is a valid object ok 17 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("9"); $x %= $y; ok 18 - is a valid object ok 19 - $x = Math::BigInt::Subclass->new("-629"); $y = Math::BigInt::Subclass->new("5033"); $x %= $y; ok 20 - is a valid object ok 21 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("3"); $x /= $y; ok 22 - is a valid object ok 23 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("2"); $x /= $y; ok 24 - is a valid object ok 25 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x |= $y; ok 26 - is a valid object ok 27 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("7"); $x &= $y; ok 28 - is a valid object ok 29 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("7"); $x ^= $y; ok 30 - is a valid object ok 31 - $x = Math::BigInt::Subclass->new("NaNlog"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 32 - is a valid object ok 33 - $x = Math::BigInt::Subclass->new("122"); $y = Math::BigInt::Subclass->new("NaNlog"); $x->blog($y); ok 34 - is a valid object ok 35 - $x = Math::BigInt::Subclass->new("NaNlog1"); $y = Math::BigInt::Subclass->new("NaNlog"); $x->blog($y); ok 36 - is a valid object ok 37 - $x = Math::BigInt::Subclass->new("122"); $y = Math::BigInt::Subclass->new("inf"); $x->blog($y); ok 38 - is a valid object ok 39 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("122"); $x->blog($y); ok 40 - is a valid object ok 41 - $x = Math::BigInt::Subclass->new("122"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 42 - is a valid object ok 43 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("122"); $x->blog($y); ok 44 - is a valid object ok 45 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 46 - is a valid object ok 47 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 48 - is a valid object ok 49 - $x = Math::BigInt::Subclass->new("-21"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 50 - is a valid object ok 51 - $x = Math::BigInt::Subclass->new("21"); $y = Math::BigInt::Subclass->new("-21"); $x->blog($y); ok 52 - is a valid object ok 53 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 54 - is a valid object ok 55 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x->blog($y); ok 56 - is a valid object ok 57 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->blog($y); ok 58 - is a valid object ok 59 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->blog($y); ok 60 - is a valid object ok 61 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x->blog($y); ok 62 - is a valid object ok 63 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 64 - is a valid object ok 65 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x->blog($y); ok 66 - is a valid object ok 67 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x->blog($y); ok 68 - is a valid object ok 69 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->blog($y); ok 70 - is a valid object ok 71 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 72 - is a valid object ok 73 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $x->blog($y); ok 74 - is a valid object ok 75 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 76 - is a valid object ok 77 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $x->blog($y); ok 78 - is a valid object ok 79 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $x->blog($y); ok 80 - is a valid object ok 81 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $x->blog($y); ok 82 - is a valid object ok 83 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 84 - is a valid object ok 85 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $x->blog($y); ok 86 - is a valid object ok 87 - $x = Math::BigInt::Subclass->new("1024"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 88 - is a valid object ok 89 - $x = Math::BigInt::Subclass->new("81"); $y = Math::BigInt::Subclass->new("3"); $x->blog($y); ok 90 - is a valid object ok 91 - $x = Math::BigInt::Subclass->new("82"); $y = Math::BigInt::Subclass->new("3"); $x->blog($y); ok 92 - is a valid object ok 93 - $x = Math::BigInt::Subclass->new("80"); $y = Math::BigInt::Subclass->new("3"); $x->blog($y); ok 94 - is a valid object ok 95 - $x = Math::BigInt::Subclass->new("4096"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 96 - is a valid object ok 97 - $x = Math::BigInt::Subclass->new("15625"); $y = Math::BigInt::Subclass->new("5"); $x->blog($y); ok 98 - is a valid object ok 99 - $x = Math::BigInt::Subclass->new("15626"); $y = Math::BigInt::Subclass->new("5"); $x->blog($y); ok 100 - is a valid object ok 101 - $x = Math::BigInt::Subclass->new("15624"); $y = Math::BigInt::Subclass->new("5"); $x->blog($y); ok 102 - is a valid object ok 103 - $x = Math::BigInt::Subclass->new("1000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 104 - is a valid object ok 105 - $x = Math::BigInt::Subclass->new("10000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 106 - is a valid object ok 107 - $x = Math::BigInt::Subclass->new("100000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 108 - is a valid object ok 109 - $x = Math::BigInt::Subclass->new("1000000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 110 - is a valid object ok 111 - $x = Math::BigInt::Subclass->new("10000000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 112 - is a valid object ok 113 - $x = Math::BigInt::Subclass->new("100000000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 114 - is a valid object ok 115 - $x = Math::BigInt::Subclass->new("8916100448256"); $y = Math::BigInt::Subclass->new("12"); $x->blog($y); ok 116 - is a valid object ok 117 - $x = Math::BigInt::Subclass->new("8916100448257"); $y = Math::BigInt::Subclass->new("12"); $x->blog($y); ok 118 - is a valid object ok 119 - $x = Math::BigInt::Subclass->new("8916100448255"); $y = Math::BigInt::Subclass->new("12"); $x->blog($y); ok 120 - is a valid object ok 121 - $x = Math::BigInt::Subclass->new("2251799813685248"); $y = Math::BigInt::Subclass->new("8"); $x->blog($y); ok 122 - is a valid object ok 123 - $x = Math::BigInt::Subclass->new("72057594037927936"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 124 - is a valid object ok 125 - $x = Math::BigInt::Subclass->new("144115188075855872"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 126 - is a valid object ok 127 - $x = Math::BigInt::Subclass->new("288230376151711744"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 128 - is a valid object ok 129 - $x = Math::BigInt::Subclass->new("576460752303423488"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 130 - is a valid object ok 131 - $x = Math::BigInt::Subclass->new("1329227995784915872903807060280344576"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 132 - is a valid object ok 133 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $x->blog($y); ok 134 - is a valid object ok 135 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 136 - is a valid object ok 137 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->blog($y); ok 138 - is a valid object ok 139 - $x = Math::BigInt::Subclass->new("0"); $x->is_negative() || 0; ok 140 - $x = Math::BigInt::Subclass->new("-1"); $x->is_negative() || 0; ok 141 - $x = Math::BigInt::Subclass->new("1"); $x->is_negative() || 0; ok 142 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_negative() || 0; ok 143 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_negative() || 0; ok 144 - $x = Math::BigInt::Subclass->new("NaNneg"); $x->is_negative() || 0; ok 145 - $x = Math::BigInt::Subclass->new("0"); $x->is_positive() || 0; ok 146 - $x = Math::BigInt::Subclass->new("-1"); $x->is_positive() || 0; ok 147 - $x = Math::BigInt::Subclass->new("1"); $x->is_positive() || 0; ok 148 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_positive() || 0; ok 149 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_positive() || 0; ok 150 - $x = Math::BigInt::Subclass->new("NaNneg"); $x->is_positive() || 0; ok 151 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_int() || 0; ok 152 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_int() || 0; ok 153 - $x = Math::BigInt::Subclass->new("NaNis_int"); $x->is_int() || 0; ok 154 - $x = Math::BigInt::Subclass->new("1"); $x->is_int() || 0; ok 155 - $x = Math::BigInt::Subclass->new("0"); $x->is_int() || 0; ok 156 - $x = Math::BigInt::Subclass->new("123e12"); $x->is_int() || 0; ok 157 - $x = Math::BigInt::Subclass->new("abc"); $x->is_odd() || 0; ok 158 - $x = Math::BigInt::Subclass->new("0"); $x->is_odd() || 0; ok 159 - $x = Math::BigInt::Subclass->new("1"); $x->is_odd() || 0; ok 160 - $x = Math::BigInt::Subclass->new("3"); $x->is_odd() || 0; ok 161 - $x = Math::BigInt::Subclass->new("-1"); $x->is_odd() || 0; ok 162 - $x = Math::BigInt::Subclass->new("-3"); $x->is_odd() || 0; ok 163 - $x = Math::BigInt::Subclass->new("10000001"); $x->is_odd() || 0; ok 164 - $x = Math::BigInt::Subclass->new("10000002"); $x->is_odd() || 0; ok 165 - $x = Math::BigInt::Subclass->new("2"); $x->is_odd() || 0; ok 166 - $x = Math::BigInt::Subclass->new("120"); $x->is_odd() || 0; ok 167 - $x = Math::BigInt::Subclass->new("121"); $x->is_odd() || 0; ok 168 - $x = Math::BigInt::Subclass->new("abc"); $x->is_even() || 0; ok 169 - $x = Math::BigInt::Subclass->new("0"); $x->is_even() || 0; ok 170 - $x = Math::BigInt::Subclass->new("1"); $x->is_even() || 0; ok 171 - $x = Math::BigInt::Subclass->new("3"); $x->is_even() || 0; ok 172 - $x = Math::BigInt::Subclass->new("-1"); $x->is_even() || 0; ok 173 - $x = Math::BigInt::Subclass->new("-3"); $x->is_even() || 0; ok 174 - $x = Math::BigInt::Subclass->new("10000001"); $x->is_even() || 0; ok 175 - $x = Math::BigInt::Subclass->new("10000002"); $x->is_even() || 0; ok 176 - $x = Math::BigInt::Subclass->new("2"); $x->is_even() || 0; ok 177 - $x = Math::BigInt::Subclass->new("120"); $x->is_even() || 0; ok 178 - $x = Math::BigInt::Subclass->new("121"); $x->is_even() || 0; ok 179 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("-0"); $x->bacmp($y); ok 180 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); $x->bacmp($y); ok 181 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $x->bacmp($y); ok 182 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $x->bacmp($y); ok 183 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+2"); $x->bacmp($y); ok 184 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("-1"); $x->bacmp($y); ok 185 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("+987654321"); $x->bacmp($y); ok 186 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x->bacmp($y); ok 187 - $x = Math::BigInt::Subclass->new("+987654321"); $y = Math::BigInt::Subclass->new("+123456789"); $x->bacmp($y); ok 188 - $x = Math::BigInt::Subclass->new("-987654321"); $y = Math::BigInt::Subclass->new("+123456789"); $x->bacmp($y); ok 189 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("+4567889"); $x->bacmp($y); ok 190 - $x = Math::BigInt::Subclass->new("acmpNaN"); $y = Math::BigInt::Subclass->new("123"); $x->bacmp($y); ok 191 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("acmpNaN"); $x->bacmp($y); ok 192 - $x = Math::BigInt::Subclass->new("acmpNaN"); $y = Math::BigInt::Subclass->new("acmpNaN"); $x->bacmp($y); ok 193 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bacmp($y); ok 194 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 195 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 196 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bacmp($y); ok 197 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("123"); $x->bacmp($y); ok 198 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("123"); $x->bacmp($y); ok 199 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-123"); $x->bacmp($y); ok 200 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-123"); $x->bacmp($y); ok 201 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 202 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("inf"); $x->bacmp($y); ok 203 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 204 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("inf"); $x->bacmp($y); ok 205 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->bacmp($y); ok 206 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x->bacmp($y); ok 207 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->bacmp($y); ok 208 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 209 - $x = Math::BigInt::Subclass->bnorm("0e999"); ok 210 - is a valid object ok 211 - $x = Math::BigInt::Subclass->bnorm("0e-999"); ok 212 - is a valid object ok 213 - $x = Math::BigInt::Subclass->bnorm("-0e999"); ok 214 - is a valid object ok 215 - $x = Math::BigInt::Subclass->bnorm("-0e-999"); ok 216 - is a valid object ok 217 - $x = Math::BigInt::Subclass->bnorm("123"); ok 218 - is a valid object ok 219 - $x = Math::BigInt::Subclass->bnorm("123.000"); ok 220 - is a valid object ok 221 - $x = Math::BigInt::Subclass->bnorm("123e0"); ok 222 - is a valid object ok 223 - $x = Math::BigInt::Subclass->bnorm("123e+0"); ok 224 - is a valid object ok 225 - $x = Math::BigInt::Subclass->bnorm("123e-0"); ok 226 - is a valid object ok 227 - $x = Math::BigInt::Subclass->bnorm("123.000e0"); ok 228 - is a valid object ok 229 - $x = Math::BigInt::Subclass->bnorm("123.000e+0"); ok 230 - is a valid object ok 231 - $x = Math::BigInt::Subclass->bnorm("123.000e-0"); ok 232 - is a valid object ok 233 - $x = Math::BigInt::Subclass->bnorm("0babc"); ok 234 - is a valid object ok 235 - $x = Math::BigInt::Subclass->bnorm("0b123"); ok 236 - is a valid object ok 237 - $x = Math::BigInt::Subclass->bnorm("0b0"); ok 238 - is a valid object ok 239 - $x = Math::BigInt::Subclass->bnorm("-0b0"); ok 240 - is a valid object ok 241 - $x = Math::BigInt::Subclass->bnorm("-0b1"); ok 242 - is a valid object ok 243 - $x = Math::BigInt::Subclass->bnorm("0b0001"); ok 244 - is a valid object ok 245 - $x = Math::BigInt::Subclass->bnorm("0b001"); ok 246 - is a valid object ok 247 - $x = Math::BigInt::Subclass->bnorm("0b011"); ok 248 - is a valid object ok 249 - $x = Math::BigInt::Subclass->bnorm("0b101"); ok 250 - is a valid object ok 251 - $x = Math::BigInt::Subclass->bnorm("0b1001"); ok 252 - is a valid object ok 253 - $x = Math::BigInt::Subclass->bnorm("0b10001"); ok 254 - is a valid object ok 255 - $x = Math::BigInt::Subclass->bnorm("0b100001"); ok 256 - is a valid object ok 257 - $x = Math::BigInt::Subclass->bnorm("0b1000001"); ok 258 - is a valid object ok 259 - $x = Math::BigInt::Subclass->bnorm("0b10000001"); ok 260 - is a valid object ok 261 - $x = Math::BigInt::Subclass->bnorm("0b100000001"); ok 262 - is a valid object ok 263 - $x = Math::BigInt::Subclass->bnorm("0b1000000001"); ok 264 - is a valid object ok 265 - $x = Math::BigInt::Subclass->bnorm("0b10000000001"); ok 266 - is a valid object ok 267 - $x = Math::BigInt::Subclass->bnorm("0b100000000001"); ok 268 - is a valid object ok 269 - $x = Math::BigInt::Subclass->bnorm("0b1000000000001"); ok 270 - is a valid object ok 271 - $x = Math::BigInt::Subclass->bnorm("0b10000000000001"); ok 272 - is a valid object ok 273 - $x = Math::BigInt::Subclass->bnorm("0b100000000000001"); ok 274 - is a valid object ok 275 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000001"); ok 276 - is a valid object ok 277 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000001"); ok 278 - is a valid object ok 279 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000001"); ok 280 - is a valid object ok 281 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000001"); ok 282 - is a valid object ok 283 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000001"); ok 284 - is a valid object ok 285 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000001"); ok 286 - is a valid object ok 287 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000001"); ok 288 - is a valid object ok 289 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000001"); ok 290 - is a valid object ok 291 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000000001"); ok 292 - is a valid object ok 293 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000000001"); ok 294 - is a valid object ok 295 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000000001"); ok 296 - is a valid object ok 297 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000000000001"); ok 298 - is a valid object ok 299 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000000000001"); ok 300 - is a valid object ok 301 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000000000001"); ok 302 - is a valid object ok 303 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000000000000001"); ok 304 - is a valid object ok 305 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000000000000001"); ok 306 - is a valid object ok 307 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000000000000001"); ok 308 - is a valid object ok 309 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000000000000000001"); ok 310 - is a valid object ok 311 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000000000000000001"); ok 312 - is a valid object ok 313 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000000000000000001"); ok 314 - is a valid object ok 315 - $x = Math::BigInt::Subclass->bnorm("0b__101"); ok 316 - is a valid object ok 317 - $x = Math::BigInt::Subclass->bnorm("0b1_0_1"); ok 318 - is a valid object ok 319 - $x = Math::BigInt::Subclass->bnorm("0b0_0_0_1"); ok 320 - is a valid object ok 321 - $x = Math::BigInt::Subclass->bnorm("-0x0"); ok 322 - is a valid object ok 323 - $x = Math::BigInt::Subclass->bnorm("0xabcdefgh"); ok 324 - is a valid object ok 325 - $x = Math::BigInt::Subclass->bnorm("0x1234"); ok 326 - is a valid object ok 327 - $x = Math::BigInt::Subclass->bnorm("0xabcdef"); ok 328 - is a valid object ok 329 - $x = Math::BigInt::Subclass->bnorm("-0xABCDEF"); ok 330 - is a valid object ok 331 - $x = Math::BigInt::Subclass->bnorm("-0x1234"); ok 332 - is a valid object ok 333 - $x = Math::BigInt::Subclass->bnorm("0x12345678"); ok 334 - is a valid object ok 335 - $x = Math::BigInt::Subclass->bnorm("0x1_2_3_4_56_78"); ok 336 - is a valid object ok 337 - $x = Math::BigInt::Subclass->bnorm("0xa_b_c_d_e_f"); ok 338 - is a valid object ok 339 - $x = Math::BigInt::Subclass->bnorm("0x__123"); ok 340 - is a valid object ok 341 - $x = Math::BigInt::Subclass->bnorm("0x9"); ok 342 - is a valid object ok 343 - $x = Math::BigInt::Subclass->bnorm("0x11"); ok 344 - is a valid object ok 345 - $x = Math::BigInt::Subclass->bnorm("0x21"); ok 346 - is a valid object ok 347 - $x = Math::BigInt::Subclass->bnorm("0x41"); ok 348 - is a valid object ok 349 - $x = Math::BigInt::Subclass->bnorm("0x81"); ok 350 - is a valid object ok 351 - $x = Math::BigInt::Subclass->bnorm("0x101"); ok 352 - is a valid object ok 353 - $x = Math::BigInt::Subclass->bnorm("0x201"); ok 354 - is a valid object ok 355 - $x = Math::BigInt::Subclass->bnorm("0x401"); ok 356 - is a valid object ok 357 - $x = Math::BigInt::Subclass->bnorm("0x801"); ok 358 - is a valid object ok 359 - $x = Math::BigInt::Subclass->bnorm("0x1001"); ok 360 - is a valid object ok 361 - $x = Math::BigInt::Subclass->bnorm("0x2001"); ok 362 - is a valid object ok 363 - $x = Math::BigInt::Subclass->bnorm("0x4001"); ok 364 - is a valid object ok 365 - $x = Math::BigInt::Subclass->bnorm("0x8001"); ok 366 - is a valid object ok 367 - $x = Math::BigInt::Subclass->bnorm("0x10001"); ok 368 - is a valid object ok 369 - $x = Math::BigInt::Subclass->bnorm("0x20001"); ok 370 - is a valid object ok 371 - $x = Math::BigInt::Subclass->bnorm("0x40001"); ok 372 - is a valid object ok 373 - $x = Math::BigInt::Subclass->bnorm("0x80001"); ok 374 - is a valid object ok 375 - $x = Math::BigInt::Subclass->bnorm("0x100001"); ok 376 - is a valid object ok 377 - $x = Math::BigInt::Subclass->bnorm("0x200001"); ok 378 - is a valid object ok 379 - $x = Math::BigInt::Subclass->bnorm("0x400001"); ok 380 - is a valid object ok 381 - $x = Math::BigInt::Subclass->bnorm("0x800001"); ok 382 - is a valid object ok 383 - $x = Math::BigInt::Subclass->bnorm("0x1000001"); ok 384 - is a valid object ok 385 - $x = Math::BigInt::Subclass->bnorm("0x2000001"); ok 386 - is a valid object ok 387 - $x = Math::BigInt::Subclass->bnorm("0x4000001"); ok 388 - is a valid object ok 389 - $x = Math::BigInt::Subclass->bnorm("0x8000001"); ok 390 - is a valid object ok 391 - $x = Math::BigInt::Subclass->bnorm("0x10000001"); ok 392 - is a valid object ok 393 - $x = Math::BigInt::Subclass->bnorm("0x20000001"); ok 394 - is a valid object ok 395 - $x = Math::BigInt::Subclass->bnorm("0x40000001"); ok 396 - is a valid object ok 397 - $x = Math::BigInt::Subclass->bnorm("0x80000001"); ok 398 - is a valid object ok 399 - $x = Math::BigInt::Subclass->bnorm("0x100000001"); ok 400 - is a valid object ok 401 - $x = Math::BigInt::Subclass->bnorm("0x200000001"); ok 402 - is a valid object ok 403 - $x = Math::BigInt::Subclass->bnorm("0x400000001"); ok 404 - is a valid object ok 405 - $x = Math::BigInt::Subclass->bnorm("0x800000001"); ok 406 - is a valid object ok 407 - $x = Math::BigInt::Subclass->bnorm("0x2dd59e18a125dbed30a6ab1d93e9c855569f44f75806f0645dc9a2e98b808c3"); ok 408 - is a valid object ok 409 - $x = Math::BigInt::Subclass->bnorm("inf"); ok 410 - is a valid object ok 411 - $x = Math::BigInt::Subclass->bnorm("+inf"); ok 412 - is a valid object ok 413 - $x = Math::BigInt::Subclass->bnorm("-inf"); ok 414 - is a valid object ok 415 - $x = Math::BigInt::Subclass->bnorm("0inf"); ok 416 - is a valid object ok 417 - $x = Math::BigInt::Subclass->bnorm(""); ok 418 - is a valid object ok 419 - $x = Math::BigInt::Subclass->bnorm("abc"); ok 420 - is a valid object ok 421 - $x = Math::BigInt::Subclass->bnorm(" 1 a"); ok 422 - is a valid object ok 423 - $x = Math::BigInt::Subclass->bnorm("1bcd2"); ok 424 - is a valid object ok 425 - $x = Math::BigInt::Subclass->bnorm("11111b"); ok 426 - is a valid object ok 427 - $x = Math::BigInt::Subclass->bnorm("+1z"); ok 428 - is a valid object ok 429 - $x = Math::BigInt::Subclass->bnorm("-1z"); ok 430 - is a valid object ok 431 - $x = Math::BigInt::Subclass->bnorm("_123"); ok 432 - is a valid object ok 433 - $x = Math::BigInt::Subclass->bnorm("_123_"); ok 434 - is a valid object ok 435 - $x = Math::BigInt::Subclass->bnorm("123_"); ok 436 - is a valid object ok 437 - $x = Math::BigInt::Subclass->bnorm("1__23"); ok 438 - is a valid object ok 439 - $x = Math::BigInt::Subclass->bnorm("1E1__2"); ok 440 - is a valid object ok 441 - $x = Math::BigInt::Subclass->bnorm("1_E12"); ok 442 - is a valid object ok 443 - $x = Math::BigInt::Subclass->bnorm("1E_12"); ok 444 - is a valid object ok 445 - $x = Math::BigInt::Subclass->bnorm("1_E_12"); ok 446 - is a valid object ok 447 - $x = Math::BigInt::Subclass->bnorm("+_1E12"); ok 448 - is a valid object ok 449 - $x = Math::BigInt::Subclass->bnorm("+0_1E2"); ok 450 - is a valid object ok 451 - $x = Math::BigInt::Subclass->bnorm("+0_0_1E2"); ok 452 - is a valid object ok 453 - $x = Math::BigInt::Subclass->bnorm("-0_0_1E2"); ok 454 - is a valid object ok 455 - $x = Math::BigInt::Subclass->bnorm("-0_0_1E+0_0_2"); ok 456 - is a valid object ok 457 - $x = Math::BigInt::Subclass->bnorm("E1"); ok 458 - is a valid object ok 459 - $x = Math::BigInt::Subclass->bnorm("E23"); ok 460 - is a valid object ok 461 - $x = Math::BigInt::Subclass->bnorm("1.23E1"); ok 462 - is a valid object ok 463 - $x = Math::BigInt::Subclass->bnorm("1.23E-1"); ok 464 - is a valid object ok 465 - $x = Math::BigInt::Subclass->bnorm("1e2e3"); ok 466 - is a valid object ok 467 - $x = Math::BigInt::Subclass->bnorm("1e2r"); ok 468 - is a valid object ok 469 - $x = Math::BigInt::Subclass->bnorm("1e2.0"); ok 470 - is a valid object ok 471 - $x = Math::BigInt::Subclass->bnorm("1.2.2"); ok 472 - is a valid object ok 473 - $x = Math::BigInt::Subclass->bnorm("1.2.3e1"); ok 474 - is a valid object ok 475 - $x = Math::BigInt::Subclass->bnorm("-1.2.3"); ok 476 - is a valid object ok 477 - $x = Math::BigInt::Subclass->bnorm("-1.2.3e-4"); ok 478 - is a valid object ok 479 - $x = Math::BigInt::Subclass->bnorm("1.2e3.4"); ok 480 - is a valid object ok 481 - $x = Math::BigInt::Subclass->bnorm("1.2e-3.4"); ok 482 - is a valid object ok 483 - $x = Math::BigInt::Subclass->bnorm("1.2.3.4"); ok 484 - is a valid object ok 485 - $x = Math::BigInt::Subclass->bnorm("1.2.t"); ok 486 - is a valid object ok 487 - $x = Math::BigInt::Subclass->bnorm("1..2"); ok 488 - is a valid object ok 489 - $x = Math::BigInt::Subclass->bnorm("1..2e1"); ok 490 - is a valid object ok 491 - $x = Math::BigInt::Subclass->bnorm("1..2e1..1"); ok 492 - is a valid object ok 493 - $x = Math::BigInt::Subclass->bnorm("12e1..1"); ok 494 - is a valid object ok 495 - $x = Math::BigInt::Subclass->bnorm("..2"); ok 496 - is a valid object ok 497 - $x = Math::BigInt::Subclass->bnorm(".-2"); ok 498 - is a valid object ok 499 - $x = Math::BigInt::Subclass->bnorm("012"); ok 500 - is a valid object ok 501 - $x = Math::BigInt::Subclass->bnorm("0123"); ok 502 - is a valid object ok 503 - $x = Math::BigInt::Subclass->bnorm("01234"); ok 504 - is a valid object ok 505 - $x = Math::BigInt::Subclass->bnorm("012345"); ok 506 - is a valid object ok 507 - $x = Math::BigInt::Subclass->bnorm("0123456"); ok 508 - is a valid object ok 509 - $x = Math::BigInt::Subclass->bnorm("01234567"); ok 510 - is a valid object ok 511 - $x = Math::BigInt::Subclass->bnorm("012345678"); ok 512 - is a valid object ok 513 - $x = Math::BigInt::Subclass->bnorm("0123456789"); ok 514 - is a valid object ok 515 - $x = Math::BigInt::Subclass->bnorm("01234567891"); ok 516 - is a valid object ok 517 - $x = Math::BigInt::Subclass->bnorm("012345678912"); ok 518 - is a valid object ok 519 - $x = Math::BigInt::Subclass->bnorm("0123456789123"); ok 520 - is a valid object ok 521 - $x = Math::BigInt::Subclass->bnorm("01234567891234"); ok 522 - is a valid object ok 523 - $x = Math::BigInt::Subclass->bnorm("0e0"); ok 524 - is a valid object ok 525 - $x = Math::BigInt::Subclass->bnorm("+0e0"); ok 526 - is a valid object ok 527 - $x = Math::BigInt::Subclass->bnorm("+0e+0"); ok 528 - is a valid object ok 529 - $x = Math::BigInt::Subclass->bnorm("-0e+0"); ok 530 - is a valid object ok 531 - $x = Math::BigInt::Subclass->bnorm("0e-0"); ok 532 - is a valid object ok 533 - $x = Math::BigInt::Subclass->bnorm("-0e-0"); ok 534 - is a valid object ok 535 - $x = Math::BigInt::Subclass->bnorm("+0e-0"); ok 536 - is a valid object ok 537 - $x = Math::BigInt::Subclass->bnorm("000"); ok 538 - is a valid object ok 539 - $x = Math::BigInt::Subclass->bnorm("00e2"); ok 540 - is a valid object ok 541 - $x = Math::BigInt::Subclass->bnorm("00e02"); ok 542 - is a valid object ok 543 - $x = Math::BigInt::Subclass->bnorm("000e002"); ok 544 - is a valid object ok 545 - $x = Math::BigInt::Subclass->bnorm("000e1230"); ok 546 - is a valid object ok 547 - $x = Math::BigInt::Subclass->bnorm("00e-3"); ok 548 - is a valid object ok 549 - $x = Math::BigInt::Subclass->bnorm("00e+3"); ok 550 - is a valid object ok 551 - $x = Math::BigInt::Subclass->bnorm("00e-03"); ok 552 - is a valid object ok 553 - $x = Math::BigInt::Subclass->bnorm("00e+03"); ok 554 - is a valid object ok 555 - $x = Math::BigInt::Subclass->bnorm("-000"); ok 556 - is a valid object ok 557 - $x = Math::BigInt::Subclass->bnorm("-00e2"); ok 558 - is a valid object ok 559 - $x = Math::BigInt::Subclass->bnorm("-00e02"); ok 560 - is a valid object ok 561 - $x = Math::BigInt::Subclass->bnorm("-000e002"); ok 562 - is a valid object ok 563 - $x = Math::BigInt::Subclass->bnorm("-000e1230"); ok 564 - is a valid object ok 565 - $x = Math::BigInt::Subclass->bnorm("-00e-3"); ok 566 - is a valid object ok 567 - $x = Math::BigInt::Subclass->bnorm("-00e+3"); ok 568 - is a valid object ok 569 - $x = Math::BigInt::Subclass->bnorm("-00e-03"); ok 570 - is a valid object ok 571 - $x = Math::BigInt::Subclass->bnorm("-00e+03"); ok 572 - is a valid object ok 573 - $x = Math::BigInt::Subclass->bnorm("0"); ok 574 - is a valid object ok 575 - $x = Math::BigInt::Subclass->bnorm("+0"); ok 576 - is a valid object ok 577 - $x = Math::BigInt::Subclass->bnorm("+00"); ok 578 - is a valid object ok 579 - $x = Math::BigInt::Subclass->bnorm("+000"); ok 580 - is a valid object ok 581 - $x = Math::BigInt::Subclass->bnorm("000000000000000000"); ok 582 - is a valid object ok 583 - $x = Math::BigInt::Subclass->bnorm("-0"); ok 584 - is a valid object ok 585 - $x = Math::BigInt::Subclass->bnorm("-0000"); ok 586 - is a valid object ok 587 - $x = Math::BigInt::Subclass->bnorm("+1"); ok 588 - is a valid object ok 589 - $x = Math::BigInt::Subclass->bnorm("+01"); ok 590 - is a valid object ok 591 - $x = Math::BigInt::Subclass->bnorm("+001"); ok 592 - is a valid object ok 593 - $x = Math::BigInt::Subclass->bnorm("+00000100000"); ok 594 - is a valid object ok 595 - $x = Math::BigInt::Subclass->bnorm("123456789"); ok 596 - is a valid object ok 597 - $x = Math::BigInt::Subclass->bnorm("-1"); ok 598 - is a valid object ok 599 - $x = Math::BigInt::Subclass->bnorm("-01"); ok 600 - is a valid object ok 601 - $x = Math::BigInt::Subclass->bnorm("-001"); ok 602 - is a valid object ok 603 - $x = Math::BigInt::Subclass->bnorm("-123456789"); ok 604 - is a valid object ok 605 - $x = Math::BigInt::Subclass->bnorm("-00000100000"); ok 606 - is a valid object ok 607 - $x = Math::BigInt::Subclass->bnorm("1_2_3"); ok 608 - is a valid object ok 609 - $x = Math::BigInt::Subclass->bnorm("10000000000E-1_0"); ok 610 - is a valid object ok 611 - $x = Math::BigInt::Subclass->bnorm("1E2"); ok 612 - is a valid object ok 613 - $x = Math::BigInt::Subclass->bnorm("1E1"); ok 614 - is a valid object ok 615 - $x = Math::BigInt::Subclass->bnorm("1E0"); ok 616 - is a valid object ok 617 - $x = Math::BigInt::Subclass->bnorm("1.23E2"); ok 618 - is a valid object ok 619 - $x = Math::BigInt::Subclass->bnorm("100E-1"); ok 620 - is a valid object ok 621 - $x = Math::BigInt::Subclass->bnorm("1.E3"); ok 622 - is a valid object ok 623 - $x = Math::BigInt::Subclass->bnorm("1.01E2"); ok 624 - is a valid object ok 625 - $x = Math::BigInt::Subclass->bnorm("1010E-1"); ok 626 - is a valid object ok 627 - $x = Math::BigInt::Subclass->bnorm("-1010E0"); ok 628 - is a valid object ok 629 - $x = Math::BigInt::Subclass->bnorm("-1010E1"); ok 630 - is a valid object ok 631 - $x = Math::BigInt::Subclass->bnorm("1234.00"); ok 632 - is a valid object ok 633 - $x = Math::BigInt::Subclass->bnorm("-1010E-2"); ok 634 - is a valid object ok 635 - $x = Math::BigInt::Subclass->bnorm("-1.01E+1"); ok 636 - is a valid object ok 637 - $x = Math::BigInt::Subclass->bnorm("-1.01E-1"); ok 638 - is a valid object ok 639 - $x = Math::BigInt::Subclass->bnorm("1E-999999"); ok 640 - is a valid object ok 641 - $x = Math::BigInt::Subclass->bnorm("0.5"); ok 642 - is a valid object ok 643 - $x = Math::BigInt::Subclass->new("1"); $x->bnan(); ok 644 - is a valid object ok 645 - $x = Math::BigInt::Subclass->new("2"); $x->bnan(); ok 646 - is a valid object ok 647 - $x = Math::BigInt::Subclass->new("abc"); $x->bnan(); ok 648 - is a valid object ok 649 - $x = Math::BigInt::Subclass->new("2"); $x->bone("+"); ok 650 - is a valid object ok 651 - $x = Math::BigInt::Subclass->new("2"); $x->bone("-"); ok 652 - is a valid object ok 653 - $x = Math::BigInt::Subclass->new("boneNaN"); $x->bone("-"); ok 654 - is a valid object ok 655 - $x = Math::BigInt::Subclass->new("boneNaN"); $x->bone("+"); ok 656 - is a valid object ok 657 - $x = Math::BigInt::Subclass->new("2"); $x->bone("abc"); ok 658 - is a valid object ok 659 - $x = Math::BigInt::Subclass->new("3"); $x->bone(""); ok 660 - is a valid object ok 661 - $x = Math::BigInt::Subclass->new("1"); $x->binf("+"); ok 662 - is a valid object ok 663 - $x = Math::BigInt::Subclass->new("2"); $x->binf("-"); ok 664 - is a valid object ok 665 - $x = Math::BigInt::Subclass->new("3"); $x->binf("abc"); ok 666 - is a valid object ok 667 - $x = Math::BigInt::Subclass->new("123"); $x->is_nan() || 0; ok 668 - $x = Math::BigInt::Subclass->new("abc"); $x->is_nan() || 0; ok 669 - $x = Math::BigInt::Subclass->new("NaN"); $x->is_nan() || 0; ok 670 - $x = Math::BigInt::Subclass->new("-123"); $x->is_nan() || 0; ok 671 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf(""); ok 672 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf(""); ok 673 - $x = Math::BigInt::Subclass->new("abc"); $x->is_inf(""); ok 674 - $x = Math::BigInt::Subclass->new("1"); $x->is_inf(""); ok 675 - $x = Math::BigInt::Subclass->new("NaN"); $x->is_inf(""); ok 676 - $x = Math::BigInt::Subclass->new("-1"); $x->is_inf(""); ok 677 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf("-"); ok 678 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf("+"); ok 679 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf("-"); ok 680 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf("+"); ok 681 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf("-inf"); ok 682 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf("+inf"); ok 683 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf("-inf"); ok 684 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf("+inf"); ok 685 - $x = Math::BigInt::Subclass->new("+iNfInItY"); $x->is_inf(""); ok 686 - $x = Math::BigInt::Subclass->new("-InFiNiTy"); $x->is_inf(""); ok 687 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x << $y; ok 688 - is a valid object ok 689 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("+2"); $x << $y; ok 690 - is a valid object ok 691 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+32"); $x << $y; ok 692 - is a valid object ok 693 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+48"); $x << $y; ok 694 - is a valid object ok 695 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("-2"); $x << $y; ok 696 - is a valid object ok 697 - $x = Math::BigInt::Subclass->new("+12345"); $y = Math::BigInt::Subclass->new("4"); $x->blsft($y, 10); ok 698 - is a valid object ok 699 - $x = Math::BigInt::Subclass->new("-1234"); $y = Math::BigInt::Subclass->new("0"); $x->blsft($y, 10); ok 700 - is a valid object ok 701 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("0"); $x->blsft($y, 10); ok 702 - is a valid object ok 703 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("2"); $x->blsft($y, 10); ok 704 - is a valid object ok 705 - $x = Math::BigInt::Subclass->new("+12"); $y = Math::BigInt::Subclass->new("2"); $x->blsft($y, 10); ok 706 - is a valid object ok 707 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("-3"); $x->blsft($y, 10); ok 708 - is a valid object ok 709 - $x = Math::BigInt::Subclass->new("1234567890123"); $y = Math::BigInt::Subclass->new("12"); $x->blsft($y, 10); ok 710 - is a valid object ok 711 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("1"); $x->blsft($y, 2); ok 712 - is a valid object ok 713 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("1"); $x->blsft($y, 2); ok 714 - is a valid object ok 715 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $x->blsft($y, 2); ok 716 - is a valid object ok 717 - $x = Math::BigInt::Subclass->new("-102533203"); $y = Math::BigInt::Subclass->new("1"); $x->blsft($y, 2); ok 718 - is a valid object ok 719 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x >> $y; ok 720 - is a valid object ok 721 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("+2"); $x >> $y; ok 722 - is a valid object ok 723 - $x = Math::BigInt::Subclass->new("+4294967296"); $y = Math::BigInt::Subclass->new("+32"); $x >> $y; ok 724 - is a valid object ok 725 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("+48"); $x >> $y; ok 726 - is a valid object ok 727 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("-2"); $x >> $y; ok 728 - is a valid object ok 729 - $x = Math::BigInt::Subclass->new("-1234"); $y = Math::BigInt::Subclass->new("0"); $x->brsft($y, 10); ok 730 - is a valid object ok 731 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("0"); $x->brsft($y, 10); ok 732 - is a valid object ok 733 - $x = Math::BigInt::Subclass->new("+200"); $y = Math::BigInt::Subclass->new("2"); $x->brsft($y, 10); ok 734 - is a valid object ok 735 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("3"); $x->brsft($y, 10); ok 736 - is a valid object ok 737 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("2"); $x->brsft($y, 10); ok 738 - is a valid object ok 739 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("-3"); $x->brsft($y, 10); ok 740 - is a valid object ok 741 - $x = Math::BigInt::Subclass->new("310000"); $y = Math::BigInt::Subclass->new("4"); $x->brsft($y, 10); ok 742 - is a valid object ok 743 - $x = Math::BigInt::Subclass->new("12300000"); $y = Math::BigInt::Subclass->new("5"); $x->brsft($y, 10); ok 744 - is a valid object ok 745 - $x = Math::BigInt::Subclass->new("1230000000000"); $y = Math::BigInt::Subclass->new("10"); $x->brsft($y, 10); ok 746 - is a valid object ok 747 - $x = Math::BigInt::Subclass->new("09876123456789067890"); $y = Math::BigInt::Subclass->new("12"); $x->brsft($y, 10); ok 748 - is a valid object ok 749 - $x = Math::BigInt::Subclass->new("1234561234567890123"); $y = Math::BigInt::Subclass->new("13"); $x->brsft($y, 10); ok 750 - is a valid object ok 751 - $x = Math::BigInt::Subclass->new("820265627"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 752 - is a valid object ok 753 - $x = Math::BigInt::Subclass->new("-15"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 754 - is a valid object ok 755 - $x = Math::BigInt::Subclass->new("-14"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 756 - is a valid object ok 757 - $x = Math::BigInt::Subclass->new("-13"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 758 - is a valid object ok 759 - $x = Math::BigInt::Subclass->new("-12"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 760 - is a valid object ok 761 - $x = Math::BigInt::Subclass->new("-11"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 762 - is a valid object ok 763 - $x = Math::BigInt::Subclass->new("-10"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 764 - is a valid object ok 765 - $x = Math::BigInt::Subclass->new("-9"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 766 - is a valid object ok 767 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 768 - is a valid object ok 769 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 770 - is a valid object ok 771 - $x = Math::BigInt::Subclass->new("-6"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 772 - is a valid object ok 773 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 774 - is a valid object ok 775 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 776 - is a valid object ok 777 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 778 - is a valid object ok 779 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 780 - is a valid object ok 781 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 782 - is a valid object ok 783 - $x = Math::BigInt::Subclass->new("-1640531254"); $y = Math::BigInt::Subclass->new("2"); $x->brsft($y, 2); ok 784 - is a valid object ok 785 - $x = Math::BigInt::Subclass->new("-1640531254"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 786 - is a valid object ok 787 - $x = Math::BigInt::Subclass->new("-820265627"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 788 - is a valid object ok 789 - $x = Math::BigInt::Subclass->new("-205066405"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 790 - is a valid object ok 791 - $x = Math::BigInt::Subclass->new("+inf"); $x->bsstr(); ok 792 - $x = Math::BigInt::Subclass->new("-inf"); $x->bsstr(); ok 793 - $x = Math::BigInt::Subclass->new("1e+34"); $x->bsstr(); ok 794 - $x = Math::BigInt::Subclass->new("123.456E3"); $x->bsstr(); ok 795 - $x = Math::BigInt::Subclass->new("100"); $x->bsstr(); ok 796 - $x = Math::BigInt::Subclass->new("bsstrabc"); $x->bsstr(); ok 797 - $x = Math::BigInt::Subclass->new("-5"); $x->bsstr(); ok 798 - $x = Math::BigInt::Subclass->new("-100"); $x->bsstr(); ok 799 - $x = Math::BigInt::Subclass->new("5"); $x->numify(); ok 800 - $x = Math::BigInt::Subclass->new("-5"); $x->numify(); ok 801 - $x = Math::BigInt::Subclass->new("100"); $x->numify(); ok 802 - $x = Math::BigInt::Subclass->new("-100"); $x->numify(); ok 803 - $x = Math::BigInt::Subclass->new("bnegNaN"); $x->bneg(); ok 804 - is a valid object ok 805 - $x = Math::BigInt::Subclass->new("+inf"); $x->bneg(); ok 806 - is a valid object ok 807 - $x = Math::BigInt::Subclass->new("-inf"); $x->bneg(); ok 808 - is a valid object ok 809 - $x = Math::BigInt::Subclass->new("abd"); $x->bneg(); ok 810 - is a valid object ok 811 - $x = Math::BigInt::Subclass->new("0"); $x->bneg(); ok 812 - is a valid object ok 813 - $x = Math::BigInt::Subclass->new("1"); $x->bneg(); ok 814 - is a valid object ok 815 - $x = Math::BigInt::Subclass->new("-1"); $x->bneg(); ok 816 - is a valid object ok 817 - $x = Math::BigInt::Subclass->new("+123456789"); $x->bneg(); ok 818 - is a valid object ok 819 - $x = Math::BigInt::Subclass->new("-123456789"); $x->bneg(); ok 820 - is a valid object ok 821 - $x = Math::BigInt::Subclass->new("babsNaN"); $x->babs(); ok 822 - is a valid object ok 823 - $x = Math::BigInt::Subclass->new("+inf"); $x->babs(); ok 824 - is a valid object ok 825 - $x = Math::BigInt::Subclass->new("-inf"); $x->babs(); ok 826 - is a valid object ok 827 - $x = Math::BigInt::Subclass->new("0"); $x->babs(); ok 828 - is a valid object ok 829 - $x = Math::BigInt::Subclass->new("1"); $x->babs(); ok 830 - is a valid object ok 831 - $x = Math::BigInt::Subclass->new("-1"); $x->babs(); ok 832 - is a valid object ok 833 - $x = Math::BigInt::Subclass->new("+123456789"); $x->babs(); ok 834 - is a valid object ok 835 - $x = Math::BigInt::Subclass->new("-123456789"); $x->babs(); ok 836 - is a valid object ok 837 - $x = Math::BigInt::Subclass->new("NaN"); $x->bsgn(); ok 838 - is a valid object ok 839 - $x = Math::BigInt::Subclass->new("+inf"); $x->bsgn(); ok 840 - is a valid object ok 841 - $x = Math::BigInt::Subclass->new("-inf"); $x->bsgn(); ok 842 - is a valid object ok 843 - $x = Math::BigInt::Subclass->new("0"); $x->bsgn(); ok 844 - is a valid object ok 845 - $x = Math::BigInt::Subclass->new("+123456789"); $x->bsgn(); ok 846 - is a valid object ok 847 - $x = Math::BigInt::Subclass->new("-123456789"); $x->bsgn(); ok 848 - is a valid object ok 849 - $x = Math::BigInt::Subclass->new("bcmpNaN"); $y = Math::BigInt::Subclass->new("bcmpNaN"); $x->bcmp($y); ok 850 - $x = Math::BigInt::Subclass->new("bcmpNaN"); $y = Math::BigInt::Subclass->new("0"); $x->bcmp($y); ok 851 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("bcmpNaN"); $x->bcmp($y); ok 852 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->bcmp($y); ok 853 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x->bcmp($y); ok 854 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x->bcmp($y); ok 855 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x->bcmp($y); ok 856 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->bcmp($y); ok 857 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->bcmp($y); ok 858 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x->bcmp($y); ok 859 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x->bcmp($y); ok 860 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->bcmp($y); ok 861 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("123"); $x->bcmp($y); ok 862 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("12"); $x->bcmp($y); ok 863 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("123"); $x->bcmp($y); ok 864 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("-123"); $x->bcmp($y); ok 865 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("-12"); $x->bcmp($y); ok 866 - $x = Math::BigInt::Subclass->new("-12"); $y = Math::BigInt::Subclass->new("-123"); $x->bcmp($y); ok 867 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("124"); $x->bcmp($y); ok 868 - $x = Math::BigInt::Subclass->new("124"); $y = Math::BigInt::Subclass->new("123"); $x->bcmp($y); ok 869 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("-124"); $x->bcmp($y); ok 870 - $x = Math::BigInt::Subclass->new("-124"); $y = Math::BigInt::Subclass->new("-123"); $x->bcmp($y); ok 871 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("5"); $x->bcmp($y); ok 872 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("987654321"); $x->bcmp($y); ok 873 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x->bcmp($y); ok 874 - $x = Math::BigInt::Subclass->new("-987654321"); $y = Math::BigInt::Subclass->new("123456789"); $x->bcmp($y); ok 875 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5432112345"); $x->bcmp($y); ok 876 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("5432112345"); $x->bcmp($y); ok 877 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5432112345"); $x->bcmp($y); ok 878 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-5432112345"); $x->bcmp($y); ok 879 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bcmp($y); ok 880 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 881 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 882 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bcmp($y); ok 883 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x->bcmp($y); ok 884 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x->bcmp($y); ok 885 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 886 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 887 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->bcmp($y); ok 888 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x->bcmp($y); ok 889 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->bcmp($y); ok 890 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 891 - $x = Math::BigInt::Subclass->new("abc"); $x->binc(); ok 892 - is a valid object ok 893 - $x = Math::BigInt::Subclass->new("+inf"); $x->binc(); ok 894 - is a valid object ok 895 - $x = Math::BigInt::Subclass->new("-inf"); $x->binc(); ok 896 - is a valid object ok 897 - $x = Math::BigInt::Subclass->new("+0"); $x->binc(); ok 898 - is a valid object ok 899 - $x = Math::BigInt::Subclass->new("+1"); $x->binc(); ok 900 - is a valid object ok 901 - $x = Math::BigInt::Subclass->new("-1"); $x->binc(); ok 902 - is a valid object ok 903 - $x = Math::BigInt::Subclass->new("abc"); $x->bdec(); ok 904 - is a valid object ok 905 - $x = Math::BigInt::Subclass->new("+inf"); $x->bdec(); ok 906 - is a valid object ok 907 - $x = Math::BigInt::Subclass->new("-inf"); $x->bdec(); ok 908 - is a valid object ok 909 - $x = Math::BigInt::Subclass->new("+0"); $x->bdec(); ok 910 - is a valid object ok 911 - $x = Math::BigInt::Subclass->new("+1"); $x->bdec(); ok 912 - is a valid object ok 913 - $x = Math::BigInt::Subclass->new("-1"); $x->bdec(); ok 914 - is a valid object ok 915 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x + $y; ok 916 - is a valid object ok 917 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("0"); $x + $y; ok 918 - is a valid object ok 919 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); $x + $y; ok 920 - is a valid object ok 921 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x + $y; ok 922 - is a valid object ok 923 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x + $y; ok 924 - is a valid object ok 925 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x + $y; ok 926 - is a valid object ok 927 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x + $y; ok 928 - is a valid object ok 929 - $x = Math::BigInt::Subclass->new("baddNaN"); $y = Math::BigInt::Subclass->new("+inf"); $x + $y; ok 930 - is a valid object ok 931 - $x = Math::BigInt::Subclass->new("baddNaN"); $y = Math::BigInt::Subclass->new("+inf"); $x + $y; ok 932 - is a valid object ok 933 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("baddNaN"); $x + $y; ok 934 - is a valid object ok 935 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("baddNaN"); $x + $y; ok 936 - is a valid object ok 937 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x + $y; ok 938 - is a valid object ok 939 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x + $y; ok 940 - is a valid object ok 941 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x + $y; ok 942 - is a valid object ok 943 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x + $y; ok 944 - is a valid object ok 945 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x + $y; ok 946 - is a valid object ok 947 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 948 - is a valid object ok 949 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 950 - is a valid object ok 951 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 952 - is a valid object ok 953 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 954 - is a valid object ok 955 - $x = Math::BigInt::Subclass->new("+9"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 956 - is a valid object ok 957 - $x = Math::BigInt::Subclass->new("+99"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 958 - is a valid object ok 959 - $x = Math::BigInt::Subclass->new("+999"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 960 - is a valid object ok 961 - $x = Math::BigInt::Subclass->new("+9999"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 962 - is a valid object ok 963 - $x = Math::BigInt::Subclass->new("+99999"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 964 - is a valid object ok 965 - $x = Math::BigInt::Subclass->new("+999999"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 966 - is a valid object ok 967 - $x = Math::BigInt::Subclass->new("+9999999"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 968 - is a valid object ok 969 - $x = Math::BigInt::Subclass->new("+99999999"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 970 - is a valid object ok 971 - $x = Math::BigInt::Subclass->new("+999999999"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 972 - is a valid object ok 973 - $x = Math::BigInt::Subclass->new("+9999999999"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 974 - is a valid object ok 975 - $x = Math::BigInt::Subclass->new("+99999999999"); $y = Math::BigInt::Subclass->new("+1"); $x + $y; ok 976 - is a valid object ok 977 - $x = Math::BigInt::Subclass->new("+10"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 978 - is a valid object ok 979 - $x = Math::BigInt::Subclass->new("+100"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 980 - is a valid object ok 981 - $x = Math::BigInt::Subclass->new("+1000"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 982 - is a valid object ok 983 - $x = Math::BigInt::Subclass->new("+10000"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 984 - is a valid object ok 985 - $x = Math::BigInt::Subclass->new("+100000"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 986 - is a valid object ok 987 - $x = Math::BigInt::Subclass->new("+1000000"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 988 - is a valid object ok 989 - $x = Math::BigInt::Subclass->new("+10000000"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 990 - is a valid object ok 991 - $x = Math::BigInt::Subclass->new("+100000000"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 992 - is a valid object ok 993 - $x = Math::BigInt::Subclass->new("+1000000000"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 994 - is a valid object ok 995 - $x = Math::BigInt::Subclass->new("+10000000000"); $y = Math::BigInt::Subclass->new("-1"); $x + $y; ok 996 - is a valid object ok 997 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("987654321"); $x + $y; ok 998 - is a valid object ok 999 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("987654321"); $x + $y; ok 1000 - is a valid object ok 1001 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x + $y; ok 1002 - is a valid object ok 1003 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x + $y; ok 1004 - is a valid object ok 1005 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("10001"); $x + $y; ok 1006 - is a valid object ok 1007 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("100001"); $x + $y; ok 1008 - is a valid object ok 1009 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1000001"); $x + $y; ok 1010 - is a valid object ok 1011 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("10000001"); $x + $y; ok 1012 - is a valid object ok 1013 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("100000001"); $x + $y; ok 1014 - is a valid object ok 1015 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1000000001"); $x + $y; ok 1016 - is a valid object ok 1017 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("10000000001"); $x + $y; ok 1018 - is a valid object ok 1019 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("100000000001"); $x + $y; ok 1020 - is a valid object ok 1021 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1000000000001"); $x + $y; ok 1022 - is a valid object ok 1023 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("10000000000001"); $x + $y; ok 1024 - is a valid object ok 1025 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-10001"); $x + $y; ok 1026 - is a valid object ok 1027 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-100001"); $x + $y; ok 1028 - is a valid object ok 1029 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1000001"); $x + $y; ok 1030 - is a valid object ok 1031 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-10000001"); $x + $y; ok 1032 - is a valid object ok 1033 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-100000001"); $x + $y; ok 1034 - is a valid object ok 1035 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1000000001"); $x + $y; ok 1036 - is a valid object ok 1037 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-10000000001"); $x + $y; ok 1038 - is a valid object ok 1039 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-100000000001"); $x + $y; ok 1040 - is a valid object ok 1041 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1000000000001"); $x + $y; ok 1042 - is a valid object ok 1043 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-10000000000001"); $x + $y; ok 1044 - is a valid object ok 1045 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x - $y; ok 1046 - is a valid object ok 1047 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); $x - $y; ok 1048 - is a valid object ok 1049 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); $x - $y; ok 1050 - is a valid object ok 1051 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x - $y; ok 1052 - is a valid object ok 1053 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x - $y; ok 1054 - is a valid object ok 1055 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x - $y; ok 1056 - is a valid object ok 1057 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x - $y; ok 1058 - is a valid object ok 1059 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); $x - $y; ok 1060 - is a valid object ok 1061 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); $x - $y; ok 1062 - is a valid object ok 1063 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1064 - is a valid object ok 1065 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1066 - is a valid object ok 1067 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+0"); $x - $y; ok 1068 - is a valid object ok 1069 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1070 - is a valid object ok 1071 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1072 - is a valid object ok 1073 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1074 - is a valid object ok 1075 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1076 - is a valid object ok 1077 - $x = Math::BigInt::Subclass->new("+9"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1078 - is a valid object ok 1079 - $x = Math::BigInt::Subclass->new("+99"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1080 - is a valid object ok 1081 - $x = Math::BigInt::Subclass->new("+999"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1082 - is a valid object ok 1083 - $x = Math::BigInt::Subclass->new("+9999"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1084 - is a valid object ok 1085 - $x = Math::BigInt::Subclass->new("+99999"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1086 - is a valid object ok 1087 - $x = Math::BigInt::Subclass->new("+999999"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1088 - is a valid object ok 1089 - $x = Math::BigInt::Subclass->new("+9999999"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1090 - is a valid object ok 1091 - $x = Math::BigInt::Subclass->new("+99999999"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1092 - is a valid object ok 1093 - $x = Math::BigInt::Subclass->new("+999999999"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1094 - is a valid object ok 1095 - $x = Math::BigInt::Subclass->new("+9999999999"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1096 - is a valid object ok 1097 - $x = Math::BigInt::Subclass->new("+99999999999"); $y = Math::BigInt::Subclass->new("+1"); $x - $y; ok 1098 - is a valid object ok 1099 - $x = Math::BigInt::Subclass->new("+10"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1100 - is a valid object ok 1101 - $x = Math::BigInt::Subclass->new("+100"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1102 - is a valid object ok 1103 - $x = Math::BigInt::Subclass->new("+1000"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1104 - is a valid object ok 1105 - $x = Math::BigInt::Subclass->new("+10000"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1106 - is a valid object ok 1107 - $x = Math::BigInt::Subclass->new("+100000"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1108 - is a valid object ok 1109 - $x = Math::BigInt::Subclass->new("+1000000"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1110 - is a valid object ok 1111 - $x = Math::BigInt::Subclass->new("+10000000"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1112 - is a valid object ok 1113 - $x = Math::BigInt::Subclass->new("+100000000"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1114 - is a valid object ok 1115 - $x = Math::BigInt::Subclass->new("+1000000000"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1116 - is a valid object ok 1117 - $x = Math::BigInt::Subclass->new("+10000000000"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1118 - is a valid object ok 1119 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("+987654321"); $x - $y; ok 1120 - is a valid object ok 1121 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("+987654321"); $x - $y; ok 1122 - is a valid object ok 1123 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x - $y; ok 1124 - is a valid object ok 1125 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x - $y; ok 1126 - is a valid object ok 1127 - $x = Math::BigInt::Subclass->new("10001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1128 - is a valid object ok 1129 - $x = Math::BigInt::Subclass->new("100001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1130 - is a valid object ok 1131 - $x = Math::BigInt::Subclass->new("1000001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1132 - is a valid object ok 1133 - $x = Math::BigInt::Subclass->new("10000001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1134 - is a valid object ok 1135 - $x = Math::BigInt::Subclass->new("100000001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1136 - is a valid object ok 1137 - $x = Math::BigInt::Subclass->new("1000000001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1138 - is a valid object ok 1139 - $x = Math::BigInt::Subclass->new("10000000001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1140 - is a valid object ok 1141 - $x = Math::BigInt::Subclass->new("100000000001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1142 - is a valid object ok 1143 - $x = Math::BigInt::Subclass->new("1000000000001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1144 - is a valid object ok 1145 - $x = Math::BigInt::Subclass->new("10000000000001"); $y = Math::BigInt::Subclass->new("1"); $x - $y; ok 1146 - is a valid object ok 1147 - $x = Math::BigInt::Subclass->new("10001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1148 - is a valid object ok 1149 - $x = Math::BigInt::Subclass->new("100001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1150 - is a valid object ok 1151 - $x = Math::BigInt::Subclass->new("1000001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1152 - is a valid object ok 1153 - $x = Math::BigInt::Subclass->new("10000001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1154 - is a valid object ok 1155 - $x = Math::BigInt::Subclass->new("100000001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1156 - is a valid object ok 1157 - $x = Math::BigInt::Subclass->new("1000000001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1158 - is a valid object ok 1159 - $x = Math::BigInt::Subclass->new("10000000001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1160 - is a valid object ok 1161 - $x = Math::BigInt::Subclass->new("100000000001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1162 - is a valid object ok 1163 - $x = Math::BigInt::Subclass->new("1000000000001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1164 - is a valid object ok 1165 - $x = Math::BigInt::Subclass->new("10000000000001"); $y = Math::BigInt::Subclass->new("-1"); $x - $y; ok 1166 - is a valid object ok 1167 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1168 - is a valid object ok 1169 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1170 - is a valid object ok 1171 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1172 - is a valid object ok 1173 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("abc"); $x->bmuladd($y, $z); ok 1174 - is a valid object ok 1175 - $x = Math::BigInt::Subclass->new("NaNmul"); $y = Math::BigInt::Subclass->new("+inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1176 - is a valid object ok 1177 - $x = Math::BigInt::Subclass->new("NaNmul"); $y = Math::BigInt::Subclass->new("-inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1178 - is a valid object ok 1179 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaNmul"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1180 - is a valid object ok 1181 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("NaNmul"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1182 - is a valid object ok 1183 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1184 - is a valid object ok 1185 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1186 - is a valid object ok 1187 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1188 - is a valid object ok 1189 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1190 - is a valid object ok 1191 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1192 - is a valid object ok 1193 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1194 - is a valid object ok 1195 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1196 - is a valid object ok 1197 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1198 - is a valid object ok 1199 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1200 - is a valid object ok 1201 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1202 - is a valid object ok 1203 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("123456789123456789"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1204 - is a valid object ok 1205 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1206 - is a valid object ok 1207 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1208 - is a valid object ok 1209 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1210 - is a valid object ok 1211 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1212 - is a valid object ok 1213 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1214 - is a valid object ok 1215 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("+3"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1216 - is a valid object ok 1217 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("+3"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1218 - is a valid object ok 1219 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("-3"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1220 - is a valid object ok 1221 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1222 - is a valid object ok 1223 - $x = Math::BigInt::Subclass->new("111"); $y = Math::BigInt::Subclass->new("111"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1224 - is a valid object ok 1225 - $x = Math::BigInt::Subclass->new("10101"); $y = Math::BigInt::Subclass->new("10101"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1226 - is a valid object ok 1227 - $x = Math::BigInt::Subclass->new("1001001"); $y = Math::BigInt::Subclass->new("1001001"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1228 - is a valid object ok 1229 - $x = Math::BigInt::Subclass->new("100010001"); $y = Math::BigInt::Subclass->new("100010001"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1230 - is a valid object ok 1231 - $x = Math::BigInt::Subclass->new("10000100001"); $y = Math::BigInt::Subclass->new("10000100001"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1232 - is a valid object ok 1233 - $x = Math::BigInt::Subclass->new("11111111111"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1234 - is a valid object ok 1235 - $x = Math::BigInt::Subclass->new("22222222222"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1236 - is a valid object ok 1237 - $x = Math::BigInt::Subclass->new("33333333333"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1238 - is a valid object ok 1239 - $x = Math::BigInt::Subclass->new("44444444444"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1240 - is a valid object ok 1241 - $x = Math::BigInt::Subclass->new("55555555555"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1242 - is a valid object ok 1243 - $x = Math::BigInt::Subclass->new("66666666666"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1244 - is a valid object ok 1245 - $x = Math::BigInt::Subclass->new("77777777777"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1246 - is a valid object ok 1247 - $x = Math::BigInt::Subclass->new("88888888888"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1248 - is a valid object ok 1249 - $x = Math::BigInt::Subclass->new("99999999999"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1250 - is a valid object ok 1251 - $x = Math::BigInt::Subclass->new("11111111111"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1252 - is a valid object ok 1253 - $x = Math::BigInt::Subclass->new("22222222222"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1254 - is a valid object ok 1255 - $x = Math::BigInt::Subclass->new("33333333333"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1256 - is a valid object ok 1257 - $x = Math::BigInt::Subclass->new("44444444444"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1258 - is a valid object ok 1259 - $x = Math::BigInt::Subclass->new("55555555555"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1260 - is a valid object ok 1261 - $x = Math::BigInt::Subclass->new("66666666666"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1262 - is a valid object ok 1263 - $x = Math::BigInt::Subclass->new("77777777777"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1264 - is a valid object ok 1265 - $x = Math::BigInt::Subclass->new("88888888888"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1266 - is a valid object ok 1267 - $x = Math::BigInt::Subclass->new("99999999999"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1268 - is a valid object ok 1269 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("-4"); $z = Math::BigInt::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1270 - is a valid object ok 1271 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-4"); $z = Math::BigInt::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1272 - is a valid object ok 1273 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1274 - is a valid object ok 1275 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1276 - is a valid object ok 1277 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("5"); $x->bmuladd($y, $z); ok 1278 - is a valid object ok 1279 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-4"); $z = Math::BigInt::Subclass->new("5"); $x->bmuladd($y, $z); ok 1280 - is a valid object ok 1281 - $x = Math::BigInt::Subclass->new("9999999999999999999"); $y = Math::BigInt::Subclass->new("10000000000000000000"); $z = Math::BigInt::Subclass->new("1234567890"); $x->bmuladd($y, $z); ok 1282 - is a valid object ok 1283 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("12345678901234567890"); $x->bmuladd($y, $z); ok 1284 - is a valid object ok 1285 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x * $y; ok 1286 - is a valid object ok 1287 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); $x * $y; ok 1288 - is a valid object ok 1289 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); $x * $y; ok 1290 - is a valid object ok 1291 - $x = Math::BigInt::Subclass->new("NaNmul"); $y = Math::BigInt::Subclass->new("+inf"); $x * $y; ok 1292 - is a valid object ok 1293 - $x = Math::BigInt::Subclass->new("NaNmul"); $y = Math::BigInt::Subclass->new("-inf"); $x * $y; ok 1294 - is a valid object ok 1295 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaNmul"); $x * $y; ok 1296 - is a valid object ok 1297 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("NaNmul"); $x * $y; ok 1298 - is a valid object ok 1299 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x * $y; ok 1300 - is a valid object ok 1301 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x * $y; ok 1302 - is a valid object ok 1303 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x * $y; ok 1304 - is a valid object ok 1305 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x * $y; ok 1306 - is a valid object ok 1307 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); $x * $y; ok 1308 - is a valid object ok 1309 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); $x * $y; ok 1310 - is a valid object ok 1311 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); $x * $y; ok 1312 - is a valid object ok 1313 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("-1"); $x * $y; ok 1314 - is a valid object ok 1315 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+0"); $x * $y; ok 1316 - is a valid object ok 1317 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("0"); $x * $y; ok 1318 - is a valid object ok 1319 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("123456789123456789"); $x * $y; ok 1320 - is a valid object ok 1321 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x * $y; ok 1322 - is a valid object ok 1323 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $x * $y; ok 1324 - is a valid object ok 1325 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $x * $y; ok 1326 - is a valid object ok 1327 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+1"); $x * $y; ok 1328 - is a valid object ok 1329 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("+3"); $x * $y; ok 1330 - is a valid object ok 1331 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("+3"); $x * $y; ok 1332 - is a valid object ok 1333 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("-3"); $x * $y; ok 1334 - is a valid object ok 1335 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x * $y; ok 1336 - is a valid object ok 1337 - $x = Math::BigInt::Subclass->new("111"); $y = Math::BigInt::Subclass->new("111"); $x * $y; ok 1338 - is a valid object ok 1339 - $x = Math::BigInt::Subclass->new("10101"); $y = Math::BigInt::Subclass->new("10101"); $x * $y; ok 1340 - is a valid object ok 1341 - $x = Math::BigInt::Subclass->new("1001001"); $y = Math::BigInt::Subclass->new("1001001"); $x * $y; ok 1342 - is a valid object ok 1343 - $x = Math::BigInt::Subclass->new("100010001"); $y = Math::BigInt::Subclass->new("100010001"); $x * $y; ok 1344 - is a valid object ok 1345 - $x = Math::BigInt::Subclass->new("10000100001"); $y = Math::BigInt::Subclass->new("10000100001"); $x * $y; ok 1346 - is a valid object ok 1347 - $x = Math::BigInt::Subclass->new("11111111111"); $y = Math::BigInt::Subclass->new("9"); $x * $y; ok 1348 - is a valid object ok 1349 - $x = Math::BigInt::Subclass->new("22222222222"); $y = Math::BigInt::Subclass->new("9"); $x * $y; ok 1350 - is a valid object ok 1351 - $x = Math::BigInt::Subclass->new("33333333333"); $y = Math::BigInt::Subclass->new("9"); $x * $y; ok 1352 - is a valid object ok 1353 - $x = Math::BigInt::Subclass->new("44444444444"); $y = Math::BigInt::Subclass->new("9"); $x * $y; ok 1354 - is a valid object ok 1355 - $x = Math::BigInt::Subclass->new("55555555555"); $y = Math::BigInt::Subclass->new("9"); $x * $y; ok 1356 - is a valid object ok 1357 - $x = Math::BigInt::Subclass->new("66666666666"); $y = Math::BigInt::Subclass->new("9"); $x * $y; ok 1358 - is a valid object ok 1359 - $x = Math::BigInt::Subclass->new("77777777777"); $y = Math::BigInt::Subclass->new("9"); $x * $y; ok 1360 - is a valid object ok 1361 - $x = Math::BigInt::Subclass->new("88888888888"); $y = Math::BigInt::Subclass->new("9"); $x * $y; ok 1362 - is a valid object ok 1363 - $x = Math::BigInt::Subclass->new("99999999999"); $y = Math::BigInt::Subclass->new("9"); $x * $y; ok 1364 - is a valid object ok 1365 - $x = Math::BigInt::Subclass->new("+25"); $y = Math::BigInt::Subclass->new("+25"); $x * $y; ok 1366 - is a valid object ok 1367 - $x = Math::BigInt::Subclass->new("+12345"); $y = Math::BigInt::Subclass->new("+12345"); $x * $y; ok 1368 - is a valid object ok 1369 - $x = Math::BigInt::Subclass->new("+99999"); $y = Math::BigInt::Subclass->new("+11111"); $x * $y; ok 1370 - is a valid object ok 1371 - $x = Math::BigInt::Subclass->new("9999"); $y = Math::BigInt::Subclass->new("10000"); $x * $y; ok 1372 - is a valid object ok 1373 - $x = Math::BigInt::Subclass->new("99999"); $y = Math::BigInt::Subclass->new("100000"); $x * $y; ok 1374 - is a valid object ok 1375 - $x = Math::BigInt::Subclass->new("999999"); $y = Math::BigInt::Subclass->new("1000000"); $x * $y; ok 1376 - is a valid object ok 1377 - $x = Math::BigInt::Subclass->new("9999999"); $y = Math::BigInt::Subclass->new("10000000"); $x * $y; ok 1378 - is a valid object ok 1379 - $x = Math::BigInt::Subclass->new("99999999"); $y = Math::BigInt::Subclass->new("100000000"); $x * $y; ok 1380 - is a valid object ok 1381 - $x = Math::BigInt::Subclass->new("999999999"); $y = Math::BigInt::Subclass->new("1000000000"); $x * $y; ok 1382 - is a valid object ok 1383 - $x = Math::BigInt::Subclass->new("9999999999"); $y = Math::BigInt::Subclass->new("10000000000"); $x * $y; ok 1384 - is a valid object ok 1385 - $x = Math::BigInt::Subclass->new("99999999999"); $y = Math::BigInt::Subclass->new("100000000000"); $x * $y; ok 1386 - is a valid object ok 1387 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("1000000000000"); $x * $y; ok 1388 - is a valid object ok 1389 - $x = Math::BigInt::Subclass->new("9999999999999"); $y = Math::BigInt::Subclass->new("10000000000000"); $x * $y; ok 1390 - is a valid object ok 1391 - $x = Math::BigInt::Subclass->new("99999999999999"); $y = Math::BigInt::Subclass->new("100000000000000"); $x * $y; ok 1392 - is a valid object ok 1393 - $x = Math::BigInt::Subclass->new("999999999999999"); $y = Math::BigInt::Subclass->new("1000000000000000"); $x * $y; ok 1394 - is a valid object ok 1395 - $x = Math::BigInt::Subclass->new("9999999999999999"); $y = Math::BigInt::Subclass->new("10000000000000000"); $x * $y; ok 1396 - is a valid object ok 1397 - $x = Math::BigInt::Subclass->new("99999999999999999"); $y = Math::BigInt::Subclass->new("100000000000000000"); $x * $y; ok 1398 - is a valid object ok 1399 - $x = Math::BigInt::Subclass->new("999999999999999999"); $y = Math::BigInt::Subclass->new("1000000000000000000"); $x * $y; ok 1400 - is a valid object ok 1401 - $x = Math::BigInt::Subclass->new("9999999999999999999"); $y = Math::BigInt::Subclass->new("10000000000000000000"); $x * $y; ok 1402 - is a valid object ok 1403 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("20"); join (",", $x->bdiv($y)); ok 1404 - $x = Math::BigInt::Subclass->new("4095"); $y = Math::BigInt::Subclass->new("4095"); join (",", $x->bdiv($y)); ok 1405 - $x = Math::BigInt::Subclass->new("-4095"); $y = Math::BigInt::Subclass->new("-4095"); join (",", $x->bdiv($y)); ok 1406 - $x = Math::BigInt::Subclass->new("4095"); $y = Math::BigInt::Subclass->new("-4095"); join (",", $x->bdiv($y)); ok 1407 - $x = Math::BigInt::Subclass->new("-4095"); $y = Math::BigInt::Subclass->new("4095"); join (",", $x->bdiv($y)); ok 1408 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->bdiv($y)); ok 1409 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->bdiv($y)); ok 1410 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("4"); join (",", $x->bdiv($y)); ok 1411 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("8"); join (",", $x->bdiv($y)); ok 1412 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("8"); join (",", $x->bdiv($y)); ok 1413 - $x = Math::BigInt::Subclass->new("11"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->bdiv($y)); ok 1414 - $x = Math::BigInt::Subclass->new("11"); $y = Math::BigInt::Subclass->new("-2"); join (",", $x->bdiv($y)); ok 1415 - $x = Math::BigInt::Subclass->new("-11"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->bdiv($y)); ok 1416 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->bdiv($y)); ok 1417 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->bdiv($y)); ok 1418 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->bdiv($y)); ok 1419 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->bdiv($y)); ok 1420 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->bdiv($y)); ok 1421 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->bdiv($y)); ok 1422 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->bdiv($y)); ok 1423 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->bdiv($y)); ok 1424 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->bdiv($y)); ok 1425 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->bdiv($y)); ok 1426 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->bdiv($y)); ok 1427 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->bdiv($y)); ok 1428 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->bdiv($y)); ok 1429 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->bdiv($y)); ok 1430 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->bdiv($y)); ok 1431 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->bdiv($y)); ok 1432 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->bdiv($y)); ok 1433 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->bdiv($y)); ok 1434 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->bdiv($y)); ok 1435 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->bdiv($y)); ok 1436 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->bdiv($y)); ok 1437 - $x = Math::BigInt::Subclass->new("1234567812345678"); $y = Math::BigInt::Subclass->new("123456712345678"); join (",", $x->bdiv($y)); ok 1438 - $x = Math::BigInt::Subclass->new("12345671234567"); $y = Math::BigInt::Subclass->new("1234561234567"); join (",", $x->bdiv($y)); ok 1439 - $x = Math::BigInt::Subclass->new("123456123456"); $y = Math::BigInt::Subclass->new("12345123456"); join (",", $x->bdiv($y)); ok 1440 - $x = Math::BigInt::Subclass->new("1234512345"); $y = Math::BigInt::Subclass->new("123412345"); join (",", $x->bdiv($y)); ok 1441 - $x = Math::BigInt::Subclass->new("1234567890999999999"); $y = Math::BigInt::Subclass->new("1234567890"); join (",", $x->bdiv($y)); ok 1442 - $x = Math::BigInt::Subclass->new("1234567890000000000"); $y = Math::BigInt::Subclass->new("1234567890"); join (",", $x->bdiv($y)); ok 1443 - $x = Math::BigInt::Subclass->new("1234567890999999999"); $y = Math::BigInt::Subclass->new("9876543210"); join (",", $x->bdiv($y)); ok 1444 - $x = Math::BigInt::Subclass->new("1234567890000000000"); $y = Math::BigInt::Subclass->new("9876543210"); join (",", $x->bdiv($y)); ok 1445 - $x = Math::BigInt::Subclass->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt::Subclass->new("484848484848484848484848486666666666666689898989898989898989"); join (",", $x->bdiv($y)); ok 1446 - $x = Math::BigInt::Subclass->new("1267650600228229401496703205375"); $y = Math::BigInt::Subclass->new("1267650600228229401496703205376"); join (",", $x->bdiv($y)); ok 1447 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("999999999999999999999999999999999"); join (",", $x->bdiv($y)); ok 1448 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("888888888888888888888888888888888"); join (",", $x->bdiv($y)); ok 1449 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("777777777777777777777777777777777"); join (",", $x->bdiv($y)); ok 1450 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("666666666666666666666666666666666"); join (",", $x->bdiv($y)); ok 1451 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("555555555555555555555555555555555"); join (",", $x->bdiv($y)); ok 1452 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("444444444444444444444444444444444"); join (",", $x->bdiv($y)); ok 1453 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("333333333333333333333333333333333"); join (",", $x->bdiv($y)); ok 1454 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("222222222222222222222222222222222"); join (",", $x->bdiv($y)); ok 1455 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("111111111111111111111111111111111"); join (",", $x->bdiv($y)); ok 1456 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3333333_3333333_3333333_3333333"); join (",", $x->bdiv($y)); ok 1457 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3333333_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1458 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1459 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("2000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1460 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1461 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("100000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1462 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("10000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1463 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1464 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("100_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1465 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("10_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1466 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1467 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x / $y; ok 1468 - is a valid object ok 1469 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("1"); $x / $y; ok 1470 - is a valid object ok 1471 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("abc"); $x / $y; ok 1472 - is a valid object ok 1473 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x / $y; ok 1474 - is a valid object ok 1475 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x / $y; ok 1476 - is a valid object ok 1477 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x / $y; ok 1478 - is a valid object ok 1479 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x / $y; ok 1480 - is a valid object ok 1481 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); $x / $y; ok 1482 - is a valid object ok 1483 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("inf"); $x / $y; ok 1484 - is a valid object ok 1485 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); $x / $y; ok 1486 - is a valid object ok 1487 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); $x / $y; ok 1488 - is a valid object ok 1489 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); $x / $y; ok 1490 - is a valid object ok 1491 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-5"); $x / $y; ok 1492 - is a valid object ok 1493 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5"); $x / $y; ok 1494 - is a valid object ok 1495 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); $x / $y; ok 1496 - is a valid object ok 1497 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-5"); $x / $y; ok 1498 - is a valid object ok 1499 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $x / $y; ok 1500 - is a valid object ok 1501 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x / $y; ok 1502 - is a valid object ok 1503 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $x / $y; ok 1504 - is a valid object ok 1505 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x / $y; ok 1506 - is a valid object ok 1507 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("0"); $x / $y; ok 1508 - is a valid object ok 1509 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $x / $y; ok 1510 - is a valid object ok 1511 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("0"); $x / $y; ok 1512 - is a valid object ok 1513 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $x / $y; ok 1514 - is a valid object ok 1515 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x / $y; ok 1516 - is a valid object ok 1517 - $x = Math::BigInt::Subclass->new("11"); $y = Math::BigInt::Subclass->new("2"); $x / $y; ok 1518 - is a valid object ok 1519 - $x = Math::BigInt::Subclass->new("-11"); $y = Math::BigInt::Subclass->new("-2"); $x / $y; ok 1520 - is a valid object ok 1521 - $x = Math::BigInt::Subclass->new("-11"); $y = Math::BigInt::Subclass->new("2"); $x / $y; ok 1522 - is a valid object ok 1523 - $x = Math::BigInt::Subclass->new("11"); $y = Math::BigInt::Subclass->new("-2"); $x / $y; ok 1524 - is a valid object ok 1525 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x / $y; ok 1526 - is a valid object ok 1527 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x / $y; ok 1528 - is a valid object ok 1529 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x / $y; ok 1530 - is a valid object ok 1531 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x / $y; ok 1532 - is a valid object ok 1533 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x / $y; ok 1534 - is a valid object ok 1535 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x / $y; ok 1536 - is a valid object ok 1537 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x / $y; ok 1538 - is a valid object ok 1539 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x / $y; ok 1540 - is a valid object ok 1541 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("26"); $x / $y; ok 1542 - is a valid object ok 1543 - $x = Math::BigInt::Subclass->new("1000000000"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1544 - is a valid object ok 1545 - $x = Math::BigInt::Subclass->new("2000000000"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1546 - is a valid object ok 1547 - $x = Math::BigInt::Subclass->new("3000000000"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1548 - is a valid object ok 1549 - $x = Math::BigInt::Subclass->new("4000000000"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1550 - is a valid object ok 1551 - $x = Math::BigInt::Subclass->new("5000000000"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1552 - is a valid object ok 1553 - $x = Math::BigInt::Subclass->new("6000000000"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1554 - is a valid object ok 1555 - $x = Math::BigInt::Subclass->new("7000000000"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1556 - is a valid object ok 1557 - $x = Math::BigInt::Subclass->new("8000000000"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1558 - is a valid object ok 1559 - $x = Math::BigInt::Subclass->new("9000000000"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1560 - is a valid object ok 1561 - $x = Math::BigInt::Subclass->new("35500000"); $y = Math::BigInt::Subclass->new("113"); $x / $y; ok 1562 - is a valid object ok 1563 - $x = Math::BigInt::Subclass->new("71000000"); $y = Math::BigInt::Subclass->new("226"); $x / $y; ok 1564 - is a valid object ok 1565 - $x = Math::BigInt::Subclass->new("106500000"); $y = Math::BigInt::Subclass->new("339"); $x / $y; ok 1566 - is a valid object ok 1567 - $x = Math::BigInt::Subclass->new("1000000000"); $y = Math::BigInt::Subclass->new("3"); $x / $y; ok 1568 - is a valid object ok 1569 - $x = Math::BigInt::Subclass->new("+10"); $y = Math::BigInt::Subclass->new("+5"); $x / $y; ok 1570 - is a valid object ok 1571 - $x = Math::BigInt::Subclass->new("+100"); $y = Math::BigInt::Subclass->new("+4"); $x / $y; ok 1572 - is a valid object ok 1573 - $x = Math::BigInt::Subclass->new("+1000"); $y = Math::BigInt::Subclass->new("+8"); $x / $y; ok 1574 - is a valid object ok 1575 - $x = Math::BigInt::Subclass->new("+10000"); $y = Math::BigInt::Subclass->new("+16"); $x / $y; ok 1576 - is a valid object ok 1577 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("9"); $x / $y; ok 1578 - is a valid object ok 1579 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("99"); $x / $y; ok 1580 - is a valid object ok 1581 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("999"); $x / $y; ok 1582 - is a valid object ok 1583 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("9999"); $x / $y; ok 1584 - is a valid object ok 1585 - $x = Math::BigInt::Subclass->new("999999999999999"); $y = Math::BigInt::Subclass->new("99999"); $x / $y; ok 1586 - is a valid object ok 1587 - $x = Math::BigInt::Subclass->new("+1111088889"); $y = Math::BigInt::Subclass->new("99999"); $x / $y; ok 1588 - is a valid object ok 1589 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-3"); $x / $y; ok 1590 - is a valid object ok 1591 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("3"); $x / $y; ok 1592 - is a valid object ok 1593 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $x / $y; ok 1594 - is a valid object ok 1595 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-3"); $x / $y; ok 1596 - is a valid object ok 1597 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x / $y; ok 1598 - is a valid object ok 1599 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-3"); $x / $y; ok 1600 - is a valid object ok 1601 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x / $y; ok 1602 - is a valid object ok 1603 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x / $y; ok 1604 - is a valid object ok 1605 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("3"); $x / $y; ok 1606 - is a valid object ok 1607 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("3"); $x / $y; ok 1608 - is a valid object ok 1609 - $x = Math::BigInt::Subclass->new("14"); $y = Math::BigInt::Subclass->new("-3"); $x / $y; ok 1610 - is a valid object ok 1611 - $x = Math::BigInt::Subclass->new("-14"); $y = Math::BigInt::Subclass->new("3"); $x / $y; ok 1612 - is a valid object ok 1613 - $x = Math::BigInt::Subclass->new("-14"); $y = Math::BigInt::Subclass->new("-3"); $x / $y; ok 1614 - is a valid object ok 1615 - $x = Math::BigInt::Subclass->new("14"); $y = Math::BigInt::Subclass->new("3"); $x / $y; ok 1616 - is a valid object ok 1617 - $x = Math::BigInt::Subclass->new("10000000000000000000000000000000000000000000000000000000000000000000000000000000000"); $y = Math::BigInt::Subclass->new("10000000375084540248994272022843165711074"); $x / $y; ok 1618 - is a valid object ok 1619 - $x = Math::BigInt::Subclass->new("1234567812345678"); $y = Math::BigInt::Subclass->new("123456712345678"); $x / $y; ok 1620 - is a valid object ok 1621 - $x = Math::BigInt::Subclass->new("12345671234567"); $y = Math::BigInt::Subclass->new("1234561234567"); $x / $y; ok 1622 - is a valid object ok 1623 - $x = Math::BigInt::Subclass->new("123456123456"); $y = Math::BigInt::Subclass->new("12345123456"); $x / $y; ok 1624 - is a valid object ok 1625 - $x = Math::BigInt::Subclass->new("1234512345"); $y = Math::BigInt::Subclass->new("123412345"); $x / $y; ok 1626 - is a valid object ok 1627 - $x = Math::BigInt::Subclass->new("1234567890999999999"); $y = Math::BigInt::Subclass->new("1234567890"); $x / $y; ok 1628 - is a valid object ok 1629 - $x = Math::BigInt::Subclass->new("1234567890000000000"); $y = Math::BigInt::Subclass->new("1234567890"); $x / $y; ok 1630 - is a valid object ok 1631 - $x = Math::BigInt::Subclass->new("1234567890999999999"); $y = Math::BigInt::Subclass->new("9876543210"); $x / $y; ok 1632 - is a valid object ok 1633 - $x = Math::BigInt::Subclass->new("1234567890000000000"); $y = Math::BigInt::Subclass->new("9876543210"); $x / $y; ok 1634 - is a valid object ok 1635 - $x = Math::BigInt::Subclass->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt::Subclass->new("484848484848484848484848486666666666666689898989898989898989"); $x / $y; ok 1636 - is a valid object ok 1637 - $x = Math::BigInt::Subclass->new("84696969696969696956565656566184292929292929292847474747436308080808080808086765396464646464646465"); $y = Math::BigInt::Subclass->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1638 - is a valid object ok 1639 - $x = Math::BigInt::Subclass->new("84696969696969696943434343434871161616161616161452525252486813131313131313143230042929292929292930"); $y = Math::BigInt::Subclass->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1640 - is a valid object ok 1641 - $x = Math::BigInt::Subclass->new("84696969696969696969696969697497424242424242424242424242385803030303030303030300750000000000000000"); $y = Math::BigInt::Subclass->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1642 - is a valid object ok 1643 - $x = Math::BigInt::Subclass->new("84696969696969696930303030303558030303030303030057575757537318181818181818199694689393939393939395"); $y = Math::BigInt::Subclass->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x / $y; ok 1644 - is a valid object ok 1645 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $x / $y; ok 1646 - is a valid object ok 1647 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("888888888888888888888888888888888"); $x / $y; ok 1648 - is a valid object ok 1649 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("777777777777777777777777777777777"); $x / $y; ok 1650 - is a valid object ok 1651 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("666666666666666666666666666666666"); $x / $y; ok 1652 - is a valid object ok 1653 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("555555555555555555555555555555555"); $x / $y; ok 1654 - is a valid object ok 1655 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("444444444444444444444444444444444"); $x / $y; ok 1656 - is a valid object ok 1657 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("333333333333333333333333333333333"); $x / $y; ok 1658 - is a valid object ok 1659 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("222222222222222222222222222222222"); $x / $y; ok 1660 - is a valid object ok 1661 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("111111111111111111111111111111111"); $x / $y; ok 1662 - is a valid object ok 1663 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3333333_3333333_3333333_3333333"); $x / $y; ok 1664 - is a valid object ok 1665 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3333333_0000000_0000000_0000000"); $x / $y; ok 1666 - is a valid object ok 1667 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3000000_0000000_0000000_0000000"); $x / $y; ok 1668 - is a valid object ok 1669 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("2000000_0000000_0000000_0000000"); $x / $y; ok 1670 - is a valid object ok 1671 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1000000_0000000_0000000_0000000"); $x / $y; ok 1672 - is a valid object ok 1673 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("100000_0000000_0000000_0000000"); $x / $y; ok 1674 - is a valid object ok 1675 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("10000_0000000_0000000_0000000"); $x / $y; ok 1676 - is a valid object ok 1677 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1000_0000000_0000000_0000000"); $x / $y; ok 1678 - is a valid object ok 1679 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("100_0000000_0000000_0000000"); $x / $y; ok 1680 - is a valid object ok 1681 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("10_0000000_0000000_0000000"); $x / $y; ok 1682 - is a valid object ok 1683 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1_0000000_0000000_0000000"); $x / $y; ok 1684 - is a valid object ok 1685 - $x = Math::BigInt::Subclass->new("949418181818187070707070707070707070"); $y = Math::BigInt::Subclass->new("181818181853535353535353535353535353"); $x / $y; ok 1686 - is a valid object ok 1687 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x->bmodinv($y); ok 1688 - is a valid object ok 1689 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1690 - is a valid object ok 1691 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("abc"); $x->bmodinv($y); ok 1692 - is a valid object ok 1693 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1694 - is a valid object ok 1695 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1696 - is a valid object ok 1697 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-5"); $x->bmodinv($y); ok 1698 - is a valid object ok 1699 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1700 - is a valid object ok 1701 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("5033"); $x->bmodinv($y); ok 1702 - is a valid object ok 1703 - $x = Math::BigInt::Subclass->new("1234567891"); $y = Math::BigInt::Subclass->new("13"); $x->bmodinv($y); ok 1704 - is a valid object ok 1705 - $x = Math::BigInt::Subclass->new("-1234567891"); $y = Math::BigInt::Subclass->new("13"); $x->bmodinv($y); ok 1706 - is a valid object ok 1707 - $x = Math::BigInt::Subclass->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigInt::Subclass->new("2348249874968739"); $x->bmodinv($y); ok 1708 - is a valid object ok 1709 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1710 - is a valid object ok 1711 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1712 - is a valid object ok 1713 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1714 - is a valid object ok 1715 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1716 - is a valid object ok 1717 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1718 - is a valid object ok 1719 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1720 - is a valid object ok 1721 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1722 - is a valid object ok 1723 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1724 - is a valid object ok 1725 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1726 - is a valid object ok 1727 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1728 - is a valid object ok 1729 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1730 - is a valid object ok 1731 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1732 - is a valid object ok 1733 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1734 - is a valid object ok 1735 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1736 - is a valid object ok 1737 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1738 - is a valid object ok 1739 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1740 - is a valid object ok 1741 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1742 - is a valid object ok 1743 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1744 - is a valid object ok 1745 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1746 - is a valid object ok 1747 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1748 - is a valid object ok 1749 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1750 - is a valid object ok 1751 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1752 - is a valid object ok 1753 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x->bmodinv($y); ok 1754 - is a valid object ok 1755 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1756 - is a valid object ok 1757 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); $x->bmodinv($y); ok 1758 - is a valid object ok 1759 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("abc"); $x->bmodpow($y, $z); ok 1760 - is a valid object ok 1761 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("abc"); $x->bmodpow($y, $z); ok 1762 - is a valid object ok 1763 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("abc"); $x->bmodpow($y, $z); ok 1764 - is a valid object ok 1765 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("5"); $x->bmodpow($y, $z); ok 1766 - is a valid object ok 1767 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("abc"); $x->bmodpow($y, $z); ok 1768 - is a valid object ok 1769 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("5"); $x->bmodpow($y, $z); ok 1770 - is a valid object ok 1771 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("5"); $x->bmodpow($y, $z); ok 1772 - is a valid object ok 1773 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("0"); $x->bmodpow($y, $z); ok 1774 - is a valid object ok 1775 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("2"); $x->bmodpow($y, $z); ok 1776 - is a valid object ok 1777 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("2"); $x->bmodpow($y, $z); ok 1778 - is a valid object ok 1779 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("5"); $x->bmodpow($y, $z); ok 1780 - is a valid object ok 1781 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1782 - is a valid object ok 1783 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1784 - is a valid object ok 1785 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1786 - is a valid object ok 1787 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1788 - is a valid object ok 1789 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1790 - is a valid object ok 1791 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1792 - is a valid object ok 1793 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1794 - is a valid object ok 1795 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1796 - is a valid object ok 1797 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1798 - is a valid object ok 1799 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1800 - is a valid object ok 1801 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1802 - is a valid object ok 1803 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1804 - is a valid object ok 1805 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1806 - is a valid object ok 1807 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1808 - is a valid object ok 1809 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1810 - is a valid object ok 1811 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1812 - is a valid object ok 1813 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1814 - is a valid object ok 1815 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1816 - is a valid object ok 1817 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1818 - is a valid object ok 1819 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1820 - is a valid object ok 1821 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1822 - is a valid object ok 1823 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1824 - is a valid object ok 1825 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1826 - is a valid object ok 1827 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1828 - is a valid object ok 1829 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1830 - is a valid object ok 1831 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1832 - is a valid object ok 1833 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1834 - is a valid object ok 1835 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1836 - is a valid object ok 1837 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1838 - is a valid object ok 1839 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1840 - is a valid object ok 1841 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1842 - is a valid object ok 1843 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1844 - is a valid object ok 1845 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1846 - is a valid object ok 1847 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1848 - is a valid object ok 1849 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1850 - is a valid object ok 1851 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1852 - is a valid object ok 1853 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1854 - is a valid object ok 1855 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1856 - is a valid object ok 1857 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1858 - is a valid object ok 1859 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1860 - is a valid object ok 1861 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1862 - is a valid object ok 1863 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1864 - is a valid object ok 1865 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1866 - is a valid object ok 1867 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1868 - is a valid object ok 1869 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1870 - is a valid object ok 1871 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1872 - is a valid object ok 1873 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1874 - is a valid object ok 1875 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1876 - is a valid object ok 1877 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1878 - is a valid object ok 1879 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1880 - is a valid object ok 1881 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1882 - is a valid object ok 1883 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1884 - is a valid object ok 1885 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1886 - is a valid object ok 1887 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1888 - is a valid object ok 1889 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1890 - is a valid object ok 1891 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1892 - is a valid object ok 1893 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1894 - is a valid object ok 1895 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1896 - is a valid object ok 1897 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1898 - is a valid object ok 1899 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1900 - is a valid object ok 1901 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1902 - is a valid object ok 1903 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1904 - is a valid object ok 1905 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1906 - is a valid object ok 1907 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1908 - is a valid object ok 1909 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1910 - is a valid object ok 1911 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1912 - is a valid object ok 1913 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1914 - is a valid object ok 1915 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1916 - is a valid object ok 1917 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1918 - is a valid object ok 1919 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1920 - is a valid object ok 1921 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1922 - is a valid object ok 1923 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1924 - is a valid object ok 1925 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1926 - is a valid object ok 1927 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1928 - is a valid object ok 1929 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1930 - is a valid object ok 1931 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1932 - is a valid object ok 1933 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1934 - is a valid object ok 1935 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1936 - is a valid object ok 1937 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1938 - is a valid object ok 1939 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1940 - is a valid object ok 1941 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1942 - is a valid object ok 1943 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1944 - is a valid object ok 1945 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1946 - is a valid object ok 1947 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1948 - is a valid object ok 1949 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1950 - is a valid object ok 1951 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1952 - is a valid object ok 1953 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1954 - is a valid object ok 1955 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1956 - is a valid object ok 1957 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1958 - is a valid object ok 1959 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1960 - is a valid object ok 1961 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1962 - is a valid object ok 1963 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1964 - is a valid object ok 1965 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1966 - is a valid object ok 1967 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1968 - is a valid object ok 1969 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1970 - is a valid object ok 1971 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1972 - is a valid object ok 1973 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1974 - is a valid object ok 1975 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 1976 - is a valid object ok 1977 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1978 - is a valid object ok 1979 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1980 - is a valid object ok 1981 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1982 - is a valid object ok 1983 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1984 - is a valid object ok 1985 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1986 - is a valid object ok 1987 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1988 - is a valid object ok 1989 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1990 - is a valid object ok 1991 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1992 - is a valid object ok 1993 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1994 - is a valid object ok 1995 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1996 - is a valid object ok 1997 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 1998 - is a valid object ok 1999 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2000 - is a valid object ok 2001 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2002 - is a valid object ok 2003 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2004 - is a valid object ok 2005 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2006 - is a valid object ok 2007 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2008 - is a valid object ok 2009 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2010 - is a valid object ok 2011 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2012 - is a valid object ok 2013 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2014 - is a valid object ok 2015 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2016 - is a valid object ok 2017 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2018 - is a valid object ok 2019 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2020 - is a valid object ok 2021 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2022 - is a valid object ok 2023 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2024 - is a valid object ok 2025 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2026 - is a valid object ok 2027 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2028 - is a valid object ok 2029 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2030 - is a valid object ok 2031 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2032 - is a valid object ok 2033 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2034 - is a valid object ok 2035 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2036 - is a valid object ok 2037 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2044 - is a valid object ok 2045 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2046 - is a valid object ok 2047 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2048 - is a valid object ok 2049 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2050 - is a valid object ok 2051 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2058 - is a valid object ok 2059 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2072 - is a valid object ok 2073 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("16"); $x->bmodpow($y, $z); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("5033"); $x->bmodpow($y, $z); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("7"); $z = Math::BigInt::Subclass->new("5032"); $x->bmodpow($y, $z); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("8"); $z = Math::BigInt::Subclass->new("-5"); $x->bmodpow($y, $z); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt::Subclass->new("1e50"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt::Subclass->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigInt::Subclass->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigInt::Subclass->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 2086 - is a valid object ok 2087 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("13"); $x->bmodpow($y, $z); ok 2088 - is a valid object ok 2089 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $z = Math::BigInt::Subclass->new("13"); $x->bmodpow($y, $z); ok 2090 - is a valid object ok 2091 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2092 - is a valid object ok 2093 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2094 - is a valid object ok 2095 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2096 - is a valid object ok 2097 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2098 - is a valid object ok 2099 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2100 - is a valid object ok 2101 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2102 - is a valid object ok 2103 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2104 - is a valid object ok 2105 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2106 - is a valid object ok 2107 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2108 - is a valid object ok 2109 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2110 - is a valid object ok 2111 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2112 - is a valid object ok 2113 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2114 - is a valid object ok 2115 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2116 - is a valid object ok 2117 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2118 - is a valid object ok 2119 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2120 - is a valid object ok 2121 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2122 - is a valid object ok 2123 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2124 - is a valid object ok 2125 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2126 - is a valid object ok 2127 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2128 - is a valid object ok 2129 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2130 - is a valid object ok 2131 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2132 - is a valid object ok 2133 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x % $y; ok 2134 - is a valid object ok 2135 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("1"); $x % $y; ok 2136 - is a valid object ok 2137 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("abc"); $x % $y; ok 2138 - is a valid object ok 2139 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x % $y; ok 2140 - is a valid object ok 2141 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2142 - is a valid object ok 2143 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x % $y; ok 2144 - is a valid object ok 2145 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2146 - is a valid object ok 2147 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x % $y; ok 2148 - is a valid object ok 2149 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x % $y; ok 2150 - is a valid object ok 2151 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x % $y; ok 2152 - is a valid object ok 2153 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x % $y; ok 2154 - is a valid object ok 2155 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x % $y; ok 2156 - is a valid object ok 2157 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x % $y; ok 2158 - is a valid object ok 2159 - $x = Math::BigInt::Subclass->new("1000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2160 - is a valid object ok 2161 - $x = Math::BigInt::Subclass->new("2000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2162 - is a valid object ok 2163 - $x = Math::BigInt::Subclass->new("3000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2164 - is a valid object ok 2165 - $x = Math::BigInt::Subclass->new("4000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2166 - is a valid object ok 2167 - $x = Math::BigInt::Subclass->new("5000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2168 - is a valid object ok 2169 - $x = Math::BigInt::Subclass->new("6000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2170 - is a valid object ok 2171 - $x = Math::BigInt::Subclass->new("7000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2172 - is a valid object ok 2173 - $x = Math::BigInt::Subclass->new("8000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2174 - is a valid object ok 2175 - $x = Math::BigInt::Subclass->new("9000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2176 - is a valid object ok 2177 - $x = Math::BigInt::Subclass->new("35500000"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2178 - is a valid object ok 2179 - $x = Math::BigInt::Subclass->new("71000000"); $y = Math::BigInt::Subclass->new("226"); $x % $y; ok 2180 - is a valid object ok 2181 - $x = Math::BigInt::Subclass->new("106500000"); $y = Math::BigInt::Subclass->new("339"); $x % $y; ok 2182 - is a valid object ok 2183 - $x = Math::BigInt::Subclass->new("1000000000"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2184 - is a valid object ok 2185 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2186 - is a valid object ok 2187 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("4"); $x % $y; ok 2188 - is a valid object ok 2189 - $x = Math::BigInt::Subclass->new("1000"); $y = Math::BigInt::Subclass->new("8"); $x % $y; ok 2190 - is a valid object ok 2191 - $x = Math::BigInt::Subclass->new("10000"); $y = Math::BigInt::Subclass->new("16"); $x % $y; ok 2192 - is a valid object ok 2193 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2194 - is a valid object ok 2195 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("99"); $x % $y; ok 2196 - is a valid object ok 2197 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("999"); $x % $y; ok 2198 - is a valid object ok 2199 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("9999"); $x % $y; ok 2200 - is a valid object ok 2201 - $x = Math::BigInt::Subclass->new("999999999999999"); $y = Math::BigInt::Subclass->new("99999"); $x % $y; ok 2202 - is a valid object ok 2203 - $x = Math::BigInt::Subclass->new("-9"); $y = Math::BigInt::Subclass->new("+5"); $x % $y; ok 2204 - is a valid object ok 2205 - $x = Math::BigInt::Subclass->new("+9"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2206 - is a valid object ok 2207 - $x = Math::BigInt::Subclass->new("-9"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2208 - is a valid object ok 2209 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2210 - is a valid object ok 2211 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2212 - is a valid object ok 2213 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2214 - is a valid object ok 2215 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2216 - is a valid object ok 2217 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-3"); $x % $y; ok 2218 - is a valid object ok 2219 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x % $y; ok 2220 - is a valid object ok 2221 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-3"); $x % $y; ok 2222 - is a valid object ok 2223 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-3"); $x % $y; ok 2224 - is a valid object ok 2225 - $x = Math::BigInt::Subclass->new("4095"); $y = Math::BigInt::Subclass->new("4095"); $x % $y; ok 2226 - is a valid object ok 2227 - $x = Math::BigInt::Subclass->new("100041000510123"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2228 - is a valid object ok 2229 - $x = Math::BigInt::Subclass->new("152403346"); $y = Math::BigInt::Subclass->new("12345"); $x % $y; ok 2230 - is a valid object ok 2231 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2232 - is a valid object ok 2233 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2234 - is a valid object ok 2235 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2236 - is a valid object ok 2237 - $x = Math::BigInt::Subclass->new("12345678"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2238 - is a valid object ok 2239 - $x = Math::BigInt::Subclass->new("1234567891"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2240 - is a valid object ok 2241 - $x = Math::BigInt::Subclass->new("123456789123"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2242 - is a valid object ok 2243 - $x = Math::BigInt::Subclass->new("12345678912345"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2244 - is a valid object ok 2245 - $x = Math::BigInt::Subclass->new("1234567891234567"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2246 - is a valid object ok 2247 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2248 - is a valid object ok 2249 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2250 - is a valid object ok 2251 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2252 - is a valid object ok 2253 - $x = Math::BigInt::Subclass->new("12345678"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2254 - is a valid object ok 2255 - $x = Math::BigInt::Subclass->new("1234567891"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2256 - is a valid object ok 2257 - $x = Math::BigInt::Subclass->new("123456789123"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2258 - is a valid object ok 2259 - $x = Math::BigInt::Subclass->new("12345678912345"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2260 - is a valid object ok 2261 - $x = Math::BigInt::Subclass->new("1234567891234567"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2262 - is a valid object ok 2263 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2264 - is a valid object ok 2265 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2266 - is a valid object ok 2267 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2268 - is a valid object ok 2269 - $x = Math::BigInt::Subclass->new("12345678"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2270 - is a valid object ok 2271 - $x = Math::BigInt::Subclass->new("1234567891"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2272 - is a valid object ok 2273 - $x = Math::BigInt::Subclass->new("123456789123"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2274 - is a valid object ok 2275 - $x = Math::BigInt::Subclass->new("12345678912345"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2276 - is a valid object ok 2277 - $x = Math::BigInt::Subclass->new("1234567891234567"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2278 - is a valid object ok 2279 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2280 - is a valid object ok 2281 - $x = Math::BigInt::Subclass->new("-629"); $y = Math::BigInt::Subclass->new("5033"); $x % $y; ok 2282 - is a valid object ok 2283 - $x = Math::BigInt::Subclass->new("111111111111111111111111111111"); $y = Math::BigInt::Subclass->new("111111111111111111111111111111"); $x % $y; ok 2284 - is a valid object ok 2285 - $x = Math::BigInt::Subclass->new("12345678901234567890"); $y = Math::BigInt::Subclass->new("12345678901234567890"); $x % $y; ok 2286 - is a valid object ok 2287 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass::bgcd($x, $y); ok 2288 - is a valid object ok 2289 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass::bgcd($x, $y); ok 2290 - is a valid object ok 2291 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("inf"); Math::BigInt::Subclass::bgcd($x, $y); ok 2292 - is a valid object ok 2293 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("-inf"); Math::BigInt::Subclass::bgcd($x, $y); ok 2294 - is a valid object ok 2295 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); Math::BigInt::Subclass::bgcd($x, $y); ok 2296 - is a valid object ok 2297 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); Math::BigInt::Subclass::bgcd($x, $y); ok 2298 - is a valid object ok 2299 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); Math::BigInt::Subclass::bgcd($x, $y); ok 2300 - is a valid object ok 2301 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); Math::BigInt::Subclass::bgcd($x, $y); ok 2302 - is a valid object ok 2303 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass::bgcd($x, $y); ok 2304 - is a valid object ok 2305 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); Math::BigInt::Subclass::bgcd($x, $y); ok 2306 - is a valid object ok 2307 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass::bgcd($x, $y); ok 2308 - is a valid object ok 2309 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); Math::BigInt::Subclass::bgcd($x, $y); ok 2310 - is a valid object ok 2311 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass::bgcd($x, $y); ok 2312 - is a valid object ok 2313 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+1"); Math::BigInt::Subclass::bgcd($x, $y); ok 2314 - is a valid object ok 2315 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("+3"); Math::BigInt::Subclass::bgcd($x, $y); ok 2316 - is a valid object ok 2317 - $x = Math::BigInt::Subclass->new("+3"); $y = Math::BigInt::Subclass->new("+2"); Math::BigInt::Subclass::bgcd($x, $y); ok 2318 - is a valid object ok 2319 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("+2"); Math::BigInt::Subclass::bgcd($x, $y); ok 2320 - is a valid object ok 2321 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("-2"); Math::BigInt::Subclass::bgcd($x, $y); ok 2322 - is a valid object ok 2323 - $x = Math::BigInt::Subclass->new("-144"); $y = Math::BigInt::Subclass->new("-60"); Math::BigInt::Subclass::bgcd($x, $y); ok 2324 - is a valid object ok 2325 - $x = Math::BigInt::Subclass->new("144"); $y = Math::BigInt::Subclass->new("-60"); Math::BigInt::Subclass::bgcd($x, $y); ok 2326 - is a valid object ok 2327 - $x = Math::BigInt::Subclass->new("144"); $y = Math::BigInt::Subclass->new("60"); Math::BigInt::Subclass::bgcd($x, $y); ok 2328 - is a valid object ok 2329 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("625"); Math::BigInt::Subclass::bgcd($x, $y); ok 2330 - is a valid object ok 2331 - $x = Math::BigInt::Subclass->new("4096"); $y = Math::BigInt::Subclass->new("81"); Math::BigInt::Subclass::bgcd($x, $y); ok 2332 - is a valid object ok 2333 - $x = Math::BigInt::Subclass->new("1034"); $y = Math::BigInt::Subclass->new("804"); Math::BigInt::Subclass::bgcd($x, $y); ok 2334 - is a valid object ok 2335 - $x = Math::BigInt::Subclass->new("27"); $y = Math::BigInt::Subclass->new("90"); $z = Math::BigInt::Subclass->new("56"); Math::BigInt::Subclass::bgcd($x, $y, $z); ok 2336 - is a valid object ok 2337 - $x = Math::BigInt::Subclass->new("27"); $y = Math::BigInt::Subclass->new("90"); $z = Math::BigInt::Subclass->new("54"); Math::BigInt::Subclass::bgcd($x, $y, $z); ok 2338 - is a valid object ok 2339 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); Math::BigInt::Subclass::blcm($x, $y); ok 2340 - is a valid object ok 2341 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass::blcm($x, $y); ok 2342 - is a valid object ok 2343 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); Math::BigInt::Subclass::blcm($x, $y); ok 2344 - is a valid object ok 2345 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass::blcm($x, $y); ok 2346 - is a valid object ok 2347 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass::blcm($x, $y); ok 2348 - is a valid object ok 2349 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); Math::BigInt::Subclass::blcm($x, $y); ok 2350 - is a valid object ok 2351 - $x = Math::BigInt::Subclass->new("+27"); $y = Math::BigInt::Subclass->new("+90"); Math::BigInt::Subclass::blcm($x, $y); ok 2352 - is a valid object ok 2353 - $x = Math::BigInt::Subclass->new("+1034"); $y = Math::BigInt::Subclass->new("+804"); Math::BigInt::Subclass::blcm($x, $y); ok 2354 - is a valid object ok 2355 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x & $y; ok 2356 - is a valid object ok 2357 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("0"); $x & $y; ok 2358 - is a valid object ok 2359 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("abc"); $x & $y; ok 2360 - is a valid object ok 2361 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x & $y; ok 2362 - is a valid object ok 2363 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $x & $y; ok 2364 - is a valid object ok 2365 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("+2"); $x & $y; ok 2366 - is a valid object ok 2367 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("0"); $x & $y; ok 2368 - is a valid object ok 2369 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("1"); $x & $y; ok 2370 - is a valid object ok 2371 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("+281474976710656"); $x & $y; ok 2372 - is a valid object ok 2373 - $x = Math::BigInt::Subclass->new("281474976710656"); $y = Math::BigInt::Subclass->new("-1"); $x & $y; ok 2374 - is a valid object ok 2375 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x & $y; ok 2376 - is a valid object ok 2377 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x & $y; ok 2378 - is a valid object ok 2379 - $x = Math::BigInt::Subclass->new("-6"); $y = Math::BigInt::Subclass->new("-6"); $x & $y; ok 2380 - is a valid object ok 2381 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("-4"); $x & $y; ok 2382 - is a valid object ok 2383 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("4"); $x & $y; ok 2384 - is a valid object ok 2385 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("7"); $x & $y; ok 2386 - is a valid object ok 2387 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-3"); $x & $y; ok 2388 - is a valid object ok 2389 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-1"); $x & $y; ok 2390 - is a valid object ok 2391 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x & $y; ok 2392 - is a valid object ok 2393 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x & $y; ok 2394 - is a valid object ok 2395 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x & $y; ok 2396 - is a valid object ok 2397 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x & $y; ok 2398 - is a valid object ok 2399 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x & $y; ok 2400 - is a valid object ok 2401 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0xF0F0"); $x & $y; ok 2402 - is a valid object ok 2403 - $x = Math::BigInt::Subclass->new("0x0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x & $y; ok 2404 - is a valid object ok 2405 - $x = Math::BigInt::Subclass->new("0xF0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x & $y; ok 2406 - is a valid object ok 2407 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F"); $x & $y; ok 2408 - is a valid object ok 2409 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x & $y; ok 2410 - is a valid object ok 2411 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F"); $x & $y; ok 2412 - is a valid object ok 2413 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x & $y; ok 2414 - is a valid object ok 2415 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $x & $y; ok 2416 - is a valid object ok 2417 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x & $y; ok 2418 - is a valid object ok 2419 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $x & $y; ok 2420 - is a valid object ok 2421 - $x = Math::BigInt::Subclass->new("0x1F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x3F0F0F0F0F0F"); $x & $y; ok 2422 - is a valid object ok 2423 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x | $y; ok 2424 - is a valid object ok 2425 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2426 - is a valid object ok 2427 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("abc"); $x | $y; ok 2428 - is a valid object ok 2429 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x | $y; ok 2430 - is a valid object ok 2431 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("+2"); $x | $y; ok 2432 - is a valid object ok 2433 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2434 - is a valid object ok 2435 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("1"); $x | $y; ok 2436 - is a valid object ok 2437 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("281474976710656"); $x | $y; ok 2438 - is a valid object ok 2439 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x | $y; ok 2440 - is a valid object ok 2441 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x | $y; ok 2442 - is a valid object ok 2443 - $x = Math::BigInt::Subclass->new("-6"); $y = Math::BigInt::Subclass->new("-6"); $x | $y; ok 2444 - is a valid object ok 2445 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("4"); $x | $y; ok 2446 - is a valid object ok 2447 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("7"); $x | $y; ok 2448 - is a valid object ok 2449 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("-1"); $x | $y; ok 2450 - is a valid object ok 2451 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-3"); $x | $y; ok 2452 - is a valid object ok 2453 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-4"); $x | $y; ok 2454 - is a valid object ok 2455 - $x = Math::BigInt::Subclass->new("300"); $y = Math::BigInt::Subclass->new("-76"); $x | $y; ok 2456 - is a valid object ok 2457 - $x = Math::BigInt::Subclass->new("-76"); $y = Math::BigInt::Subclass->new("300"); $x | $y; ok 2458 - is a valid object ok 2459 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x | $y; ok 2460 - is a valid object ok 2461 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x | $y; ok 2462 - is a valid object ok 2463 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x | $y; ok 2464 - is a valid object ok 2465 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x | $y; ok 2466 - is a valid object ok 2467 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x | $y; ok 2468 - is a valid object ok 2469 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x | $y; ok 2470 - is a valid object ok 2471 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x | $y; ok 2472 - is a valid object ok 2473 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x | $y; ok 2474 - is a valid object ok 2475 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x | $y; ok 2476 - is a valid object ok 2477 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x | $y; ok 2478 - is a valid object ok 2479 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2480 - is a valid object ok 2481 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2482 - is a valid object ok 2483 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2484 - is a valid object ok 2485 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2486 - is a valid object ok 2487 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2488 - is a valid object ok 2489 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0xF0F0"); $x | $y; ok 2490 - is a valid object ok 2491 - $x = Math::BigInt::Subclass->new("0x0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x | $y; ok 2492 - is a valid object ok 2493 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x | $y; ok 2494 - is a valid object ok 2495 - $x = Math::BigInt::Subclass->new("0xF0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x | $y; ok 2496 - is a valid object ok 2497 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F"); $x | $y; ok 2498 - is a valid object ok 2499 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x | $y; ok 2500 - is a valid object ok 2501 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x | $y; ok 2502 - is a valid object ok 2503 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F"); $x | $y; ok 2504 - is a valid object ok 2505 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x | $y; ok 2506 - is a valid object ok 2507 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x | $y; ok 2508 - is a valid object ok 2509 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $x | $y; ok 2510 - is a valid object ok 2511 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x | $y; ok 2512 - is a valid object ok 2513 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x | $y; ok 2514 - is a valid object ok 2515 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $x | $y; ok 2516 - is a valid object ok 2517 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x | $y; ok 2518 - is a valid object ok 2519 - $x = Math::BigInt::Subclass->new("0x1F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x | $y; ok 2520 - is a valid object ok 2521 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x ^ $y; ok 2522 - is a valid object ok 2523 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2524 - is a valid object ok 2525 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("abc"); $x ^ $y; ok 2526 - is a valid object ok 2527 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x ^ $y; ok 2528 - is a valid object ok 2529 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("+2"); $x ^ $y; ok 2530 - is a valid object ok 2531 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2532 - is a valid object ok 2533 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("1"); $x ^ $y; ok 2534 - is a valid object ok 2535 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("281474976710656"); $x ^ $y; ok 2536 - is a valid object ok 2537 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x ^ $y; ok 2538 - is a valid object ok 2539 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x ^ $y; ok 2540 - is a valid object ok 2541 - $x = Math::BigInt::Subclass->new("-6"); $y = Math::BigInt::Subclass->new("-6"); $x ^ $y; ok 2542 - is a valid object ok 2543 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("4"); $x ^ $y; ok 2544 - is a valid object ok 2545 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("7"); $x ^ $y; ok 2546 - is a valid object ok 2547 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-7"); $x ^ $y; ok 2548 - is a valid object ok 2549 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("-7"); $x ^ $y; ok 2550 - is a valid object ok 2551 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-3"); $x ^ $y; ok 2552 - is a valid object ok 2553 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-4"); $x ^ $y; ok 2554 - is a valid object ok 2555 - $x = Math::BigInt::Subclass->new("300"); $y = Math::BigInt::Subclass->new("-76"); $x ^ $y; ok 2556 - is a valid object ok 2557 - $x = Math::BigInt::Subclass->new("-76"); $y = Math::BigInt::Subclass->new("300"); $x ^ $y; ok 2558 - is a valid object ok 2559 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x ^ $y; ok 2560 - is a valid object ok 2561 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x ^ $y; ok 2562 - is a valid object ok 2563 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x ^ $y; ok 2564 - is a valid object ok 2565 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x ^ $y; ok 2566 - is a valid object ok 2567 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2568 - is a valid object ok 2569 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x ^ $y; ok 2570 - is a valid object ok 2571 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x ^ $y; ok 2572 - is a valid object ok 2573 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x ^ $y; ok 2574 - is a valid object ok 2575 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x ^ $y; ok 2576 - is a valid object ok 2577 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2578 - is a valid object ok 2579 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2580 - is a valid object ok 2581 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2582 - is a valid object ok 2583 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2584 - is a valid object ok 2585 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2586 - is a valid object ok 2587 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2588 - is a valid object ok 2589 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0xF0F0"); $x ^ $y; ok 2590 - is a valid object ok 2591 - $x = Math::BigInt::Subclass->new("0x0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x ^ $y; ok 2592 - is a valid object ok 2593 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x ^ $y; ok 2594 - is a valid object ok 2595 - $x = Math::BigInt::Subclass->new("0xF0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x ^ $y; ok 2596 - is a valid object ok 2597 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F"); $x ^ $y; ok 2598 - is a valid object ok 2599 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x ^ $y; ok 2600 - is a valid object ok 2601 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x ^ $y; ok 2602 - is a valid object ok 2603 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F"); $x ^ $y; ok 2604 - is a valid object ok 2605 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x ^ $y; ok 2606 - is a valid object ok 2607 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x ^ $y; ok 2608 - is a valid object ok 2609 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $x ^ $y; ok 2610 - is a valid object ok 2611 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x ^ $y; ok 2612 - is a valid object ok 2613 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2614 - is a valid object ok 2615 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 2616 - is a valid object ok 2617 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2618 - is a valid object ok 2619 - $x = Math::BigInt::Subclass->new("abc"); $x->bnot(); ok 2620 - is a valid object ok 2621 - $x = Math::BigInt::Subclass->new("+0"); $x->bnot(); ok 2622 - is a valid object ok 2623 - $x = Math::BigInt::Subclass->new("+8"); $x->bnot(); ok 2624 - is a valid object ok 2625 - $x = Math::BigInt::Subclass->new("+281474976710656"); $x->bnot(); ok 2626 - is a valid object ok 2627 - $x = Math::BigInt::Subclass->new("-1"); $x->bnot(); ok 2628 - is a valid object ok 2629 - $x = Math::BigInt::Subclass->new("-2"); $x->bnot(); ok 2630 - is a valid object ok 2631 - $x = Math::BigInt::Subclass->new("-12"); $x->bnot(); ok 2632 - is a valid object ok 2633 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2634 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2635 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("1"); $x->digit($y); ok 2636 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2637 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $x->digit($y); ok 2638 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("2"); $x->digit($y); ok 2639 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-1"); $x->digit($y); ok 2640 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-2"); $x->digit($y); ok 2641 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-3"); $x->digit($y); ok 2642 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2643 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("1"); $x->digit($y); ok 2644 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("2"); $x->digit($y); ok 2645 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("3"); $x->digit($y); ok 2646 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("4"); $x->digit($y); ok 2647 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("5"); $x->digit($y); ok 2648 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("-1"); $x->digit($y); ok 2649 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("-2"); $x->digit($y); ok 2650 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("-3"); $x->digit($y); ok 2651 - $x = Math::BigInt::Subclass->new("100000"); $y = Math::BigInt::Subclass->new("-3"); $x->digit($y); ok 2652 - $x = Math::BigInt::Subclass->new("100000"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2653 - $x = Math::BigInt::Subclass->new("100000"); $y = Math::BigInt::Subclass->new("1"); $x->digit($y); ok 2654 - $x = Math::BigInt::Subclass->new("abc"); $x = $x->mantissa()->bstr(); ok 2655 - $x = Math::BigInt::Subclass->new("1e4"); $x = $x->mantissa()->bstr(); ok 2656 - $x = Math::BigInt::Subclass->new("2e0"); $x = $x->mantissa()->bstr(); ok 2657 - $x = Math::BigInt::Subclass->new("123"); $x = $x->mantissa()->bstr(); ok 2658 - $x = Math::BigInt::Subclass->new("-1"); $x = $x->mantissa()->bstr(); ok 2659 - $x = Math::BigInt::Subclass->new("-2"); $x = $x->mantissa()->bstr(); ok 2660 - $x = Math::BigInt::Subclass->new("+inf"); $x = $x->mantissa()->bstr(); ok 2661 - $x = Math::BigInt::Subclass->new("-inf"); $x = $x->mantissa()->bstr(); ok 2662 - $x = Math::BigInt::Subclass->new("abc"); $x = $x->exponent()->bstr(); ok 2663 - $x = Math::BigInt::Subclass->new("1e4"); $x = $x->exponent()->bstr(); ok 2664 - $x = Math::BigInt::Subclass->new("2e0"); $x = $x->exponent()->bstr(); ok 2665 - $x = Math::BigInt::Subclass->new("123"); $x = $x->exponent()->bstr(); ok 2666 - $x = Math::BigInt::Subclass->new("-1"); $x = $x->exponent()->bstr(); ok 2667 - $x = Math::BigInt::Subclass->new("-2"); $x = $x->exponent()->bstr(); ok 2668 - $x = Math::BigInt::Subclass->new("0"); $x = $x->exponent()->bstr(); ok 2669 - $x = Math::BigInt::Subclass->new("+inf"); $x = $x->exponent()->bstr(); ok 2670 - $x = Math::BigInt::Subclass->new("-inf"); $x = $x->exponent()->bstr(); ok 2671 - $x = Math::BigInt::Subclass->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 2672 - $x = Math::BigInt::Subclass->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 2673 - $x = Math::BigInt::Subclass->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 2674 - $x = Math::BigInt::Subclass->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 2675 - $x = Math::BigInt::Subclass->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 2676 - $x = Math::BigInt::Subclass->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 2677 - $x = Math::BigInt::Subclass->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 2678 - $x = Math::BigInt::Subclass->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 2679 - $x = Math::BigInt::Subclass->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 2680 - $x = Math::BigInt::Subclass->new("-1"); $x->bfac(); ok 2681 - is a valid object ok 2682 - $x = Math::BigInt::Subclass->new("NaNfac"); $x->bfac(); ok 2683 - is a valid object ok 2684 - $x = Math::BigInt::Subclass->new("+inf"); $x->bfac(); ok 2685 - is a valid object ok 2686 - $x = Math::BigInt::Subclass->new("-inf"); $x->bfac(); ok 2687 - is a valid object ok 2688 - $x = Math::BigInt::Subclass->new("0"); $x->bfac(); ok 2689 - is a valid object ok 2690 - $x = Math::BigInt::Subclass->new("1"); $x->bfac(); ok 2691 - is a valid object ok 2692 - $x = Math::BigInt::Subclass->new("2"); $x->bfac(); ok 2693 - is a valid object ok 2694 - $x = Math::BigInt::Subclass->new("3"); $x->bfac(); ok 2695 - is a valid object ok 2696 - $x = Math::BigInt::Subclass->new("4"); $x->bfac(); ok 2697 - is a valid object ok 2698 - $x = Math::BigInt::Subclass->new("5"); $x->bfac(); ok 2699 - is a valid object ok 2700 - $x = Math::BigInt::Subclass->new("6"); $x->bfac(); ok 2701 - is a valid object ok 2702 - $x = Math::BigInt::Subclass->new("7"); $x->bfac(); ok 2703 - is a valid object ok 2704 - $x = Math::BigInt::Subclass->new("8"); $x->bfac(); ok 2705 - is a valid object ok 2706 - $x = Math::BigInt::Subclass->new("9"); $x->bfac(); ok 2707 - is a valid object ok 2708 - $x = Math::BigInt::Subclass->new("10"); $x->bfac(); ok 2709 - is a valid object ok 2710 - $x = Math::BigInt::Subclass->new("11"); $x->bfac(); ok 2711 - is a valid object ok 2712 - $x = Math::BigInt::Subclass->new("12"); $x->bfac(); ok 2713 - is a valid object ok 2714 - $x = Math::BigInt::Subclass->new("20"); $x->bfac(); ok 2715 - is a valid object ok 2716 - $x = Math::BigInt::Subclass->new("22"); $x->bfac(); ok 2717 - is a valid object ok 2718 - $x = Math::BigInt::Subclass->new("69"); $x->bfac(); ok 2719 - is a valid object ok 2720 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("12"); $x ** $y; ok 2721 - is a valid object ok 2722 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("abc"); $x ** $y; ok 2723 - is a valid object ok 2724 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 2725 - is a valid object ok 2726 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 2727 - is a valid object ok 2728 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2729 - is a valid object ok 2730 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 2731 - is a valid object ok 2732 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 2733 - is a valid object ok 2734 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 2735 - is a valid object ok 2736 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 2737 - is a valid object ok 2738 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2739 - is a valid object ok 2740 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 2741 - is a valid object ok 2742 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 2743 - is a valid object ok 2744 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 2745 - is a valid object ok 2746 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 2747 - is a valid object ok 2748 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 2749 - is a valid object ok 2750 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 2751 - is a valid object ok 2752 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2753 - is a valid object ok 2754 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 2755 - is a valid object ok 2756 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 2757 - is a valid object ok 2758 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2759 - is a valid object ok 2760 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 2761 - is a valid object ok 2762 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $x ** $y; ok 2763 - is a valid object ok 2764 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("5"); $x ** $y; ok 2765 - is a valid object ok 2766 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 2767 - is a valid object ok 2768 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 2769 - is a valid object ok 2770 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 2771 - is a valid object ok 2772 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 2773 - is a valid object ok 2774 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("1234500012"); $x ** $y; ok 2775 - is a valid object ok 2776 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1234500012"); $x ** $y; ok 2777 - is a valid object ok 2778 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1234500013"); $x ** $y; ok 2779 - is a valid object ok 2780 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-12345000123"); $x ** $y; ok 2781 - is a valid object ok 2782 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-12345000123"); $x ** $y; ok 2783 - is a valid object ok 2784 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2785 - is a valid object ok 2786 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 2787 - is a valid object ok 2788 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 2789 - is a valid object ok 2790 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 2791 - is a valid object ok 2792 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 2793 - is a valid object ok 2794 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 2795 - is a valid object ok 2796 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 2797 - is a valid object ok 2798 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 2799 - is a valid object ok 2800 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 2801 - is a valid object ok 2802 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 2803 - is a valid object ok 2804 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 2805 - is a valid object ok 2806 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 2807 - is a valid object ok 2808 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 2809 - is a valid object ok 2810 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 2811 - is a valid object ok 2812 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 2813 - is a valid object ok 2814 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 2815 - is a valid object ok 2816 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 2817 - is a valid object ok 2818 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 2819 - is a valid object ok 2820 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 2821 - is a valid object ok 2822 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 2823 - is a valid object ok 2824 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 2825 - is a valid object ok 2826 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 2827 - is a valid object ok 2828 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2829 - is a valid object ok 2830 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 2831 - is a valid object ok 2832 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $x ** $y; ok 2833 - is a valid object ok 2834 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("5"); $x ** $y; ok 2835 - is a valid object ok 2836 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 2837 - is a valid object ok 2838 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 2839 - is a valid object ok 2840 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 2841 - is a valid object ok 2842 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-4"); $x ** $y; ok 2843 - is a valid object ok 2844 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2845 - is a valid object ok 2846 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 2847 - is a valid object ok 2848 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("4"); $x ** $y; ok 2849 - is a valid object ok 2850 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("5"); $x ** $y; ok 2851 - is a valid object ok 2852 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("6"); $x ** $y; ok 2853 - is a valid object ok 2854 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("7"); $x ** $y; ok 2855 - is a valid object ok 2856 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("8"); $x ** $y; ok 2857 - is a valid object ok 2858 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("9"); $x ** $y; ok 2859 - is a valid object ok 2860 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("20"); $x ** $y; ok 2861 - is a valid object ok 2862 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2863 - is a valid object ok 2864 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2865 - is a valid object ok 2866 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 2867 - is a valid object ok 2868 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $x ** $y; ok 2869 - is a valid object ok 2870 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("5"); $x ** $y; ok 2871 - is a valid object ok 2872 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 2873 - is a valid object ok 2874 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 2875 - is a valid object ok 2876 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("4"); $x ** $y; ok 2877 - is a valid object ok 2878 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("5"); $x ** $y; ok 2879 - is a valid object ok 2880 - $x = Math::BigInt::Subclass->new("100"); $x->length(); ok 2881 - $x = Math::BigInt::Subclass->new("10"); $x->length(); ok 2882 - $x = Math::BigInt::Subclass->new("1"); $x->length(); ok 2883 - $x = Math::BigInt::Subclass->new("0"); $x->length(); ok 2884 - $x = Math::BigInt::Subclass->new("12345"); $x->length(); ok 2885 - $x = Math::BigInt::Subclass->new("10000000000000000"); $x->length(); ok 2886 - $x = Math::BigInt::Subclass->new("-123"); $x->length(); ok 2887 - $x = Math::BigInt::Subclass->new("215960156869840440586892398248"); $x->length(); ok 2888 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2889 - is a valid object ok 2890 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2891 - is a valid object ok 2892 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2893 - is a valid object ok 2894 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2895 - is a valid object ok 2896 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2897 - is a valid object ok 2898 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2899 - is a valid object ok 2900 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2901 - is a valid object ok 2902 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2903 - is a valid object ok 2904 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2905 - is a valid object ok 2906 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2907 - is a valid object ok 2908 - $x = Math::BigInt::Subclass->new("16"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2909 - is a valid object ok 2910 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2911 - is a valid object ok 2912 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2913 - is a valid object ok 2914 - $x = Math::BigInt::Subclass->new("15241"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2915 - is a valid object ok 2916 - $x = Math::BigInt::Subclass->new("144"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2917 - is a valid object ok 2918 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2919 - is a valid object ok 2920 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 2921 - is a valid object ok 2922 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 2923 - is a valid object ok 2924 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 2925 - is a valid object ok 2926 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 2927 - is a valid object ok 2928 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 2929 - is a valid object ok 2930 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 2931 - is a valid object ok 2932 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 2933 - is a valid object ok 2934 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x->broot($y); ok 2935 - is a valid object ok 2936 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x->broot($y); ok 2937 - is a valid object ok 2938 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("-inf"); $x->broot($y); ok 2939 - is a valid object ok 2940 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("inf"); $x->broot($y); ok 2941 - is a valid object ok 2942 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 2943 - is a valid object ok 2944 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 2945 - is a valid object ok 2946 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 2947 - is a valid object ok 2948 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 2949 - is a valid object ok 2950 - $x = Math::BigInt::Subclass->new("-123.45"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 2951 - is a valid object ok 2952 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 2953 - is a valid object ok 2954 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("1"); $x->broot($y); ok 2955 - is a valid object ok 2956 - $x = Math::BigInt::Subclass->new("-12"); $y = Math::BigInt::Subclass->new("1"); $x->broot($y); ok 2957 - is a valid object ok 2958 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("-1"); $x->broot($y); ok 2959 - is a valid object ok 2960 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("-1"); $x->broot($y); ok 2961 - is a valid object ok 2962 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("3"); $x->broot($y); ok 2963 - is a valid object ok 2964 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("3"); $x->broot($y); ok 2965 - is a valid object ok 2966 - $x = Math::BigInt::Subclass->new("16"); $y = Math::BigInt::Subclass->new("4"); $x->broot($y); ok 2967 - is a valid object ok 2968 - $x = Math::BigInt::Subclass->new("81"); $y = Math::BigInt::Subclass->new("4"); $x->broot($y); ok 2969 - is a valid object ok 2970 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("4"); $x->broot($y); ok 2971 - is a valid object ok 2972 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("8"); $x->broot($y); ok 2973 - is a valid object ok 2974 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("16"); $x->broot($y); ok 2975 - is a valid object ok 2976 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("32"); $x->broot($y); ok 2977 - is a valid object ok 2978 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("64"); $x->broot($y); ok 2979 - is a valid object ok 2980 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("128"); $x->broot($y); ok 2981 - is a valid object ok 2982 - $x = Math::BigInt::Subclass->new("84274086103068221283760416414557757"); $y = Math::BigInt::Subclass->new("15"); $x->broot($y); ok 2983 - is a valid object ok 2984 - $x = Math::BigInt::Subclass->new("145"); $x->bsqrt(); ok 2985 - is a valid object ok 2986 - $x = Math::BigInt::Subclass->new("144"); $x->bsqrt(); ok 2987 - is a valid object ok 2988 - $x = Math::BigInt::Subclass->new("143"); $x->bsqrt(); ok 2989 - is a valid object ok 2990 - $x = Math::BigInt::Subclass->new("16"); $x->bsqrt(); ok 2991 - is a valid object ok 2992 - $x = Math::BigInt::Subclass->new("170"); $x->bsqrt(); ok 2993 - is a valid object ok 2994 - $x = Math::BigInt::Subclass->new("169"); $x->bsqrt(); ok 2995 - is a valid object ok 2996 - $x = Math::BigInt::Subclass->new("168"); $x->bsqrt(); ok 2997 - is a valid object ok 2998 - $x = Math::BigInt::Subclass->new("4"); $x->bsqrt(); ok 2999 - is a valid object ok 3000 - $x = Math::BigInt::Subclass->new("3"); $x->bsqrt(); ok 3001 - is a valid object ok 3002 - $x = Math::BigInt::Subclass->new("2"); $x->bsqrt(); ok 3003 - is a valid object ok 3004 - $x = Math::BigInt::Subclass->new("9"); $x->bsqrt(); ok 3005 - is a valid object ok 3006 - $x = Math::BigInt::Subclass->new("12"); $x->bsqrt(); ok 3007 - is a valid object ok 3008 - $x = Math::BigInt::Subclass->new("256"); $x->bsqrt(); ok 3009 - is a valid object ok 3010 - $x = Math::BigInt::Subclass->new("100000000"); $x->bsqrt(); ok 3011 - is a valid object ok 3012 - $x = Math::BigInt::Subclass->new("4000000000000"); $x->bsqrt(); ok 3013 - is a valid object ok 3014 - $x = Math::BigInt::Subclass->new("152399026"); $x->bsqrt(); ok 3015 - is a valid object ok 3016 - $x = Math::BigInt::Subclass->new("152399025"); $x->bsqrt(); ok 3017 - is a valid object ok 3018 - $x = Math::BigInt::Subclass->new("152399024"); $x->bsqrt(); ok 3019 - is a valid object ok 3020 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $x->bsqrt(); ok 3021 - is a valid object ok 3022 - $x = Math::BigInt::Subclass->new("84274086103068221283760416414557757"); $x->bsqrt(); ok 3023 - is a valid object ok 3024 - $x = Math::BigInt::Subclass->new("1"); $x->bsqrt(); ok 3025 - is a valid object ok 3026 - $x = Math::BigInt::Subclass->new("0"); $x->bsqrt(); ok 3027 - is a valid object ok 3028 - $x = Math::BigInt::Subclass->new("-2"); $x->bsqrt(); ok 3029 - is a valid object ok 3030 - $x = Math::BigInt::Subclass->new("-123"); $x->bsqrt(); ok 3031 - is a valid object ok 3032 - $x = Math::BigInt::Subclass->new("Nan"); $x->bsqrt(); ok 3033 - is a valid object ok 3034 - $x = Math::BigInt::Subclass->new("+inf"); $x->bsqrt(); ok 3035 - is a valid object ok 3036 - $x = Math::BigInt::Subclass->new("-inf"); $x->bsqrt(); ok 3037 - is a valid object ok 3038 - $x = Math::BigInt::Subclass->new("NaN"); $x->bexp(); ok 3039 - is a valid object ok 3040 - $x = Math::BigInt::Subclass->new("inf"); $x->bexp(); ok 3041 - is a valid object ok 3042 - $x = Math::BigInt::Subclass->new("1"); $x->bexp(); ok 3043 - is a valid object ok 3044 - $x = Math::BigInt::Subclass->new("2"); $x->bexp(); ok 3045 - is a valid object ok 3046 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3047 - is a valid object ok 3048 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $x->batan2($y); ok 3049 - is a valid object ok 3050 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $x->batan2($y); ok 3051 - is a valid object ok 3052 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3053 - is a valid object ok 3054 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3055 - is a valid object ok 3056 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3057 - is a valid object ok 3058 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3059 - is a valid object ok 3060 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3061 - is a valid object ok 3062 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x->batan2($y); ok 3063 - is a valid object ok 3064 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3065 - is a valid object ok 3066 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3067 - is a valid object ok 3068 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->batan2($y); ok 3069 - is a valid object ok 3070 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->batan2($y); ok 3071 - is a valid object ok 3072 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->batan2($y); ok 3073 - is a valid object ok 3074 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->batan2($y); ok 3075 - is a valid object ok 3076 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3077 - is a valid object ok 3078 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3079 - is a valid object ok 3080 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $x->batan2($y); ok 3081 - is a valid object ok 3082 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3083 - is a valid object ok 3084 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3085 - is a valid object ok 3086 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3087 - is a valid object ok 3088 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3089 - is a valid object ok 3090 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3091 - is a valid object ok 3092 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("5"); $x->batan2($y); ok 3093 - is a valid object ok 3094 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->batan2($y); ok 3095 - is a valid object ok 3096 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("8"); $x->batan2($y); ok 3097 - is a valid object ok 3098 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("8"); $x->batan2($y); ok 3099 - is a valid object ok 3100 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3101 - is a valid object ok 3102 - $x = Math::BigInt::Subclass->new("77"); Math::BigInt::Subclass->bpi($x); ok 3103 - is a valid object ok 3104 - $x = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass->bpi($x); ok 3105 - is a valid object ok 3106 - $x = Math::BigInt::Subclass->new("11"); Math::BigInt::Subclass->bpi($x); ok 3107 - is a valid object ok 3108 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("10"); $x->bnok($y); ok 3109 - is a valid object ok 3110 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $x->bnok($y); ok 3111 - is a valid object ok 3112 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $x->bnok($y); ok 3113 - is a valid object ok 3114 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $x->bnok($y); ok 3115 - is a valid object ok 3116 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->bnok($y); ok 3117 - is a valid object ok 3118 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x->bnok($y); ok 3119 - is a valid object ok 3120 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x->bnok($y); ok 3121 - is a valid object ok 3122 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $x->bnok($y); ok 3123 - is a valid object ok 3124 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("3"); $x->bnok($y); ok 3125 - is a valid object ok 3126 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("6"); $x->bnok($y); ok 3127 - is a valid object ok 3128 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("90"); $x->bnok($y); ok 3129 - is a valid object ok 3130 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("95"); $x->bnok($y); ok 3131 - is a valid object ok 3132 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $x->bnok($y); ok 3133 - is a valid object ok 3134 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("0"); $x->bnok($y); ok 3135 - is a valid object ok 3136 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x->bnok($y); ok 3137 - is a valid object ok 3138 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3139 - is a valid object ok 3140 - $x = Math::BigInt::Subclass->new("NaNbround"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3141 - is a valid object ok 3142 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3143 - is a valid object ok 3144 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3145 - is a valid object ok 3146 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3147 - is a valid object ok 3148 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("2"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3149 - is a valid object ok 3150 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3151 - is a valid object ok 3152 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3153 - is a valid object ok 3154 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3155 - is a valid object ok 3156 - $x = Math::BigInt::Subclass->new("+10123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3157 - is a valid object ok 3158 - $x = Math::BigInt::Subclass->new("-10123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3159 - is a valid object ok 3160 - $x = Math::BigInt::Subclass->new("+10123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3161 - is a valid object ok 3162 - $x = Math::BigInt::Subclass->new("-10123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3163 - is a valid object ok 3164 - $x = Math::BigInt::Subclass->new("+101234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3165 - is a valid object ok 3166 - $x = Math::BigInt::Subclass->new("-101234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3167 - is a valid object ok 3168 - $x = Math::BigInt::Subclass->new("+20123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3169 - is a valid object ok 3170 - $x = Math::BigInt::Subclass->new("-20123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3171 - is a valid object ok 3172 - $x = Math::BigInt::Subclass->new("+20123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3173 - is a valid object ok 3174 - $x = Math::BigInt::Subclass->new("-20123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3175 - is a valid object ok 3176 - $x = Math::BigInt::Subclass->new("+201234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3177 - is a valid object ok 3178 - $x = Math::BigInt::Subclass->new("-201234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3179 - is a valid object ok 3180 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3181 - is a valid object ok 3182 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3183 - is a valid object ok 3184 - $x = Math::BigInt::Subclass->new("+30123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3185 - is a valid object ok 3186 - $x = Math::BigInt::Subclass->new("-30123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3187 - is a valid object ok 3188 - $x = Math::BigInt::Subclass->new("+30123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3189 - is a valid object ok 3190 - $x = Math::BigInt::Subclass->new("-30123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3191 - is a valid object ok 3192 - $x = Math::BigInt::Subclass->new("+301234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3193 - is a valid object ok 3194 - $x = Math::BigInt::Subclass->new("-301234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3195 - is a valid object ok 3196 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3197 - is a valid object ok 3198 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3199 - is a valid object ok 3200 - $x = Math::BigInt::Subclass->new("+40123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3201 - is a valid object ok 3202 - $x = Math::BigInt::Subclass->new("-40123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3203 - is a valid object ok 3204 - $x = Math::BigInt::Subclass->new("+40123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3205 - is a valid object ok 3206 - $x = Math::BigInt::Subclass->new("-40123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3207 - is a valid object ok 3208 - $x = Math::BigInt::Subclass->new("+401234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3209 - is a valid object ok 3210 - $x = Math::BigInt::Subclass->new("+401234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3211 - is a valid object ok 3212 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3213 - is a valid object ok 3214 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3215 - is a valid object ok 3216 - $x = Math::BigInt::Subclass->new("+50123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3217 - is a valid object ok 3218 - $x = Math::BigInt::Subclass->new("-50123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3219 - is a valid object ok 3220 - $x = Math::BigInt::Subclass->new("+50123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3221 - is a valid object ok 3222 - $x = Math::BigInt::Subclass->new("-50123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3223 - is a valid object ok 3224 - $x = Math::BigInt::Subclass->new("+501234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3225 - is a valid object ok 3226 - $x = Math::BigInt::Subclass->new("-501234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3227 - is a valid object ok 3228 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3229 - is a valid object ok 3230 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3231 - is a valid object ok 3232 - $x = Math::BigInt::Subclass->new("+60123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3233 - is a valid object ok 3234 - $x = Math::BigInt::Subclass->new("-60123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3235 - is a valid object ok 3236 - $x = Math::BigInt::Subclass->new("+60123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3237 - is a valid object ok 3238 - $x = Math::BigInt::Subclass->new("-60123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3239 - is a valid object ok 3240 - $x = Math::BigInt::Subclass->new("+601234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3241 - is a valid object ok 3242 - $x = Math::BigInt::Subclass->new("-601234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3243 - is a valid object ok 3244 - $x = Math::BigInt::Subclass->new("+1234567"); $y = Math::BigInt::Subclass->new("7"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3245 - is a valid object ok 3246 - $x = Math::BigInt::Subclass->new("+1234567"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3247 - is a valid object ok 3248 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3249 - is a valid object ok 3250 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3251 - is a valid object ok 3252 - $x = Math::BigInt::Subclass->new("+60123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3253 - is a valid object ok 3254 - $x = Math::BigInt::Subclass->new("+60123199999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3255 - is a valid object ok 3256 - $x = Math::BigInt::Subclass->new("+60123299999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3257 - is a valid object ok 3258 - $x = Math::BigInt::Subclass->new("+60123399999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3259 - is a valid object ok 3260 - $x = Math::BigInt::Subclass->new("+60123499999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3261 - is a valid object ok 3262 - $x = Math::BigInt::Subclass->new("+60123500000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3263 - is a valid object ok 3264 - $x = Math::BigInt::Subclass->new("+60123600000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3265 - is a valid object ok 3266 - $x = Math::BigInt::Subclass->new("+60123700000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3267 - is a valid object ok 3268 - $x = Math::BigInt::Subclass->new("+60123800000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3269 - is a valid object ok 3270 - $x = Math::BigInt::Subclass->new("+60123900000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3271 - is a valid object ok 3272 - $x = Math::BigInt::Subclass->new("-60123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3273 - is a valid object ok 3274 - $x = Math::BigInt::Subclass->new("-60123199999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3275 - is a valid object ok 3276 - $x = Math::BigInt::Subclass->new("-60123299999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3277 - is a valid object ok 3278 - $x = Math::BigInt::Subclass->new("-60123399999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3279 - is a valid object ok 3280 - $x = Math::BigInt::Subclass->new("-60123499999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3281 - is a valid object ok 3282 - $x = Math::BigInt::Subclass->new("-60123500000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3283 - is a valid object ok 3284 - $x = Math::BigInt::Subclass->new("-60123600000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3285 - is a valid object ok 3286 - $x = Math::BigInt::Subclass->new("-60123700000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3287 - is a valid object ok 3288 - $x = Math::BigInt::Subclass->new("-60123800000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3289 - is a valid object ok 3290 - $x = Math::BigInt::Subclass->new("-60123900000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3291 - is a valid object ok 3292 - $x = Math::BigInt::Subclass->new("0"); $x->is_zero() || 0; ok 3293 - $x = Math::BigInt::Subclass->new("NaNzero"); $x->is_zero() || 0; ok 3294 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_zero() || 0; ok 3295 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_zero() || 0; ok 3296 - $x = Math::BigInt::Subclass->new("123"); $x->is_zero() || 0; ok 3297 - $x = Math::BigInt::Subclass->new("-1"); $x->is_zero() || 0; ok 3298 - $x = Math::BigInt::Subclass->new("1"); $x->is_zero() || 0; ok 3299 - $x = Math::BigInt::Subclass->new("0"); $x->is_one() || 0; ok 3300 - $x = Math::BigInt::Subclass->new("NaNone"); $x->is_one() || 0; ok 3301 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_one() || 0; ok 3302 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_one() || 0; ok 3303 - $x = Math::BigInt::Subclass->new("1"); $x->is_one() || 0; ok 3304 - $x = Math::BigInt::Subclass->new("2"); $x->is_one() || 0; ok 3305 - $x = Math::BigInt::Subclass->new("-1"); $x->is_one() || 0; ok 3306 - $x = Math::BigInt::Subclass->new("-2"); $x->is_one() || 0; ok 3307 - $x = Math::BigInt::Subclass->new("0"); $x->bfloor(); ok 3308 - is a valid object ok 3309 - $x = Math::BigInt::Subclass->new("NaNfloor"); $x->bfloor(); ok 3310 - is a valid object ok 3311 - $x = Math::BigInt::Subclass->new("+inf"); $x->bfloor(); ok 3312 - is a valid object ok 3313 - $x = Math::BigInt::Subclass->new("-inf"); $x->bfloor(); ok 3314 - is a valid object ok 3315 - $x = Math::BigInt::Subclass->new("-1"); $x->bfloor(); ok 3316 - is a valid object ok 3317 - $x = Math::BigInt::Subclass->new("-2"); $x->bfloor(); ok 3318 - is a valid object ok 3319 - $x = Math::BigInt::Subclass->new("2"); $x->bfloor(); ok 3320 - is a valid object ok 3321 - $x = Math::BigInt::Subclass->new("3"); $x->bfloor(); ok 3322 - is a valid object ok 3323 - $x = Math::BigInt::Subclass->new("abc"); $x->bfloor(); ok 3324 - is a valid object ok 3325 - $x = Math::BigInt::Subclass->new("NaNceil"); $x->bceil(); ok 3326 - is a valid object ok 3327 - $x = Math::BigInt::Subclass->new("+inf"); $x->bceil(); ok 3328 - is a valid object ok 3329 - $x = Math::BigInt::Subclass->new("-inf"); $x->bceil(); ok 3330 - is a valid object ok 3331 - $x = Math::BigInt::Subclass->new("0"); $x->bceil(); ok 3332 - is a valid object ok 3333 - $x = Math::BigInt::Subclass->new("-1"); $x->bceil(); ok 3334 - is a valid object ok 3335 - $x = Math::BigInt::Subclass->new("-2"); $x->bceil(); ok 3336 - is a valid object ok 3337 - $x = Math::BigInt::Subclass->new("2"); $x->bceil(); ok 3338 - is a valid object ok 3339 - $x = Math::BigInt::Subclass->new("3"); $x->bceil(); ok 3340 - is a valid object ok 3341 - $x = Math::BigInt::Subclass->new("abc"); $x->bceil(); ok 3342 - is a valid object ok 3343 - $x = Math::BigInt::Subclass->new("NaN"); $x->bint(); ok 3344 - is a valid object ok 3345 - $x = Math::BigInt::Subclass->new("+inf"); $x->bint(); ok 3346 - is a valid object ok 3347 - $x = Math::BigInt::Subclass->new("-inf"); $x->bint(); ok 3348 - is a valid object ok 3349 - $x = Math::BigInt::Subclass->new("0"); $x->bint(); ok 3350 - is a valid object ok 3351 - $x = Math::BigInt::Subclass->new("-1"); $x->bint(); ok 3352 - is a valid object ok 3353 - $x = Math::BigInt::Subclass->new("-2"); $x->bint(); ok 3354 - is a valid object ok 3355 - $x = Math::BigInt::Subclass->new("2"); $x->bint(); ok 3356 - is a valid object ok 3357 - $x = Math::BigInt::Subclass->new("3"); $x->bint(); ok 3358 - is a valid object ok 3359 - $x = Math::BigInt::Subclass->new("128"); $x->as_hex(); ok 3360 - $x = Math::BigInt::Subclass->new("-128"); $x->as_hex(); ok 3361 - $x = Math::BigInt::Subclass->new("0"); $x->as_hex(); ok 3362 - $x = Math::BigInt::Subclass->new("-0"); $x->as_hex(); ok 3363 - $x = Math::BigInt::Subclass->new("1"); $x->as_hex(); ok 3364 - $x = Math::BigInt::Subclass->new("0x123456789123456789"); $x->as_hex(); ok 3365 - $x = Math::BigInt::Subclass->new("+inf"); $x->as_hex(); ok 3366 - $x = Math::BigInt::Subclass->new("-inf"); $x->as_hex(); ok 3367 - $x = Math::BigInt::Subclass->new("NaNas_hex"); $x->as_hex(); ok 3368 - $x = Math::BigInt::Subclass->new("128"); $x->as_bin(); ok 3369 - $x = Math::BigInt::Subclass->new("-128"); $x->as_bin(); ok 3370 - $x = Math::BigInt::Subclass->new("0"); $x->as_bin(); ok 3371 - $x = Math::BigInt::Subclass->new("-0"); $x->as_bin(); ok 3372 - $x = Math::BigInt::Subclass->new("1"); $x->as_bin(); ok 3373 - $x = Math::BigInt::Subclass->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 3374 - $x = Math::BigInt::Subclass->new("0x123456789123456789"); $x->as_bin(); ok 3375 - $x = Math::BigInt::Subclass->new("+inf"); $x->as_bin(); ok 3376 - $x = Math::BigInt::Subclass->new("-inf"); $x->as_bin(); ok 3377 - $x = Math::BigInt::Subclass->new("NaNas_bin"); $x->as_bin(); ok 3378 - $x = Math::BigInt::Subclass->new("128"); $x->as_oct(); ok 3379 - $x = Math::BigInt::Subclass->new("-128"); $x->as_oct(); ok 3380 - $x = Math::BigInt::Subclass->new("0"); $x->as_oct(); ok 3381 - $x = Math::BigInt::Subclass->new("-0"); $x->as_oct(); ok 3382 - $x = Math::BigInt::Subclass->new("1"); $x->as_oct(); ok 3383 - $x = Math::BigInt::Subclass->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 3384 - $x = Math::BigInt::Subclass->new("0x123456789123456789"); $x->as_oct(); ok 3385 - $x = Math::BigInt::Subclass->new("+inf"); $x->as_oct(); ok 3386 - $x = Math::BigInt::Subclass->new("-inf"); $x->as_oct(); ok 3387 - $x = Math::BigInt::Subclass->new("NaNas_oct"); $x->as_oct(); ok 3388 - $x = Math::BigInt::Subclass->new("-1"); $x = log($x); ok 3389 - is a valid object ok 3390 - $x = Math::BigInt::Subclass->new("0"); $x = log($x); ok 3391 - is a valid object ok 3392 - $x = Math::BigInt::Subclass->new("1"); $x = log($x); ok 3393 - is a valid object ok 3394 - $x = Math::BigInt::Subclass->new("2"); $x = log($x); ok 3395 - is a valid object ok 3396 - $x = Math::BigInt::Subclass->new("3"); $x = log($x); ok 3397 - is a valid object ok 3398 - $x = Math::BigInt::Subclass->new("123456789"); $x = log($x); ok 3399 - is a valid object ok 3400 - $x = Math::BigInt::Subclass->new("1234567890987654321"); $x = log($x); ok 3401 - is a valid object ok 3402 - $x = Math::BigInt::Subclass->new("-inf"); $x = log($x); ok 3403 - is a valid object ok 3404 - $x = Math::BigInt::Subclass->new("inf"); $x = log($x); ok 3405 - is a valid object ok 3406 - $x = Math::BigInt::Subclass->new("NaN"); $x = log($x); ok 3407 - is a valid object ok 3408 - $x = Math::BigInt::Subclass->new("4294967296"); $a = $x->bmul($x); ok 3409 - $x = Math::BigInt::Subclass->new(10); $a = $x->bpow($x); ok 3410 - $z = $x & $y; $x ok 3411 - $z = $x & $y; $y ok 3412 - $z = $x & $y; $z ok 3413 - $z = $x | $y; $x ok 3414 - $z = $x | $y; $y ok 3415 - $z = $x | $y; $z ok 3416 - $z = $x | $y; $x ok 3417 - $z = $x | $y; $y ok 3418 - $z = $x | $y; $z ok 3419 - $z = $x ^ $y; $x ok 3420 - $z = $x ^ $y; $y ok 3421 - $z = $x ^ $y; $z ok 3422 - $y = -$x; $x ok 3423 - $y = abs($x); $x ok 3424 - $x->copy()->bmodpow($y, $z); $u ok 3425 - $x->copy()->bmodpow($y, $z); $y ok 3426 - $x->copy()->bmodpow($y, $z); $z ok 3427 - $y = -$x; $x ok 3428 - $y = -$x; $y ok 3429 - $y = $x->copy()->bneg(); $x ok 3430 - $y = $x->copy()->bneg(); $y ok 3431 - $x->bmul($y); $x ok 3432 - $x->bmul($y); $y ok 3433 - $x->badd($y); $x ok 3434 - $x->badd($y); $y ok 3435 - $x->bsub($y); $x ok 3436 - $x->bsub($y); $y ok 3437 - $x->bdiv($y); $x ok 3438 - $x->bdiv($y); $y ok 3439 - $x->bmod($y); $x ok 3440 - $x->bmod($y); $y ok 3441 - $x->bmul($y); $x ok 3442 - $x->bmul($y); $y ok 3443 - $x->badd($y); $x ok 3444 - $x->badd($y); $y ok 3445 - $x->bsub($y); $x ok 3446 - $x->bsub($y); $y ok 3447 - $x->bdiv($y); $x ok 3448 - $x->bdiv($y); $y ok 3449 - $x->bmod($y); $x ok 3450 - $x->bmod($y); $y ok 3451 - $x->bmul($y); $x ok 3452 - $x->bmul($y); $y ok 3453 - $x->badd($y); $x ok 3454 - $x->badd($y); $y ok 3455 - $x->bsub($y); $x ok 3456 - $x->bsub($y); $y ok 3457 - $x->bdiv($y); $x ok 3458 - $x->bdiv($y); $y ok 3459 - $x->bmod($y); $x ok 3460 - $x->bmod($y); $y ok 3461 - overloading cmp works ok 3462 - $x = Math::BigInt::Subclass->new(10); $x = 2 ** $x; $x == 1024; ok 3463 - $x = Math::BigInt::Subclass->new(10); $x = 2 * $x; $x == 20; ok 3464 - $x = Math::BigInt::Subclass->new(10); $x = 2 + $x; $x == 12; ok 3465 - $x = Math::BigInt::Subclass->new(10); $x = 2 - $x; $x == -8; ok 3466 - $x = Math::BigInt::Subclass->new(10); $x = 20 / $x; $x == 2; ok 3467 - $x = Math::BigInt::Subclass->new(3); $x = 20 % $x; $x == 2; ok 3468 - $x = Math::BigInt::Subclass->new(7); $x = 20 & $x; $x == 4; ok 3469 - $x = Math::BigInt::Subclass->new(7); $x = 0x20 | $x; $x == 0x27; ok 3470 - $x = Math::BigInt::Subclass->new(7); $x = 0x20 ^ $x; $x == 0x27; ok 3471 - $x = Math::BigInt::Subclass->badd(4, 5); $x == 9; ok 3472 - $x = Math::BigInt::Subclass->new(1); $x is true ok 3473 - $x = Math::BigInt::Subclass->new(0); !$x is false ok 3474 - objectify(2, 4, 5) gives Math::BigInt::Subclass, 4, 5 ok 3475 - first arg matches /^Math::BigInt/ ok 3476 - second arg is 4 ok 3477 - third arg is 5 ok 3478 - objectify(0, 4, 5) gives Math::BigInt::Subclass, 4, 5 ok 3479 - first arg matches /^Math::BigInt/ ok 3480 - second arg is 4 ok 3481 - third arg is 5 ok 3482 - objectify(2, 4, 5) gives Math::BigInt::Subclass, 4, 5 ok 3483 - first arg matches /^Math::BigInt/ ok 3484 - second arg is 4 ok 3485 - third arg is 5 ok 3486 - objectify(2, 4, 5, 6, 7) gives Math::BigInt::Subclass, 4, 5, 6, 7 ok 3487 - first arg matches /^Math::BigInt/ ok 3488 - second arg is 4 ok 3489 - second arg is a Math::BigInt object ok 3490 - third arg is 5 ok 3491 - third arg is a Math::BigInt object ok 3492 - fourth arg is 6 ok 3493 - fourth arg is a scalar ok 3494 - fifth arg is 7 ok 3495 - fifth arg is a scalar ok 3496 - objectify(2, Math::BigInt::Subclass, 4, 5, 6, 7) gives Math::BigInt::Subclass, 4, 5, 6, 7 ok 3497 - first arg is Math::BigInt::Subclass ok 3498 - second arg is 4 ok 3499 - second arg is a Math::BigInt::Subclass object ok 3500 - third arg is 5 ok 3501 - third arg is a Math::BigInt::Subclass object ok 3502 - fourth arg is 6 ok 3503 - fourth arg is a scalar ok 3504 - fifth arg is 7 ok 3505 - fifth arg is a scalar ok 3506 - Math::BigInt::Subclass->new(123)->badd(123) = 246 ok 3507 - Math::BigInt::Subclass->badd(123, 321) = 444 ok 3508 - Math::BigInt::Subclass->badd(123, Math::BigInt::Subclass->new(321)) = 444 ok 3509 - Math::BigInt::Subclass->new(123)->bsub(122) = 1 ok 3510 - Math::BigInt::Subclass->bsub(321, 123) = 198 ok 3511 - Math::BigInt::Subclass->bsub(321, Math::BigInt::Subclass->new(123)) = 198 ok 3512 - Math::BigInt::Subclass->new(123)->bmul(123) = 15129 ok 3513 - Math::BigInt::Subclass->bmul(123, 123) = 15129 ok 3514 - Math::BigInt::Subclass->bmul(123, Math::BigInt::Subclass->new(123)) = 15129 ok 3515 - Math::BigInt::Subclass->new(15129)->bdiv(123) = 123 ok 3516 - Math::BigInt::Subclass->bdiv(15129, 123) = 123 ok 3517 - Math::BigInt::Subclass->bdiv(15129, Math::BigInt::Subclass->new(123)) = 123 ok 3518 - Math::BigInt::Subclass->new(15131)->bmod(123) = 2 ok 3519 - Math::BigInt::Subclass->bmod(15131, 123) = 2 ok 3520 - Math::BigInt::Subclass->bmod(15131, Math::BigInt::Subclass->new(123)) = 2 ok 3521 - Math::BigInt::Subclass->new(2)->bpow(16) = 65536 ok 3522 - Math::BigInt::Subclass->bpow(2, 16) = 65536 ok 3523 - Math::BigInt::Subclass->bpow(2, Math::BigInt::Subclass->new(16)) = 65536 ok 3524 - Math::BigInt::Subclass->new(2**15)->brsft(1) = 2**14 ok 3525 - Math::BigInt::Subclass->brsft(2**15, 1) = 2**14 ok 3526 - Math::BigInt::Subclass->brsft(2**15, Math::BigInt::Subclass->new(1)) = 2**14 ok 3527 - Math::BigInt::Subclass->new(2**13)->blsft(1) = 2**14 ok 3528 - Math::BigInt::Subclass->blsft(2**13, 1) = 2**14 ok 3529 - Math::BigInt::Subclass->blsft(2**13, Math::BigInt::Subclass->new(1)) = 2**14 ok 3530 - $x = Math::BigInt::Subclass->new(1.05e+015); $x->bsstr() = "105e+13" ok 3531 - $x = Math::BigInt::Subclass->new(1e+129); $x->bsstr() = "1e+129" ok 3532 - Math::BigInt::Subclass->new("1") = 1 ok 3533 - Math::BigInt::Subclass->new(" 1") = 1 ok 3534 - Math::BigInt::Subclass->new("1 ") = 1 ok 3535 - Math::BigInt::Subclass->new(" 1 ") = 1 ok 3536 - Math::BigInt::Subclass->new("\n1") = 1 ok 3537 - Math::BigInt::Subclass->new("1\n") = 1 ok 3538 - Math::BigInt::Subclass->new("\n1\n") = 1 ok 3539 - Math::BigInt::Subclass->new(" \n1\n") = 1 ok 3540 - Math::BigInt::Subclass->new(" \n1 \n") = 1 ok 3541 - Math::BigInt::Subclass->new(" \n1\n ") = 1 ok 3542 - Math::BigInt::Subclass->new(" \n1\n1") = 'NaN' ok 3543 - Math::BigInt::Subclass->new("1 \n1\n1") = 'NaN' ok 3544 - Math::BigInt::Subclass->new("12") = 12 ok 3545 - Math::BigInt::Subclass->new(" 12") = 12 ok 3546 - Math::BigInt::Subclass->new("12 ") = 12 ok 3547 - Math::BigInt::Subclass->new(" 12 ") = 12 ok 3548 - Math::BigInt::Subclass->new("\n12") = 12 ok 3549 - Math::BigInt::Subclass->new("12\n") = 12 ok 3550 - Math::BigInt::Subclass->new("\n12\n") = 12 ok 3551 - Math::BigInt::Subclass->new(" \n12\n") = 12 ok 3552 - Math::BigInt::Subclass->new(" \n12 \n") = 12 ok 3553 - Math::BigInt::Subclass->new(" \n12\n ") = 12 ok 3554 - Math::BigInt::Subclass->new(" \n12\n1") = 'NaN' ok 3555 - Math::BigInt::Subclass->new("1 \n12\n1") = 'NaN' ok 3556 - Math::BigInt::Subclass->new("123") = 123 ok 3557 - Math::BigInt::Subclass->new(" 123") = 123 ok 3558 - Math::BigInt::Subclass->new("123 ") = 123 ok 3559 - Math::BigInt::Subclass->new(" 123 ") = 123 ok 3560 - Math::BigInt::Subclass->new("\n123") = 123 ok 3561 - Math::BigInt::Subclass->new("123\n") = 123 ok 3562 - Math::BigInt::Subclass->new("\n123\n") = 123 ok 3563 - Math::BigInt::Subclass->new(" \n123\n") = 123 ok 3564 - Math::BigInt::Subclass->new(" \n123 \n") = 123 ok 3565 - Math::BigInt::Subclass->new(" \n123\n ") = 123 ok 3566 - Math::BigInt::Subclass->new(" \n123\n1") = 'NaN' ok 3567 - Math::BigInt::Subclass->new("1 \n123\n1") = 'NaN' ok 3568 - Math::BigInt::Subclass->new("1234") = 1234 ok 3569 - Math::BigInt::Subclass->new(" 1234") = 1234 ok 3570 - Math::BigInt::Subclass->new("1234 ") = 1234 ok 3571 - Math::BigInt::Subclass->new(" 1234 ") = 1234 ok 3572 - Math::BigInt::Subclass->new("\n1234") = 1234 ok 3573 - Math::BigInt::Subclass->new("1234\n") = 1234 ok 3574 - Math::BigInt::Subclass->new("\n1234\n") = 1234 ok 3575 - Math::BigInt::Subclass->new(" \n1234\n") = 1234 ok 3576 - Math::BigInt::Subclass->new(" \n1234 \n") = 1234 ok 3577 - Math::BigInt::Subclass->new(" \n1234\n ") = 1234 ok 3578 - Math::BigInt::Subclass->new(" \n1234\n1") = 'NaN' ok 3579 - Math::BigInt::Subclass->new("1 \n1234\n1") = 'NaN' ok 3580 - Math::BigInt::Subclass->new("12345") = 12345 ok 3581 - Math::BigInt::Subclass->new(" 12345") = 12345 ok 3582 - Math::BigInt::Subclass->new("12345 ") = 12345 ok 3583 - Math::BigInt::Subclass->new(" 12345 ") = 12345 ok 3584 - Math::BigInt::Subclass->new("\n12345") = 12345 ok 3585 - Math::BigInt::Subclass->new("12345\n") = 12345 ok 3586 - Math::BigInt::Subclass->new("\n12345\n") = 12345 ok 3587 - Math::BigInt::Subclass->new(" \n12345\n") = 12345 ok 3588 - Math::BigInt::Subclass->new(" \n12345 \n") = 12345 ok 3589 - Math::BigInt::Subclass->new(" \n12345\n ") = 12345 ok 3590 - Math::BigInt::Subclass->new(" \n12345\n1") = 'NaN' ok 3591 - Math::BigInt::Subclass->new("1 \n12345\n1") = 'NaN' ok 3592 - Math::BigInt::Subclass->new("123456") = 123456 ok 3593 - Math::BigInt::Subclass->new(" 123456") = 123456 ok 3594 - Math::BigInt::Subclass->new("123456 ") = 123456 ok 3595 - Math::BigInt::Subclass->new(" 123456 ") = 123456 ok 3596 - Math::BigInt::Subclass->new("\n123456") = 123456 ok 3597 - Math::BigInt::Subclass->new("123456\n") = 123456 ok 3598 - Math::BigInt::Subclass->new("\n123456\n") = 123456 ok 3599 - Math::BigInt::Subclass->new(" \n123456\n") = 123456 ok 3600 - Math::BigInt::Subclass->new(" \n123456 \n") = 123456 ok 3601 - Math::BigInt::Subclass->new(" \n123456\n ") = 123456 ok 3602 - Math::BigInt::Subclass->new(" \n123456\n1") = 'NaN' ok 3603 - Math::BigInt::Subclass->new("1 \n123456\n1") = 'NaN' ok 3604 - Math::BigInt::Subclass->new("1234567") = 1234567 ok 3605 - Math::BigInt::Subclass->new(" 1234567") = 1234567 ok 3606 - Math::BigInt::Subclass->new("1234567 ") = 1234567 ok 3607 - Math::BigInt::Subclass->new(" 1234567 ") = 1234567 ok 3608 - Math::BigInt::Subclass->new("\n1234567") = 1234567 ok 3609 - Math::BigInt::Subclass->new("1234567\n") = 1234567 ok 3610 - Math::BigInt::Subclass->new("\n1234567\n") = 1234567 ok 3611 - Math::BigInt::Subclass->new(" \n1234567\n") = 1234567 ok 3612 - Math::BigInt::Subclass->new(" \n1234567 \n") = 1234567 ok 3613 - Math::BigInt::Subclass->new(" \n1234567\n ") = 1234567 ok 3614 - Math::BigInt::Subclass->new(" \n1234567\n1") = 'NaN' ok 3615 - Math::BigInt::Subclass->new("1 \n1234567\n1") = 'NaN' ok 3616 - Math::BigInt::Subclass->new("12345678") = 12345678 ok 3617 - Math::BigInt::Subclass->new(" 12345678") = 12345678 ok 3618 - Math::BigInt::Subclass->new("12345678 ") = 12345678 ok 3619 - Math::BigInt::Subclass->new(" 12345678 ") = 12345678 ok 3620 - Math::BigInt::Subclass->new("\n12345678") = 12345678 ok 3621 - Math::BigInt::Subclass->new("12345678\n") = 12345678 ok 3622 - Math::BigInt::Subclass->new("\n12345678\n") = 12345678 ok 3623 - Math::BigInt::Subclass->new(" \n12345678\n") = 12345678 ok 3624 - Math::BigInt::Subclass->new(" \n12345678 \n") = 12345678 ok 3625 - Math::BigInt::Subclass->new(" \n12345678\n ") = 12345678 ok 3626 - Math::BigInt::Subclass->new(" \n12345678\n1") = 'NaN' ok 3627 - Math::BigInt::Subclass->new("1 \n12345678\n1") = 'NaN' ok 3628 - Math::BigInt::Subclass->new("123456789") = 123456789 ok 3629 - Math::BigInt::Subclass->new(" 123456789") = 123456789 ok 3630 - Math::BigInt::Subclass->new("123456789 ") = 123456789 ok 3631 - Math::BigInt::Subclass->new(" 123456789 ") = 123456789 ok 3632 - Math::BigInt::Subclass->new("\n123456789") = 123456789 ok 3633 - Math::BigInt::Subclass->new("123456789\n") = 123456789 ok 3634 - Math::BigInt::Subclass->new("\n123456789\n") = 123456789 ok 3635 - Math::BigInt::Subclass->new(" \n123456789\n") = 123456789 ok 3636 - Math::BigInt::Subclass->new(" \n123456789 \n") = 123456789 ok 3637 - Math::BigInt::Subclass->new(" \n123456789\n ") = 123456789 ok 3638 - Math::BigInt::Subclass->new(" \n123456789\n1") = 'NaN' ok 3639 - Math::BigInt::Subclass->new("1 \n123456789\n1") = 'NaN' ok 3640 - Math::BigInt::Subclass->new("1234567890") = 1234567890 ok 3641 - Math::BigInt::Subclass->new(" 1234567890") = 1234567890 ok 3642 - Math::BigInt::Subclass->new("1234567890 ") = 1234567890 ok 3643 - Math::BigInt::Subclass->new(" 1234567890 ") = 1234567890 ok 3644 - Math::BigInt::Subclass->new("\n1234567890") = 1234567890 ok 3645 - Math::BigInt::Subclass->new("1234567890\n") = 1234567890 ok 3646 - Math::BigInt::Subclass->new("\n1234567890\n") = 1234567890 ok 3647 - Math::BigInt::Subclass->new(" \n1234567890\n") = 1234567890 ok 3648 - Math::BigInt::Subclass->new(" \n1234567890 \n") = 1234567890 ok 3649 - Math::BigInt::Subclass->new(" \n1234567890\n ") = 1234567890 ok 3650 - Math::BigInt::Subclass->new(" \n1234567890\n1") = 'NaN' ok 3651 - Math::BigInt::Subclass->new("1 \n1234567890\n1") = 'NaN' ok 3652 - value of ((2^148)+1)/17 ok 3653 - number of digits in ((2^148)+1)/17 ok 3654 - value of 2^127-1 ok 3655 - number of digits in 2^127-1 ok 3656 - number of digits in fraction part of 2^127-1 ok 3657 - number of digits in 1_000_000_000_000 ok 3658 - number of digits in fraction part of 1_000_000_000_000 ok 3659 - 2 <<= 18 with Math::BigInt::Subclass objects ok 3660 - 2 <<= 18 with Math::BigInt::Subclass objects ok 3661 - 2 >>= 18 with Math::BigInt::Subclass objects ok 3662 - 2 >>= 18 with Math::BigInt::Subclass objects ok 3663 - $x = Math::Foo->new(5); $x = $x - 8; $x = 3 ok 3664 - $x is an object of class "Math::Foo" ok 3665 - $x = Math::Foo->new(5); $x = 8 - $x; $x = -3 ok 3666 - $x is an object of class "Math::Foo" ok 3667 - numify of +Inf ok 3668 - numify of -Inf ok 3669 - numify of NaN ok 3670 - Math::BigInt::Subclass->new("+inf") = "inf" ok 3671 # skip no 64 bit integer support ok 3672 # skip no 64 bit integer support ok 3673 # skip no 64 bit integer support ok 3674 # skip no 64 bit integer support ok 3675 - is a valid object ok 3676 - $x == 10000000 ok 3677 - is a valid object ok 3678 - $x == 9999999 ok 3679 - is a valid object ok 3680 - $x->numify() = $BASE-1 ok 3681 - $x->numify() = -($BASE-1) ok 3682 - $x->numify()+0 = $BASE+0 ok 3683 - $x->numify() = -$BASE ok 3684 - $x->numify() = -($BASE*$BASE*1+$BASE*1+1)) ok 3685 - $x > $BASE ok 3686 - $x > $BASE ok 3687 - $x->length() = length($MAX) ok 3688 - Math::BigInt::Subclass->digit(123, 2) = 1 ok 3689 - testing bug in sub ok 3690 - testing bug in sub ok 3691 - testing number with a zero-hole of BASE_LEN_SMALL ok 3692 - see if mul shortcut for small numbers works ok 3693 - -322056000 / -12882240 has remainder 0 ok 3694 - is a valid object ok 3695 - $x->bmod(5033) = 4404 ok 3696 - Math::BigInt::Subclass->bzero() = 0 ok 3697 - Math::BigInt::Subclass->bone() = 1 ok 3698 - Math::BigInt::Subclass->bone("+") = 1 ok 3699 - Math::BigInt::Subclass->bone("-") = -1 ok 3700 - Math::BigInt::Subclass->bnan() = "NaN" ok 3701 - Math::BigInt::Subclass->binf() = "inf" ok 3702 - Math::BigInt::Subclass->binf("+") = "inf" ok 3703 - Math::BigInt::Subclass->binf("-") = "-inf" ok 3704 - Math::BigInt::Subclass->binf("-inf") = "-inf" ok 3705 - Math::BigInt::Subclass->new(1)->is_one("-") = 0 ok 3706 - Math::BigInt::Subclass->new(-1)->is_one("-") = 1 ok 3707 - Math::BigInt::Subclass->new(1)->is_one() = 1 ok 3708 - Math::BigInt::Subclass->new(-1)->is_one() = 0 ok 3709 - $x = Math::BigInt::Subclass->new(3); $x -= $x; = 0 ok 3710 - $x = Math::BigInt::Subclass->new(-3); $x -= $x; = 0 ok 3711 - $x = Math::BigInt::Subclass->new("NaN"); $x -= $x; $x->is_nan() = 1 ok 3712 - $x = Math::BigInt::Subclass->new("inf"); $x -= $x; $x->is_nan() = 1 ok 3713 - $x = Math::BigInt::Subclass->new("-inf"); $x -= $x; $x->is_nan() = 1 ok 3714 - $x = Math::BigInt::Subclass->new("NaN"); $x += $x; $x->is_nan() = 1 ok 3715 - $x = Math::BigInt::Subclass->new("inf"); $x += $x; $x->is_inf() = 1 ok 3716 - $x = Math::BigInt::Subclass->new("-inf"); $x += $x; $x->is_inf("-") = 1 ok 3717 - $x = Math::BigInt::Subclass->new(3); $x += $x; $x = 6 ok 3718 - $x = Math::BigInt::Subclass->new(-3); $x += $x; $x = -6 ok 3719 - $x = Math::BigInt::Subclass->new(3); $x *= $x; $x = 9 ok 3720 - $x = Math::BigInt::Subclass->new(-3); $x *= $x; $x = 9 ok 3721 - $x = Math::BigInt::Subclass->new(3); $x /= $x; $x = 1 ok 3722 - $x = Math::BigInt::Subclass->new(-3); $x /= $x; $x = 1 ok 3723 - $x = Math::BigInt::Subclass->new(3); $x %= $x; $x = 0 ok 3724 - $x = Math::BigInt::Subclass->new(-3); $x %= $x; $x = 0 ok 3725 - $ms has custom attribute \$ms->{_custom} ok 3726 - An object of class 'Math::BigInt::Subclass' isa 'Math::BigInt' ok 3727 - $ms is 46 ok 3728 - $ms has custom attribute $ms->{_custom} ok 3729 - $ms is not an object of class 'Math::BigInt::Subclass' ok t\sub_mif.t ............ 1..684 ok 1 - ${"Math::BigInt::Subclass::accuracy"} ok 2 - ${"Math::BigInt::Subclass::precision"} ok 3 - Math::BigInt::Subclass->accuracy() ok 4 - Math::BigInt::Subclass->precision() ok 5 - ${"Math::BigInt::Subclass::div_scale"} ok 6 - ${"Math::BigInt::Subclass::round_mode"} ok 7 - Math::BigInt::Subclass->round_mode() ok 8 - ${"Math::BigFloat::Subclass::accuracy"} ok 9 - ${"Math::BigFloat::Subclass::precision"} ok 10 - Math::BigFloat::Subclass->precision() ok 11 - Math::BigFloat::Subclass->precision() ok 12 - ${"Math::BigFloat::Subclass::div_scale"} ok 13 - ${"Math::BigFloat::Subclass::round_mode"} ok 14 - Math::BigFloat::Subclass->round_mode() ok 15 - Math::BigInt::Subclass->accuracy() ok 16 - Math::BigInt::Subclass->precision() ok 17 - Math::BigInt::Subclass->round_mode() ok 18 - Math::BigInt::Subclass->div_scale() ok 19 - Math::BigInt::Subclass->div_scale(20) ok 20 - Math::BigInt::Subclass->div_scale() ok 21 - Math::BigInt::Subclass->round_mode("odd") ok 22 - Math::BigInt::Subclass->round_mode() ok 23 - Math::BigInt::Subclass->accuracy(2) ok 24 - Math::BigInt::Subclass->accuracy() ok 25 - Math::BigInt::Subclass->accuracy(undef) ok 26 - Math::BigInt::Subclass->precision(2) ok 27 - Math::BigInt::Subclass->precision(-2) ok 28 - Math::BigInt::Subclass->precision() ok 29 - Math::BigInt::Subclass->precision(undef) ok 30 - Math::BigFloat::Subclass->accuracy() ok 31 - Math::BigFloat::Subclass->precision() ok 32 - Math::BigFloat::Subclass->round_mode() ok 33 - Math::BigFloat::Subclass->div_scale() ok 34 - Math::BigFloat::Subclass->div_scale(20) ok 35 - Math::BigFloat::Subclass->div_scale() ok 36 - Math::BigFloat::Subclass->round_mode("odd") ok 37 - Math::BigFloat::Subclass->round_mode() ok 38 - Math::BigFloat::Subclass->accuracy(2) ok 39 - Math::BigFloat::Subclass->accuracy() ok 40 - Math::BigFloat::Subclass->accuracy(undef) ok 41 - Math::BigFloat::Subclass->precision(2) ok 42 - Math::BigFloat::Subclass->precision(-2) ok 43 - Math::BigFloat::Subclass->precision() ok 44 - Math::BigFloat::Subclass->precision(undef) ok 45 - ${"Math::BigFloat::Subclass::accuracy"} = 5 ok 46 - ${"Math::BigInt::Subclass::accuracy"} = 5 ok 47 - ${"Math::BigFloat::Subclass::accuracy"} = 42 ok 48 - ${"Math::BigInt::Subclass::accuracy"} = 42 ok 49 - ${"Math::BigFloat::Subclass::accuracy"} = -1 ok 50 - ${"Math::BigInt::Subclass::accuracy"} = -1 ok 51 - ${"Math::BigFloat::Subclass::accuracy"} = 0 ok 52 - ${"Math::BigInt::Subclass::accuracy"} = 0 ok 53 - ${"Math::BigFloat::Subclass::accuracy"} = undef ok 54 - ${"Math::BigInt::Subclass::accuracy"} = undef ok 55 - ${"Math::BigFloat::Subclass::precision"} = 5 ok 56 - ${"Math::BigInt::Subclass::precision"} = 5 ok 57 - ${"Math::BigFloat::Subclass::precision"} = 42 ok 58 - ${"Math::BigInt::Subclass::precision"} = 42 ok 59 - ${"Math::BigFloat::Subclass::precision"} = -1 ok 60 - ${"Math::BigInt::Subclass::precision"} = -1 ok 61 - ${"Math::BigFloat::Subclass::precision"} = 0 ok 62 - ${"Math::BigInt::Subclass::precision"} = 0 ok 63 - ${"Math::BigFloat::Subclass::precision"} = undef ok 64 - ${"Math::BigInt::Subclass::precision"} = undef ok 65 - ${"Math::BigFloat::Subclass::div_scale"} = 5 ok 66 - ${"Math::BigInt::Subclass::div_scale"} = 5 ok 67 - ${"Math::BigFloat::Subclass::div_scale"} = 42 ok 68 - ${"Math::BigInt::Subclass::div_scale"} = 42 ok 69 - ${"Math::BigFloat::Subclass::div_scale"} = 1 ok 70 - ${"Math::BigInt::Subclass::div_scale"} = 1 ok 71 - ${"Math::BigFloat::Subclass::round_mode"} = "odd" ok 72 - ${"Math::BigInt::Subclass::round_mode"} = "odd" ok 73 - ${"Math::BigFloat::Subclass::round_mode"} = "even" ok 74 - ${"Math::BigInt::Subclass::round_mode"} = "even" ok 75 - ${"Math::BigFloat::Subclass::round_mode"} = "zero" ok 76 - ${"Math::BigInt::Subclass::round_mode"} = "zero" ok 77 - ${"Math::BigFloat::Subclass::round_mode"} = "trunc" ok 78 - ${"Math::BigInt::Subclass::round_mode"} = "trunc" ok 79 - ${"Math::BigFloat::Subclass::round_mode"} = "+inf" ok 80 - ${"Math::BigInt::Subclass::round_mode"} = "+inf" ok 81 - ${"Math::BigFloat::Subclass::round_mode"} = "-inf" ok 82 - ${"Math::BigInt::Subclass::round_mode"} = "-inf" ok 83 - ${"Math::BigFloat::Subclass::round_mode"} ok 84 - ${"Math::BigInt::Subclass::round_mode"} ok 85 - $x->accuracy() ok 86 - $x->accuracy(5) ok 87 - $x->accuracy(undef) ok 88 - $x->precision() ok 89 - $x->precision(5) ok 90 - $x->precision(undef) ok 91 - ${"Math::BigInt::Subclass::accuracy"} = 42 ok 92 - ${"Math::BigFloat::Subclass::accuracy"} = 64 ok 93 - ${"Math::BigInt::Subclass::accuracy"} = 42 ok 94 - ${"Math::BigFloat::Subclass::accuracy"} = 64 ok 95 - Math::BigInt::Subclass->new(123456) = 123500 ok 96 - Math::BigInt::Subclass->new(123456) = 123000 ok 97 - Math::BigFloat::Subclass->new("123.456") = 123.5 ok 98 - Math::BigFloat::Subclass->new("123.456") = 123.5 ok 99 - Math::BigFloat::Subclass->new("123.456") = 123.456 ok 100 - $x = Math::BigFloat::Subclass->new("123.456"); $x->accuracy(4) ok 101 - $x = Math::BigFloat::Subclass->new("123.456"); $x->precision(-2) ok 102 - $x = Math::BigInt::Subclass->new(123456); $x->accuracy(4) ok 103 - $x = Math::BigInt::Subclass->new(123456); $x->precision(2) ok 104 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(5) ok 105 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(4) ok 106 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(5, 2) ok 107 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(undef, -2) ok 108 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(undef, 2) ok 109 - $x = Math::BigInt::Subclass->new("123"); $x->round(5, 2) ok 110 - $x = Math::BigFloat::Subclass->new("123.45000"); $x->copy()->round(undef, -1, "odd") ok 111 - $x = Math::BigFloat::Subclass->new("123.4567"); $y = $x->copy()->bround() ok 112 - $y = $x->copy()->round(5); $y->accuracy() ok 113 - $y = $x->copy()->round(5); $y->precision() ok 114 - $y = $x->copy()->round(undef, 2); $y->precision() ok 115 - $y = $x->copy()->round(undef, 2); $y->accuracy() ok 116 - $x = $mbf->new("123.4567") ok 117 - $x->accuracy(4) ok 118 - $x->precision(-2) ok 119 - $x->accuracy() ok 120 - $x = $mbf->new("123.4567") ok 121 - $x->precision(-2) ok 122 - $x->accuracy(4) ok 123 - $x->precision() ok 124 - $z = $x->copy(); $z->accuracy() ok 125 - $z = $x->copy(); $z->precision() ok 126 - $x->copy()->bdiv(3, 4) ok 127 - $x->copy()->bdiv(3, 8) ok 128 - $x->copy()->bdiv(3, 16) ok 129 - $x->copy()->bdiv(3, 32) ok 130 - $x = Math::BigInt::Subclass->bzero(); $x->accuracy(5); $x->{_a} ok 131 - $x = Math::BigInt::Subclass->bzero(); $x->precision(5); $x->{_p} ok 132 - $x = Math::BigInt::Subclass->new(0); $x->accuracy(5); $x->{_a} ok 133 - $x = Math::BigInt::Subclass->new(0); $x->precision(5); $x->{_p} ok 134 - $x = Math::BigInt::Subclass->bzero(); $x->round(5); $x->{_a} ok 135 - $x = Math::BigInt::Subclass->bzero(); $x->round(undef, 5); $x->{_p} ok 136 - $x = Math::BigInt::Subclass->new(0); $x->round(5); $x->{_a} ok 137 - $x = Math::BigInt::Subclass->new(0); $x->round(undef, 5); $x->{_p} ok 138 - $x = Math::BigInt::Subclass->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 139 - $x = Math::BigFloat::Subclass->bzero(); $x->accuracy(5); $x->{_a} ok 140 - $x = Math::BigFloat::Subclass->bzero(); $x->precision(5); $x->{_p} ok 141 - $x = Math::BigFloat::Subclass->new(0); $x->accuracy(5); $x->{_a} ok 142 - $x = Math::BigFloat::Subclass->new(0); $x->precision(5); $x->{_p} ok 143 - $x = Math::BigFloat::Subclass->bzero(); $x->round(5); $x->{_a} ok 144 - $x = Math::BigFloat::Subclass->bzero(); $x->round(undef, 5); $x->{_p} ok 145 - $x = Math::BigFloat::Subclass->new(0); $x->round(5); $x->{_a} ok 146 - $x = Math::BigFloat::Subclass->new(0); $x->round(undef, 5); $x->{_p} ok 147 - $x = Math::BigFloat::Subclass->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 148 - Math::BigInt::Subclass->new(123)->badd(123) ok 149 - Math::BigInt::Subclass->badd(123, 321) ok 150 - Math::BigInt::Subclass->badd(123, Math::BigInt::Subclass->new(321)) ok 151 - Math::BigInt::Subclass->new(123)->bsub(122) ok 152 - Math::BigInt::Subclass->bsub(321, 123) ok 153 - Math::BigInt::Subclass->bsub(321, Math::BigInt::Subclass->new(123)) ok 154 - Math::BigInt::Subclass->new(123)->bmul(123) ok 155 - Math::BigInt::Subclass->bmul(123, 123) ok 156 - Math::BigInt::Subclass->bmul(123, Math::BigInt::Subclass->new(123)) ok 157 - Math::BigInt::Subclass->new(15131)->bmod(123) ok 158 - Math::BigInt::Subclass->bmod(15131, 123) ok 159 - Math::BigInt::Subclass->bmod(15131, Math::BigInt::Subclass->new(123)) ok 160 - Math::BigInt::Subclass->new(2)->bpow(16) ok 161 - Math::BigInt::Subclass->bpow(2, 16) ok 162 - Math::BigInt::Subclass->bpow(2, Math::BigInt::Subclass->new(16)) ok 163 - Math::BigInt::Subclass->new(2**15)->brsft(1) ok 164 - Math::BigInt::Subclass->brsft(2**15, 1) ok 165 - Math::BigInt::Subclass->brsft(2**15, Math::BigInt::Subclass->new(1)) ok 166 - Math::BigInt::Subclass->new(2**13)->blsft(1) ok 167 - Math::BigInt::Subclass->blsft(2**13, 1) ok 168 - Math::BigInt::Subclass->blsft(2**13, Math::BigInt::Subclass->new(1)) ok 169 - Math::BigFloat::Subclass->new(123)->badd(123) ok 170 - Math::BigFloat::Subclass->badd(123, 321) ok 171 - Math::BigFloat::Subclass->badd(123, Math::BigFloat::Subclass->new(321)) ok 172 - Math::BigFloat::Subclass->new(123)->bsub(122) ok 173 - Math::BigFloat::Subclass->bsub(321, 123) ok 174 - Math::BigFloat::Subclass->bsub(321, Math::BigFloat::Subclass->new(123)) ok 175 - Math::BigFloat::Subclass->new(123)->bmul(123) ok 176 - Math::BigFloat::Subclass->bmul(123, 123) ok 177 - Math::BigFloat::Subclass->bmul(123, Math::BigFloat::Subclass->new(123)) ok 178 - Math::BigFloat::Subclass->new(15131)->bmod(123) ok 179 - Math::BigFloat::Subclass->bmod(15131, 123) ok 180 - Math::BigFloat::Subclass->bmod(15131, Math::BigFloat::Subclass->new(123)) ok 181 - Math::BigFloat::Subclass->new(2)->bpow(16) ok 182 - Math::BigFloat::Subclass->bpow(2, 16) ok 183 - Math::BigFloat::Subclass->bpow(2, Math::BigFloat::Subclass->new(16)) ok 184 - Math::BigFloat::Subclass->new(2**15)->brsft(1) ok 185 - Math::BigFloat::Subclass->brsft(2**15, 1) ok 186 - Math::BigFloat::Subclass->brsft(2**15, Math::BigFloat::Subclass->new(1)) ok 187 - Math::BigFloat::Subclass->new(2**13)->blsft(1) ok 188 - Math::BigFloat::Subclass->blsft(2**13, 1) ok 189 - Math::BigFloat::Subclass->blsft(2**13, Math::BigFloat::Subclass->new(1)) ok 190 - $z = $x + $y ok 191 - $z = $y - $x ok 192 - $z = $y * $x ok 193 - $z = $x ** 2 ok 194 - $z = $x * $x ok 195 - $z = $z / 2 ok 196 - $z++ ok 197 - $z = $x + $y ok 198 - $z = $y - $x ok 199 - $z = $y * $x ok 200 - $z = $x ** 2 ok 201 - $z++ ok 202 - $z = $z / 2 ok 203 - $x->bnot() ok 204 - $x->babs() ok 205 - $x->bneg() ok 206 - $x ok 207 - $x->bdiv($y) ok 208 - $x->{_a} ok 209 - $x->bdiv($y) ok 210 - $x->{_a} ok 211 - $x->bdiv($y) ok 212 - $x->{_a} ok 213 - $x->bdiv($y) ok 214 - $x->{_a} ok 215 - $x->copy()->bsqrt(...) ok 216 - $x->copy->bsqrt(...) ok 217 - $x->{_a} ok 218 - $z = $x->bsqrt(); $z ok 219 - $z = $x->bsqrt(); $x ok 220 - $x->copy()->bpow(...) ok 221 - $x->copy()->bpow(...) vs. $x->copy()->bsqrt(...) ok 222 - $x->copy()->bpow('2', 0) ok 223 - $mbi->new(12)->bfac() ok 224 - $mbi->new(12)->bfac(2) ok 225 - $x = Math::BigInt::Subclass->new(12); $x->accuracy(2); $x->bfac() ok 226 - $x = Math::BigInt::Subclass->new(13); $x->accuracy(2); $x->bfac() ok 227 - $x = Math::BigInt::Subclass->new(13); $x->accuracy(3); $x->bfac() ok 228 - $x = Math::BigInt::Subclass->new(13); $x->accuracy(4); $x->bfac() ok 229 - $x = Math::BigInt::Subclass->new(20); $x->accuracy(1); $x->bfac() ok 230 - $x = Math::BigInt::Subclass->new("123456")->bsqrt(2, undef) ok 231 - $x->accuracy() ok 232 - $x = 360 ok 233 - $x = 400 ok 234 - $z = $x + $y; ok 235 - $z is a "Math::BigFloat::Subclass" object ok 236 - $z = $x / $y; ok 237 - $z is a "Math::BigFloat::Subclass" object ok 238 - $z = $u * $y; ok 239 - $z is a "Math::BigFloat::Subclass" object ok 240 - $z = 31000 ok 241 - $z = 30900 ok 242 - $z = 30863 ok 243 - $z = 30863 ok 244 - $z = 30860 ok 245 - $z = 30900 ok 246 - $z = 30862.5 ok 247 - $z = "" ok 248 - "$z = $y >= 3.17" gives warning as expected ok 249 - $z = "" ok 250 - "$z = $y >= 3.17" gives warning as expected ok 251 - $x->bdiv(3) ok 252 - $x->{_a} ok 253 - $x->bdiv($y) ok 254 - $x->{_a} ok 255 - $x->bdiv(3) ok 256 - $x->bdiv(3, undef, -2) ok 257 - $x->bdiv(3, undef, -8) = "3.33333333" ok 258 - $x->bdiv($y) = '3.333' ok 259 - $x->{_a} = 4 ok 260 - $y->{_a} = 4 ok 261 - $x->{_p} = undef ok 262 - $y->{_p} = undef ok 263 - $x->bdiv($y) = '3.33' ok 264 - $x->{_p} = -2 ok 265 - $y->{_p} = -2 ok 266 - $x->{_a} = undef ok 267 - $y->{_a} = undef ok 268 - "$x->bround(-2)" gives warning as expected ok 269 - $x = "1.000" ok 270 - $x->{_a} = 4 ok 271 - $x = "1.000" ok 272 - $x = "1230" ok 273 - $x->{_a} = 3 ok 274 - $x = "1230" ok 275 - $x = "1200" ok 276 - $x->{_a} = 2 ok 277 - $x = "12300" ok 278 - $x->{_a} = 4 ok 279 - $x = "12000" ok 280 - $x->{_a} = 3 ok 281 - $x = "10000" ok 282 - $x->{_a} = 2 ok 283 - $x = "0" ok 284 - $x->{_a} = 1 ok 285 - $x = "0" ok 286 - $x->{_a} = 0 ok 287 - $x = "100000" ok 288 - $x->{_a} = 0 ok 289 - $x = "100000" ok 290 - $x->{_a} = 0 ok 291 - $x = "12345" ok 292 - $x->{_a} = 5 ok 293 - $x = "12345" ok 294 - $x = "0.01" ok 295 - $x = "0.00" ok 296 - $x = "0.00" ok 297 - $x = "12340" ok 298 - $x = "12340" ok 299 - $x->{_a} = undef ok 300 - $x = "0.000176118351532229658330398027474462839027826699542092286016203" ok 301 - $x = "0.000176118351532229658330398027474462839027826699542092286016202888340965128566396618527651" ok 302 - $x = "0.00017611835153222965833039802747446283902782669954209228601620288834096512856639662" ok 303 - $x = "1.00000" ok 304 - $x->bfround(-2) = "1.00" ok 305 - $x->{_p} = -2 ok 306 - $x->bround(2) = "12000" ok 307 - $x->{_a} = 2 ok 308 - $x->bround(2) = "1.2" ok 309 - $x->{_a} = 2 ok 310 - $x = "12350" ok 311 - $x->{_a} = 4 ok 312 - $x->{_p} = undef ok 313 - $x->{_a} = undef ok 314 - $x->{_p} = undef ok 315 - $x->{_a} = undef ok 316 - $x->{_p} = undef ok 317 - $y->{_a} = undef ok 318 - $y->{_p} = undef ok 319 - $x+$y = 24000 ok 320 - $x-$y = 42000 ok 321 - $x+$y = "2.46" ok 322 - scalar(@params) = 1 ok 323 - scalar(@params) = 4 ok 324 - $params[0] = $x ok 325 - $params[1] = 1 ok 326 - $params[2] = undef ok 327 - $params[3] = "odd" ok 328 - scalar(@params) = 4 ok 329 - $params[0] = $x ok 330 - $params[1] = undef ok 331 - $params[2] = 2 ok 332 - $params[3] = "odd" ok 333 - round mode "foo" gives a warning as expected ok 334 - scalar(@params) = 4 ok 335 - $params[0] = $x ok 336 - $params[1] = undef ok 337 - $params[2] = 2 ok 338 - $params[3] = "+inf" ok 339 - scalar(@params) = 1 ok 340 - $params[0] = $x ok 341 - scalar(@params) = 1 ok 342 - $params[0] = $x ok 343 - $x->is_nan() = 1 ok 344 - scalar(@params) = 1 ok 345 - $params[0] = $x ok 346 - $x->is_nan() = 1 ok 347 - $x->{_a} = undef ok 348 - $x->{_p} = undef ok 349 - $x->{_a} = undef ok 350 - $x->{_p} = undef ok 351 - $x->{_a} = undef ok 352 - $x->{_p} = undef ok 353 - $x->{_a} = undef ok 354 - $x->{_p} = undef ok 355 - $x->{_a} = undef ok 356 - $x->{_p} = undef ok 357 - $x->{_a} = undef ok 358 - $x->{_p} = undef ok 359 - $x->{_a} = 1 ok 360 - $x->{_p} = undef ok 361 - $x->{_a} = undef ok 362 - $x->{_p} = 1 ok 363 - $x->{_a} = 1 ok 364 - $x->{_p} = undef ok 365 - $x->{_a} = undef ok 366 - $x->{_p} = 1 ok 367 - $x->{_a} = 1 ok 368 - $x->{_p} = undef ok 369 - $x->{_a} = undef ok 370 - $x->{_p} = 1 ok 371 - $x->{_a} = 2 ok 372 - $x->{_p} = undef ok 373 - $x->{_a} = undef ok 374 - $x->{_p} = 2 ok 375 - $x->{_a} = 2 ok 376 - $x->{_p} = undef ok 377 - $x->{_a} = undef ok 378 - $x->{_p} = 2 ok 379 - $x->{_a} = 2 ok 380 - $x->{_p} = undef ok 381 - $x->{_a} = undef ok 382 - $x->{_p} = 2 ok 383 - $x->{_a} = undef ok 384 - $x->{_p} = undef ok 385 - $x->{_a} = undef ok 386 - $x->{_p} = undef ok 387 - $x->{_a} = undef ok 388 - $x->{_p} = undef ok 389 - $x->{_a} = undef ok 390 - $x->{_p} = undef ok 391 - $x->{_a} = undef ok 392 - $x->{_p} = undef ok 393 - $x->{_a} = undef ok 394 - $x->{_p} = undef ok 395 - $x->{_a} = 1 ok 396 - $x->{_p} = undef ok 397 - $x->{_a} = undef ok 398 - $x->{_p} = 1 ok 399 - $x->{_a} = 1 ok 400 - $x->{_p} = undef ok 401 - $x->{_a} = undef ok 402 - $x->{_p} = 1 ok 403 - $x->{_a} = 1 ok 404 - $x->{_p} = undef ok 405 - $x->{_a} = undef ok 406 - $x->{_p} = 1 ok 407 - $x->{_a} = 2 ok 408 - $x->{_p} = undef ok 409 - $x->{_a} = undef ok 410 - $x->{_p} = 2 ok 411 - $x->{_a} = 2 ok 412 - $x->{_p} = undef ok 413 - $x->{_a} = undef ok 414 - $x->{_p} = 2 ok 415 - $x->{_a} = 2 ok 416 - $x->{_p} = undef ok 417 - $x->{_a} = undef ok 418 - $x->{_p} = 2 ok 419 - $x->accuracy() = 2 ok 420 - $x->accuracy() = 2 ok 421 - $x->precision() = -2 ok 422 - $x->precision() = -2 ok 423 - $x->accuracy() = 2 ok 424 - $x->accuracy() = 2 ok 425 - $x->precision() = -2 ok 426 - $x->precision() = -2 ok 427 - mixing A and P creates a NaN ok 428 - $class->new(123) = "NaN" ok 429 - mixing A and P creates a NaN ok 430 - $class->new(123) = "NaN" ok 431 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->badd($y); ok 432 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->bsub($y); ok 433 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->bmul($y); ok 434 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->bpow($y); ok 435 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->bmod($y); ok 436 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->badd($y); ok 437 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->bsub($y); ok 438 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->bmul($y); ok 439 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->bpow($y); ok 440 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->bmod($y); ok 441 - my $x = Math::BigInt::Subclass->new(1234, 5, -3); ok 442 - my $x = Math::BigInt::Subclass->bsqrt(1234, 5, -3); ok 443 - $x = 120 ok 444 - $x = 120 ok 445 - $x = 120 ok 446 - $x = 120 ok 447 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("123"); $x->$f($y); ok 448 - is a valid object ok 449 - $x = Math::BigInt::Subclass->new("123"); $x->accuracy(3); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 450 - is a valid object ok 451 - $x->{_a} == 3 ok 452 - $x->{_p} is undef ok 453 - $x = Math::BigInt::Subclass->new("123"); $x->precision(-3); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 454 - is a valid object ok 455 - $x->{_p} == -3 ok 456 - $x->{_a} is undef ok 457 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(3); $x->$f($y); ok 458 - is a valid object ok 459 - $x->{_a} == 3 ok 460 - $x->{_p} is undef ok 461 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $y->precision(-3); $x->$f($y); ok 462 - is a valid object ok 463 - $x->{_p} == -3 ok 464 - $x->{_a} is undef ok 465 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $x->$f($y); ok 466 - is a valid object ok 467 - $x = Math::BigInt::Subclass->new("123"); $x->accuracy(3); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 468 - is a valid object ok 469 - $x->{_a} == 3 ok 470 - $x->{_p} is undef ok 471 - $x = Math::BigInt::Subclass->new("123"); $x->precision(-3); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 472 - is a valid object ok 473 - $x->{_p} == -3 ok 474 - $x->{_a} is undef ok 475 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(3); $x->$f($y); ok 476 - is a valid object ok 477 - $x->{_a} == 3 ok 478 - $x->{_p} is undef ok 479 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $y->precision(-3); $x->$f($y); ok 480 - is a valid object ok 481 - $x->{_p} == -3 ok 482 - $x->{_a} is undef ok 483 - $x = Math::BigInt::Subclass->new("123"); $x->accuracy(3); $y = Math::BigInt::Subclass->new("1"); $x->$f($y); ok 484 - is a valid object ok 485 - $x->{_a} == 3 ok 486 - $x->{_p} is undef ok 487 - $x = Math::BigInt::Subclass->new("123"); $x->precision(-3); $y = Math::BigInt::Subclass->new("1"); $x->$f($y); ok 488 - is a valid object ok 489 - $x->{_p} == -3 ok 490 - $x->{_a} is undef ok 491 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $y->accuracy(3); $x->$f($y); ok 492 - is a valid object ok 493 - $x->{_a} == 3 ok 494 - $x->{_p} is undef ok 495 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $y->precision(-3); $x->$f($y); ok 496 - is a valid object ok 497 - $x->{_p} == -3 ok 498 - $x->{_a} is undef ok 499 - $x = Math::BigInt::Subclass->new("1"); $x->accuracy(3); $y = Math::BigInt::Subclass->new("123"); $x->$f($y); ok 500 - is a valid object ok 501 - $x->{_a} == 3 ok 502 - $x->{_p} is undef ok 503 - $x = Math::BigInt::Subclass->new("1"); $x->precision(-3); $y = Math::BigInt::Subclass->new("123"); $x->$f($y); ok 504 - is a valid object ok 505 - $x->{_p} == -3 ok 506 - $x->{_a} is undef ok 507 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("123"); $y->accuracy(3); $x->$f($y); ok 508 - is a valid object ok 509 - $x->{_a} == 3 ok 510 - $x->{_p} is undef ok 511 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("123"); $y->precision(-3); $x->$f($y); ok 512 - is a valid object ok 513 - $x->{_p} == -3 ok 514 - $x->{_a} is undef ok 515 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $x->$f($y); ok 516 - is a valid object ok 517 - $x = Math::BigInt::Subclass->new("123"); $x->accuracy(4); $y = Math::BigInt::Subclass->new("1"); $x->$f($y); ok 518 - is a valid object ok 519 - $x->{_a} == 4 ok 520 - $x->{_p} is undef ok 521 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $y->accuracy(4); $x->$f($y); ok 522 - is a valid object ok 523 - $x->{_a} == 4 ok 524 - $x->{_p} is undef ok 525 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $y->precision(-4); $x->$f($y); ok 526 - is a valid object ok 527 - $x->{_p} == -4 ok 528 - $x->{_a} is undef ok 529 - $x = Math::BigInt::Subclass->new("123"); $x->precision(-4); $y = Math::BigInt::Subclass->new("1"); $x->$f($y); ok 530 - is a valid object ok 531 - $x->{_p} == -4 ok 532 - $x->{_a} is undef ok 533 - $x = Math::BigInt::Subclass->new("1"); $x->accuracy(4); $y = Math::BigInt::Subclass->new("123"); $x->$f($y); ok 534 - is a valid object ok 535 - $x->{_a} == 4 ok 536 - $x->{_p} is undef ok 537 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("123"); $y->accuracy(4); $x->$f($y); ok 538 - is a valid object ok 539 - $x->{_a} == 4 ok 540 - $x->{_p} is undef ok 541 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("123"); $y->precision(-4); $x->$f($y); ok 542 - is a valid object ok 543 - $x->{_p} == -4 ok 544 - $x->{_a} is undef ok 545 - $x = Math::BigInt::Subclass->new("1"); $x->precision(-4); $y = Math::BigInt::Subclass->new("123"); $x->$f($y); ok 546 - is a valid object ok 547 - $x->{_p} == -4 ok 548 - $x->{_a} is undef ok 549 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->$f($y); ok 550 - is a valid object ok 551 - $x = Math::BigInt::Subclass->new("1234"); $x->accuracy(1); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 552 - is a valid object ok 553 - $x->{_a} == 1 ok 554 - $x->{_p} is undef ok 555 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(1); $x->$f($y); ok 556 - is a valid object ok 557 - $x->{_a} == 1 ok 558 - $x->{_p} is undef ok 559 - $x = Math::BigInt::Subclass->new("1234"); $x->precision(-1); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 560 - is a valid object ok 561 - $x->{_p} == -1 ok 562 - $x->{_a} is undef ok 563 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->precision(-1); $x->$f($y); ok 564 - is a valid object ok 565 - $x->{_p} == -1 ok 566 - $x->{_a} is undef ok 567 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0x10"); $x->$f($y); ok 568 - is a valid object ok 569 - $x = Math::BigInt::Subclass->new("0xFF"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0xFF"); $x->$f($y); ok 570 - is a valid object ok 571 - $x->{_a} == 2 ok 572 - $x->{_p} is undef ok 573 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->accuracy(2); $x->$f($y); ok 574 - is a valid object ok 575 - $x->{_a} == 2 ok 576 - $x->{_p} is undef ok 577 - $x = Math::BigInt::Subclass->new("0xFF"); $x->precision(1); $y = Math::BigInt::Subclass->new("0xFF"); $x->$f($y); ok 578 - is a valid object ok 579 - $x->{_p} == 1 ok 580 - $x->{_a} is undef ok 581 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->precision(1); $x->$f($y); ok 582 - is a valid object ok 583 - $x->{_p} == 1 ok 584 - $x->{_a} is undef ok 585 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->$f($y); ok 586 - is a valid object ok 587 - $x = Math::BigInt::Subclass->new("1234"); $x->accuracy(1); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 588 - is a valid object ok 589 - $x->{_a} == 1 ok 590 - $x->{_p} is undef ok 591 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(1); $x->$f($y); ok 592 - is a valid object ok 593 - $x->{_a} == 1 ok 594 - $x->{_p} is undef ok 595 - $x = Math::BigInt::Subclass->new("1234"); $x->precision(3); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 596 - is a valid object ok 597 - $x->{_p} == 3 ok 598 - $x->{_a} is undef ok 599 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->precision(3); $x->$f($y); ok 600 - is a valid object ok 601 - $x->{_p} == 3 ok 602 - $x->{_a} is undef ok 603 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0x10"); $x->$f($y); ok 604 - is a valid object ok 605 - $x = Math::BigInt::Subclass->new("0xFF"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0xFF"); $x->$f($y); ok 606 - is a valid object ok 607 - $x->{_a} == 2 ok 608 - $x->{_p} is undef ok 609 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->accuracy(2); $x->$f($y); ok 610 - is a valid object ok 611 - $x->{_a} == 2 ok 612 - $x->{_p} is undef ok 613 - $x = Math::BigInt::Subclass->new("0xFF"); $x->precision(1); $y = Math::BigInt::Subclass->new("0xFF"); $x->$f($y); ok 614 - is a valid object ok 615 - $x->{_p} == 1 ok 616 - $x->{_a} is undef ok 617 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->precision(1); $x->$f($y); ok 618 - is a valid object ok 619 - $x->{_p} == 1 ok 620 - $x->{_a} is undef ok 621 - $x = Math::BigInt::Subclass->new("0xFF"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0xFFF"); $x->$f($y); ok 622 - is a valid object ok 623 - $x->{_a} == 2 ok 624 - $x->{_p} is undef ok 625 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFFF"); $y->accuracy(2); $x->$f($y); ok 626 - is a valid object ok 627 - $x->{_a} == 2 ok 628 - $x->{_p} is undef ok 629 - $x = Math::BigInt::Subclass->new("0xFF"); $x->precision(2); $y = Math::BigInt::Subclass->new("0xFFF"); $x->$f($y); ok 630 - is a valid object ok 631 - $x->{_p} == 2 ok 632 - $x->{_a} is undef ok 633 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFFF"); $y->precision(2); $x->$f($y); ok 634 - is a valid object ok 635 - $x->{_p} == 2 ok 636 - $x->{_a} is undef ok 637 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->$f($y); ok 638 - is a valid object ok 639 - $x = Math::BigInt::Subclass->new("1234"); $x->accuracy(1); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 640 - is a valid object ok 641 - $x->{_a} == 1 ok 642 - $x->{_p} is undef ok 643 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(1); $x->$f($y); ok 644 - is a valid object ok 645 - $x->{_a} == 1 ok 646 - $x->{_p} is undef ok 647 - $x = Math::BigInt::Subclass->new("1234"); $x->precision(3); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 648 - is a valid object ok 649 - $x->{_p} == 3 ok 650 - $x->{_a} is undef ok 651 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->precision(3); $x->$f($y); ok 652 - is a valid object ok 653 - $x->{_p} == 3 ok 654 - $x->{_a} is undef ok 655 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0x10"); $x->$f($y); ok 656 - is a valid object ok 657 - $x = Math::BigInt::Subclass->new("250"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0xFF"); $x->$f($y); ok 658 - is a valid object ok 659 - $x->{_a} == 2 ok 660 - $x->{_p} is undef ok 661 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("250"); $y->accuracy(2); $x->$f($y); ok 662 - is a valid object ok 663 - $x->{_a} == 2 ok 664 - $x->{_p} is undef ok 665 - $x = Math::BigInt::Subclass->new("0xFF"); $x->precision(1); $y = Math::BigInt::Subclass->new("0xFF"); $x->$f($y); ok 666 - is a valid object ok 667 - $x->{_p} == 1 ok 668 - $x->{_a} is undef ok 669 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->precision(1); $x->$f($y); ok 670 - is a valid object ok 671 - $x->{_p} == 1 ok 672 - $x->{_a} is undef ok 673 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x->$f($y); ok 674 - is a valid object ok 675 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 676 - is a valid object ok 677 - $x = Math::BigInt::Subclass->new("2"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0"); $x->$f($y); ok 678 - is a valid object ok 679 - $x->{_a} == 2 ok 680 - $x->{_p} is undef ok 681 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(2); $x->$f($y); ok 682 - is a valid object ok 683 - $x->{_a} == 2 ok 684 - $x->{_p} is undef ok t\trap.t ............... 1..43 ok 1 - can config() ok 2 - trap_nan defaults to 0 ok 3 - trap_inf defaults to 0 ok 4 - trap_nan now true ok 5 - died ok 6 - $x after new() never modified ok 7 - trap_nan disabled ok 8 - trap_inf enabled ok 9 - died ok 10 - $x after new() never modified ok 11 - died ok 12 - $x after new() never modified ok 13 - died ok 14 - $x after new() never modified ok 15 - died ok 16 - $x after new() never modified ok 17 - died ok 18 - $x after new not modified ok 19 - died ok 20 - $x after new not modified ok 21 - can config() ok 22 - trap_nan defaults to 0 ok 23 - trap_inf defaults to 0 ok 24 - trap_nan now true ok 25 - died ok 26 - $x after new() never modified ok 27 - trap_nan disabled ok 28 - trap_inf enabled ok 29 - died ok 30 - $x after new() never modified ok 31 - died ok 32 - $x after new() never modified ok 33 - died ok 34 - $x after new() never modified ok 35 - died ok 36 - $x after new() never modified ok 37 - died ok 38 - $x after new not modified ok 39 - died ok 40 - $x after new not modified ok 41 - never modified since it dies ok 42 - never modified since it dies ok 43 - never modified since it dies ok t\upgrade.t ............ 1..2126 ok 1 - Math::BigInt->upgrade() ok 2 - Math::BigInt->downgrade() || "" ok 3 - Math::BigInt->config()->{lib} ok 4 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("-345"); $x .= $y; ok 5 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x += $y; ok 6 - is a valid object ok 7 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x += $y; ok 8 - is a valid object 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("2"); $y = Math::BigInt->new("3"); $x *= $y; ok 14 - is a valid object ok 15 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x *= $y; ok 16 - is a valid object ok 17 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x %= $y; ok 18 - is a valid object ok 19 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("9"); $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("2"); $x /= $y; ok 24 - is a valid object ok 25 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x |= $y; ok 26 - is a valid object ok 27 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x &= $y; ok 28 - is a valid object ok 29 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x ^= $y; ok 30 - is a valid object ok 31 - $x = Math::BigInt->new("0"); $x->is_negative(); ok 32 - $x = Math::BigInt->new("-1"); $x->is_negative(); ok 33 - $x = Math::BigInt->new("1"); $x->is_negative(); ok 34 - $x = Math::BigInt->new("+inf"); $x->is_negative(); ok 35 - $x = Math::BigInt->new("-inf"); $x->is_negative(); ok 36 - $x = Math::BigInt->new("NaNneg"); $x->is_negative(); ok 37 - $x = Math::BigInt->new("0"); $x->is_positive(); ok 38 - $x = Math::BigInt->new("-1"); $x->is_positive(); ok 39 - $x = Math::BigInt->new("1"); $x->is_positive(); ok 40 - $x = Math::BigInt->new("+inf"); $x->is_positive(); ok 41 - $x = Math::BigInt->new("-inf"); $x->is_positive(); ok 42 - $x = Math::BigInt->new("NaNneg"); $x->is_positive(); ok 43 - $x = Math::BigInt->new("abc"); $x->is_odd(); ok 44 - $x = Math::BigInt->new("0"); $x->is_odd(); ok 45 - $x = Math::BigInt->new("1"); $x->is_odd(); ok 46 - $x = Math::BigInt->new("3"); $x->is_odd(); ok 47 - $x = Math::BigInt->new("-1"); $x->is_odd(); ok 48 - $x = Math::BigInt->new("-3"); $x->is_odd(); ok 49 - $x = Math::BigInt->new("10000001"); $x->is_odd(); ok 50 - $x = Math::BigInt->new("10000002"); $x->is_odd(); ok 51 - $x = Math::BigInt->new("2"); $x->is_odd(); ok 52 - $x = Math::BigInt->new("120"); $x->is_odd(); ok 53 - $x = Math::BigInt->new("121"); $x->is_odd(); ok 54 - $x = Math::BigInt->new("NaN"); $x->is_int(); ok 55 - $x = Math::BigInt->new("inf"); $x->is_int(); ok 56 - $x = Math::BigInt->new("-inf"); $x->is_int(); ok 57 - $x = Math::BigInt->new("1"); $x->is_int(); ok 58 - $x = Math::BigInt->new("12"); $x->is_int(); ok 59 - $x = Math::BigInt->new("123e12"); $x->is_int(); ok 60 - $x = Math::BigInt->new("abc"); $x->is_even(); ok 61 - $x = Math::BigInt->new("0"); $x->is_even(); ok 62 - $x = Math::BigInt->new("1"); $x->is_even(); ok 63 - $x = Math::BigInt->new("3"); $x->is_even(); ok 64 - $x = Math::BigInt->new("-1"); $x->is_even(); ok 65 - $x = Math::BigInt->new("-3"); $x->is_even(); ok 66 - $x = Math::BigInt->new("10000001"); $x->is_even(); ok 67 - $x = Math::BigInt->new("10000002"); $x->is_even(); ok 68 - $x = Math::BigInt->new("2"); $x->is_even(); ok 69 - $x = Math::BigInt->new("120"); $x->is_even(); ok 70 - $x = Math::BigInt->new("121"); $x->is_even(); ok 71 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-0"); $x->bacmp($y); ok 72 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 73 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 74 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 75 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+2"); $x->bacmp($y); ok 76 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 77 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bacmp($y); ok 78 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bacmp($y); ok 79 - $x = Math::BigInt->new("+987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 80 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 81 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("+4567889"); $x->bacmp($y); ok 82 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 83 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 84 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 85 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 86 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 87 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 88 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 89 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 90 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 91 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 92 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 93 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 94 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 95 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 96 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 97 - $x = Math::BigInt->bnorm("123"); ok 98 - is a valid object ok 99 - $x = Math::BigInt->bnorm("12.3"); ok 100 - ref($got) ok 101 - $Math::BigInt::upgrade ok 102 - is a valid object ok 103 - $x = Math::BigInt->bnorm("0babc"); ok 104 - is a valid object ok 105 - $x = Math::BigInt->bnorm("0b123"); ok 106 - is a valid object ok 107 - $x = Math::BigInt->bnorm("0b0"); ok 108 - is a valid object ok 109 - $x = Math::BigInt->bnorm("-0b0"); ok 110 - is a valid object ok 111 - $x = Math::BigInt->bnorm("-0b1"); ok 112 - is a valid object ok 113 - $x = Math::BigInt->bnorm("0b0001"); ok 114 - is a valid object ok 115 - $x = Math::BigInt->bnorm("0b001"); ok 116 - is a valid object ok 117 - $x = Math::BigInt->bnorm("0b011"); ok 118 - is a valid object ok 119 - $x = Math::BigInt->bnorm("0b101"); ok 120 - is a valid object ok 121 - $x = Math::BigInt->bnorm("0b1001"); ok 122 - is a valid object ok 123 - $x = Math::BigInt->bnorm("0b10001"); ok 124 - is a valid object ok 125 - $x = Math::BigInt->bnorm("0b100001"); ok 126 - is a valid object ok 127 - $x = Math::BigInt->bnorm("0b1000001"); ok 128 - is a valid object ok 129 - $x = Math::BigInt->bnorm("0b10000001"); ok 130 - is a valid object ok 131 - $x = Math::BigInt->bnorm("0b100000001"); ok 132 - is a valid object ok 133 - $x = Math::BigInt->bnorm("0b1000000001"); ok 134 - is a valid object ok 135 - $x = Math::BigInt->bnorm("0b10000000001"); ok 136 - is a valid object ok 137 - $x = Math::BigInt->bnorm("0b100000000001"); ok 138 - is a valid object ok 139 - $x = Math::BigInt->bnorm("0b1000000000001"); ok 140 - is a valid object ok 141 - $x = Math::BigInt->bnorm("0b10000000000001"); ok 142 - is a valid object ok 143 - $x = Math::BigInt->bnorm("0b100000000000001"); ok 144 - is a valid object ok 145 - $x = Math::BigInt->bnorm("0b1000000000000001"); ok 146 - is a valid object ok 147 - $x = Math::BigInt->bnorm("0b10000000000000001"); ok 148 - is a valid object ok 149 - $x = Math::BigInt->bnorm("0b100000000000000001"); ok 150 - is a valid object ok 151 - $x = Math::BigInt->bnorm("0b1000000000000000001"); ok 152 - is a valid object ok 153 - $x = Math::BigInt->bnorm("0b10000000000000000001"); ok 154 - is a valid object ok 155 - $x = Math::BigInt->bnorm("0b100000000000000000001"); ok 156 - is a valid object ok 157 - $x = Math::BigInt->bnorm("0b1000000000000000000001"); ok 158 - is a valid object ok 159 - $x = Math::BigInt->bnorm("0b10000000000000000000001"); ok 160 - is a valid object ok 161 - $x = Math::BigInt->bnorm("0b100000000000000000000001"); ok 162 - is a valid object ok 163 - $x = Math::BigInt->bnorm("0b1000000000000000000000001"); ok 164 - is a valid object ok 165 - $x = Math::BigInt->bnorm("0b10000000000000000000000001"); ok 166 - is a valid object ok 167 - $x = Math::BigInt->bnorm("0b100000000000000000000000001"); ok 168 - is a valid object ok 169 - $x = Math::BigInt->bnorm("0b1000000000000000000000000001"); ok 170 - is a valid object ok 171 - $x = Math::BigInt->bnorm("0b10000000000000000000000000001"); ok 172 - is a valid object ok 173 - $x = Math::BigInt->bnorm("0b100000000000000000000000000001"); ok 174 - is a valid object ok 175 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000001"); ok 176 - is a valid object ok 177 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000001"); ok 178 - is a valid object ok 179 - $x = Math::BigInt->bnorm("0b100000000000000000000000000000001"); ok 180 - is a valid object ok 181 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000000001"); ok 182 - is a valid object ok 183 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000000001"); ok 184 - is a valid object ok 185 - $x = Math::BigInt->bnorm("0b__101"); ok 186 - is a valid object ok 187 - $x = Math::BigInt->bnorm("0b1_0_1"); ok 188 - is a valid object ok 189 - $x = Math::BigInt->bnorm("0b0_0_0_1"); ok 190 - is a valid object ok 191 - $x = Math::BigInt->bnorm("-0x0"); ok 192 - is a valid object ok 193 - $x = Math::BigInt->bnorm("0xabcdefgh"); ok 194 - is a valid object ok 195 - $x = Math::BigInt->bnorm("0x1234"); ok 196 - is a valid object ok 197 - $x = Math::BigInt->bnorm("0xabcdef"); ok 198 - is a valid object ok 199 - $x = Math::BigInt->bnorm("-0xABCDEF"); ok 200 - is a valid object ok 201 - $x = Math::BigInt->bnorm("-0x1234"); ok 202 - is a valid object ok 203 - $x = Math::BigInt->bnorm("0x12345678"); ok 204 - is a valid object ok 205 - $x = Math::BigInt->bnorm("0x1_2_3_4_56_78"); ok 206 - is a valid object ok 207 - $x = Math::BigInt->bnorm("0xa_b_c_d_e_f"); ok 208 - is a valid object ok 209 - $x = Math::BigInt->bnorm("0x__123"); ok 210 - is a valid object ok 211 - $x = Math::BigInt->bnorm("0x9"); ok 212 - is a valid object ok 213 - $x = Math::BigInt->bnorm("0x11"); ok 214 - is a valid object ok 215 - $x = Math::BigInt->bnorm("0x21"); ok 216 - is a valid object ok 217 - $x = Math::BigInt->bnorm("0x41"); ok 218 - is a valid object ok 219 - $x = Math::BigInt->bnorm("0x81"); ok 220 - is a valid object ok 221 - $x = Math::BigInt->bnorm("0x101"); ok 222 - is a valid object ok 223 - $x = Math::BigInt->bnorm("0x201"); ok 224 - is a valid object ok 225 - $x = Math::BigInt->bnorm("0x401"); ok 226 - is a valid object ok 227 - $x = Math::BigInt->bnorm("0x801"); ok 228 - is a valid object ok 229 - $x = Math::BigInt->bnorm("0x1001"); ok 230 - is a valid object ok 231 - $x = Math::BigInt->bnorm("0x2001"); ok 232 - is a valid object ok 233 - $x = Math::BigInt->bnorm("0x4001"); ok 234 - is a valid object ok 235 - $x = Math::BigInt->bnorm("0x8001"); ok 236 - is a valid object ok 237 - $x = Math::BigInt->bnorm("0x10001"); ok 238 - is a valid object ok 239 - $x = Math::BigInt->bnorm("0x20001"); ok 240 - is a valid object ok 241 - $x = Math::BigInt->bnorm("0x40001"); ok 242 - is a valid object ok 243 - $x = Math::BigInt->bnorm("0x80001"); ok 244 - is a valid object ok 245 - $x = Math::BigInt->bnorm("0x100001"); ok 246 - is a valid object ok 247 - $x = Math::BigInt->bnorm("0x200001"); ok 248 - is a valid object ok 249 - $x = Math::BigInt->bnorm("0x400001"); ok 250 - is a valid object ok 251 - $x = Math::BigInt->bnorm("0x800001"); ok 252 - is a valid object ok 253 - $x = Math::BigInt->bnorm("0x1000001"); ok 254 - is a valid object ok 255 - $x = Math::BigInt->bnorm("0x2000001"); ok 256 - is a valid object ok 257 - $x = Math::BigInt->bnorm("0x4000001"); ok 258 - is a valid object ok 259 - $x = Math::BigInt->bnorm("0x8000001"); ok 260 - is a valid object ok 261 - $x = Math::BigInt->bnorm("0x10000001"); ok 262 - is a valid object ok 263 - $x = Math::BigInt->bnorm("0x20000001"); ok 264 - is a valid object ok 265 - $x = Math::BigInt->bnorm("0x40000001"); ok 266 - is a valid object ok 267 - $x = Math::BigInt->bnorm("0x80000001"); ok 268 - is a valid object ok 269 - $x = Math::BigInt->bnorm("0x100000001"); ok 270 - is a valid object ok 271 - $x = Math::BigInt->bnorm("0x200000001"); ok 272 - is a valid object ok 273 - $x = Math::BigInt->bnorm("0x400000001"); ok 274 - is a valid object ok 275 - $x = Math::BigInt->bnorm("0x800000001"); ok 276 - is a valid object ok 277 - $x = Math::BigInt->bnorm("inf"); ok 278 - is a valid object ok 279 - $x = Math::BigInt->bnorm("+inf"); ok 280 - is a valid object ok 281 - $x = Math::BigInt->bnorm("-inf"); ok 282 - is a valid object ok 283 - $x = Math::BigInt->bnorm("0inf"); ok 284 - is a valid object ok 285 - $x = Math::BigInt->bnorm(""); ok 286 - is a valid object ok 287 - $x = Math::BigInt->bnorm("abc"); ok 288 - is a valid object ok 289 - $x = Math::BigInt->bnorm(" 1 a"); ok 290 - is a valid object ok 291 - $x = Math::BigInt->bnorm("1bcd2"); ok 292 - is a valid object ok 293 - $x = Math::BigInt->bnorm("11111b"); ok 294 - is a valid object ok 295 - $x = Math::BigInt->bnorm("+1z"); ok 296 - is a valid object ok 297 - $x = Math::BigInt->bnorm("-1z"); ok 298 - is a valid object ok 299 - $x = Math::BigInt->bnorm("_123"); ok 300 - is a valid object ok 301 - $x = Math::BigInt->bnorm("_123_"); ok 302 - is a valid object ok 303 - $x = Math::BigInt->bnorm("123_"); ok 304 - is a valid object ok 305 - $x = Math::BigInt->bnorm("1__23"); ok 306 - is a valid object ok 307 - $x = Math::BigInt->bnorm("1E1__2"); ok 308 - is a valid object ok 309 - $x = Math::BigInt->bnorm("1_E12"); ok 310 - is a valid object ok 311 - $x = Math::BigInt->bnorm("1E_12"); ok 312 - is a valid object ok 313 - $x = Math::BigInt->bnorm("1_E_12"); ok 314 - is a valid object ok 315 - $x = Math::BigInt->bnorm("+_1E12"); ok 316 - is a valid object ok 317 - $x = Math::BigInt->bnorm("+0_1E2"); ok 318 - is a valid object ok 319 - $x = Math::BigInt->bnorm("+0_0_1E2"); ok 320 - is a valid object ok 321 - $x = Math::BigInt->bnorm("-0_0_1E2"); ok 322 - is a valid object ok 323 - $x = Math::BigInt->bnorm("-0_0_1E+0_0_2"); ok 324 - is a valid object ok 325 - $x = Math::BigInt->bnorm("E1"); ok 326 - is a valid object ok 327 - $x = Math::BigInt->bnorm("E23"); ok 328 - is a valid object ok 329 - $x = Math::BigInt->bnorm("1.23E1"); ok 330 - ref($got) ok 331 - $Math::BigInt::upgrade ok 332 - is a valid object ok 333 - $x = Math::BigInt->bnorm("1.23E-1"); ok 334 - ref($got) ok 335 - $Math::BigInt::upgrade ok 336 - is a valid object ok 337 - $x = Math::BigInt->bnorm("1e2e3"); ok 338 - is a valid object ok 339 - $x = Math::BigInt->bnorm("1e2r"); ok 340 - is a valid object ok 341 - $x = Math::BigInt->bnorm("1e2.0"); ok 342 - is a valid object ok 343 - $x = Math::BigInt->bnorm("012"); ok 344 - is a valid object ok 345 - $x = Math::BigInt->bnorm("0123"); ok 346 - is a valid object ok 347 - $x = Math::BigInt->bnorm("01234"); ok 348 - is a valid object ok 349 - $x = Math::BigInt->bnorm("012345"); ok 350 - is a valid object ok 351 - $x = Math::BigInt->bnorm("0123456"); ok 352 - is a valid object ok 353 - $x = Math::BigInt->bnorm("01234567"); ok 354 - is a valid object ok 355 - $x = Math::BigInt->bnorm("012345678"); ok 356 - is a valid object ok 357 - $x = Math::BigInt->bnorm("0123456789"); ok 358 - is a valid object ok 359 - $x = Math::BigInt->bnorm("01234567891"); ok 360 - is a valid object ok 361 - $x = Math::BigInt->bnorm("012345678912"); ok 362 - is a valid object ok 363 - $x = Math::BigInt->bnorm("0123456789123"); ok 364 - is a valid object ok 365 - $x = Math::BigInt->bnorm("01234567891234"); ok 366 - is a valid object ok 367 - $x = Math::BigInt->bnorm("0"); ok 368 - is a valid object ok 369 - $x = Math::BigInt->bnorm("+0"); ok 370 - is a valid object ok 371 - $x = Math::BigInt->bnorm("+00"); ok 372 - is a valid object ok 373 - $x = Math::BigInt->bnorm("+000"); ok 374 - is a valid object ok 375 - $x = Math::BigInt->bnorm("000000000000000000"); ok 376 - is a valid object ok 377 - $x = Math::BigInt->bnorm("-0"); ok 378 - is a valid object ok 379 - $x = Math::BigInt->bnorm("-0000"); ok 380 - is a valid object ok 381 - $x = Math::BigInt->bnorm("+1"); ok 382 - is a valid object ok 383 - $x = Math::BigInt->bnorm("+01"); ok 384 - is a valid object ok 385 - $x = Math::BigInt->bnorm("+001"); ok 386 - is a valid object ok 387 - $x = Math::BigInt->bnorm("+00000100000"); ok 388 - is a valid object ok 389 - $x = Math::BigInt->bnorm("123456789"); ok 390 - is a valid object ok 391 - $x = Math::BigInt->bnorm("-1"); ok 392 - is a valid object ok 393 - $x = Math::BigInt->bnorm("-01"); ok 394 - is a valid object ok 395 - $x = Math::BigInt->bnorm("-001"); ok 396 - is a valid object ok 397 - $x = Math::BigInt->bnorm("-123456789"); ok 398 - is a valid object ok 399 - $x = Math::BigInt->bnorm("-00000100000"); ok 400 - is a valid object ok 401 - $x = Math::BigInt->bnorm("1_2_3"); ok 402 - is a valid object ok 403 - $x = Math::BigInt->bnorm("10000000000E-1_0"); ok 404 - is a valid object ok 405 - $x = Math::BigInt->bnorm("1E2"); ok 406 - is a valid object ok 407 - $x = Math::BigInt->bnorm("1E1"); ok 408 - is a valid object ok 409 - $x = Math::BigInt->bnorm("1E0"); ok 410 - is a valid object ok 411 - $x = Math::BigInt->bnorm("1.23E2"); ok 412 - is a valid object ok 413 - $x = Math::BigInt->bnorm("100E-1"); ok 414 - is a valid object ok 415 - $x = Math::BigInt->bnorm("1.E3"); ok 416 - is a valid object ok 417 - $x = Math::BigInt->bnorm("1.01E2"); ok 418 - is a valid object ok 419 - $x = Math::BigInt->bnorm("1010E-1"); ok 420 - is a valid object ok 421 - $x = Math::BigInt->bnorm("-1010E0"); ok 422 - is a valid object ok 423 - $x = Math::BigInt->bnorm("-1010E1"); ok 424 - is a valid object ok 425 - $x = Math::BigInt->bnorm("1234.00"); ok 426 - is a valid object ok 427 - $x = Math::BigInt->bnorm("-1010E-2"); ok 428 - ref($got) ok 429 - $Math::BigInt::upgrade ok 430 - is a valid object ok 431 - $x = Math::BigInt->bnorm("-1.01E+1"); ok 432 - ref($got) ok 433 - $Math::BigInt::upgrade ok 434 - is a valid object ok 435 - $x = Math::BigInt->bnorm("-1.01E-1"); ok 436 - ref($got) ok 437 - $Math::BigInt::upgrade ok 438 - is a valid object ok 439 - $x = Math::BigInt->new("1"); $x->bnan(); ok 440 - is a valid object ok 441 - $x = Math::BigInt->new("2"); $x->bnan(); ok 442 - is a valid object ok 443 - $x = Math::BigInt->new("abc"); $x->bnan(); ok 444 - is a valid object ok 445 - $x = Math::BigInt->new("2"); $x->bone('+'); ok 446 - is a valid object ok 447 - $x = Math::BigInt->new("2"); $x->bone('-'); ok 448 - is a valid object ok 449 - $x = Math::BigInt->new("boneNaN"); $x->bone('-'); ok 450 - is a valid object ok 451 - $x = Math::BigInt->new("boneNaN"); $x->bone('+'); ok 452 - is a valid object ok 453 - $x = Math::BigInt->new("2"); $x->bone('abc'); ok 454 - is a valid object ok 455 - $x = Math::BigInt->new("3"); $x->bone(''); ok 456 - is a valid object ok 457 - $x = Math::BigInt->new("1"); $x->binf('+'); ok 458 - is a valid object ok 459 - $x = Math::BigInt->new("2"); $x->binf('-'); ok 460 - is a valid object ok 461 - $x = Math::BigInt->new("3"); $x->binf('abc'); ok 462 - is a valid object ok 463 - $x = Math::BigInt->new("123"); $x->is_nan(); ok 464 - $x = Math::BigInt->new("abc"); $x->is_nan(); ok 465 - $x = Math::BigInt->new("NaN"); $x->is_nan(); ok 466 - $x = Math::BigInt->new("-123"); $x->is_nan(); ok 467 - $x = Math::BigInt->new("+inf"); $x->is_inf(''); ok 468 - $x = Math::BigInt->new("-inf"); $x->is_inf(''); ok 469 - $x = Math::BigInt->new("abc"); $x->is_inf(''); ok 470 - $x = Math::BigInt->new("1"); $x->is_inf(''); ok 471 - $x = Math::BigInt->new("NaN"); $x->is_inf(''); ok 472 - $x = Math::BigInt->new("-1"); $x->is_inf(''); ok 473 - $x = Math::BigInt->new("+inf"); $x->is_inf('-'); ok 474 - $x = Math::BigInt->new("+inf"); $x->is_inf('+'); ok 475 - $x = Math::BigInt->new("-inf"); $x->is_inf('-'); ok 476 - $x = Math::BigInt->new("-inf"); $x->is_inf('+'); ok 477 - $x = Math::BigInt->new("+iNfInItY"); $x->is_inf(''); ok 478 - $x = Math::BigInt->new("-InFiNiTy"); $x->is_inf(''); ok 479 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x << $y; ok 480 - is a valid object ok 481 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+2"); $x << $y; ok 482 - is a valid object ok 483 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+32"); $x << $y; ok 484 - is a valid object ok 485 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+48"); $x << $y; ok 486 - is a valid object ok 487 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("-2"); $x << $y; ok 488 - is a valid object ok 489 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("4"); $x->blsft($y, 10); ok 490 - is a valid object ok 491 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 492 - is a valid object ok 493 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 494 - is a valid object ok 495 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 496 - is a valid object ok 497 - $x = Math::BigInt->new("+12"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 498 - is a valid object ok 499 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->blsft($y, 10); ok 500 - is a valid object ok 501 - $x = Math::BigInt->new("1234567890123"); $y = Math::BigInt->new("12"); $x->blsft($y, 10); ok 502 - is a valid object ok 503 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x >> $y; ok 504 - is a valid object ok 505 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x >> $y; ok 506 - is a valid object ok 507 - $x = Math::BigInt->new("+4294967296"); $y = Math::BigInt->new("+32"); $x >> $y; ok 508 - is a valid object ok 509 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+48"); $x >> $y; ok 510 - is a valid object ok 511 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-2"); $x >> $y; ok 512 - is a valid object ok 513 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 514 - is a valid object ok 515 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 516 - is a valid object ok 517 - $x = Math::BigInt->new("+200"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 518 - is a valid object ok 519 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("3"); $x->brsft($y, 10); ok 520 - is a valid object ok 521 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 522 - is a valid object ok 523 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->brsft($y, 10); ok 524 - is a valid object ok 525 - $x = Math::BigInt->new("310000"); $y = Math::BigInt->new("4"); $x->brsft($y, 10); ok 526 - is a valid object ok 527 - $x = Math::BigInt->new("12300000"); $y = Math::BigInt->new("5"); $x->brsft($y, 10); ok 528 - is a valid object ok 529 - $x = Math::BigInt->new("1230000000000"); $y = Math::BigInt->new("10"); $x->brsft($y, 10); ok 530 - is a valid object ok 531 - $x = Math::BigInt->new("09876123456789067890"); $y = Math::BigInt->new("12"); $x->brsft($y, 10); ok 532 - is a valid object ok 533 - $x = Math::BigInt->new("1234561234567890123"); $y = Math::BigInt->new("13"); $x->brsft($y, 10); ok 534 - is a valid object ok 535 - $x = Math::BigInt->new("1e+34"); $x->bsstr(); ok 536 - $x = Math::BigInt->new("123.456E3"); $x->bsstr(); ok 537 - $x = Math::BigInt->new("100"); $x->bsstr(); ok 538 - $x = Math::BigInt->new("abc"); $x->bsstr(); ok 539 - $x = Math::BigInt->new("bnegNaN"); $x->bneg(); ok 540 - is a valid object ok 541 - $x = Math::BigInt->new("+inf"); $x->bneg(); ok 542 - is a valid object ok 543 - $x = Math::BigInt->new("-inf"); $x->bneg(); ok 544 - is a valid object ok 545 - $x = Math::BigInt->new("abd"); $x->bneg(); ok 546 - is a valid object ok 547 - $x = Math::BigInt->new("0"); $x->bneg(); ok 548 - is a valid object ok 549 - $x = Math::BigInt->new("1"); $x->bneg(); ok 550 - is a valid object ok 551 - $x = Math::BigInt->new("-1"); $x->bneg(); ok 552 - is a valid object ok 553 - $x = Math::BigInt->new("+123456789"); $x->bneg(); ok 554 - is a valid object ok 555 - $x = Math::BigInt->new("-123456789"); $x->bneg(); ok 556 - is a valid object ok 557 - $x = Math::BigInt->new("babsNaN"); $x->babs(); ok 558 - is a valid object ok 559 - $x = Math::BigInt->new("+inf"); $x->babs(); ok 560 - is a valid object ok 561 - $x = Math::BigInt->new("-inf"); $x->babs(); ok 562 - is a valid object ok 563 - $x = Math::BigInt->new("0"); $x->babs(); ok 564 - is a valid object ok 565 - $x = Math::BigInt->new("1"); $x->babs(); ok 566 - is a valid object ok 567 - $x = Math::BigInt->new("-1"); $x->babs(); ok 568 - is a valid object ok 569 - $x = Math::BigInt->new("+123456789"); $x->babs(); ok 570 - is a valid object ok 571 - $x = Math::BigInt->new("-123456789"); $x->babs(); ok 572 - is a valid object ok 573 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 574 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 575 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 576 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 577 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 578 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 579 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 580 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 581 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 582 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 583 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 584 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 585 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 586 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("12"); $x->bcmp($y); ok 587 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 588 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 589 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-12"); $x->bcmp($y); ok 590 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 591 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("124"); $x->bcmp($y); ok 592 - $x = Math::BigInt->new("124"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 593 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-124"); $x->bcmp($y); ok 594 - $x = Math::BigInt->new("-124"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 595 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("5"); $x->bcmp($y); ok 596 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->bcmp($y); ok 597 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bcmp($y); ok 598 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("123456789"); $x->bcmp($y); ok 599 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 600 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 601 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 602 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 603 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 604 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 605 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 606 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 607 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 608 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 609 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 610 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 611 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 612 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 613 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 614 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 615 - $x = Math::BigInt->new("abc"); $x->binc(); ok 616 - is a valid object ok 617 - $x = Math::BigInt->new("+inf"); $x->binc(); ok 618 - is a valid object ok 619 - $x = Math::BigInt->new("-inf"); $x->binc(); ok 620 - is a valid object ok 621 - $x = Math::BigInt->new("+0"); $x->binc(); ok 622 - is a valid object ok 623 - $x = Math::BigInt->new("+1"); $x->binc(); ok 624 - is a valid object ok 625 - $x = Math::BigInt->new("-1"); $x->binc(); ok 626 - is a valid object ok 627 - $x = Math::BigInt->new("abc"); $x->bdec(); ok 628 - is a valid object ok 629 - $x = Math::BigInt->new("+inf"); $x->bdec(); ok 630 - is a valid object ok 631 - $x = Math::BigInt->new("-inf"); $x->bdec(); ok 632 - is a valid object ok 633 - $x = Math::BigInt->new("+0"); $x->bdec(); ok 634 - is a valid object ok 635 - $x = Math::BigInt->new("+1"); $x->bdec(); ok 636 - is a valid object ok 637 - $x = Math::BigInt->new("-1"); $x->bdec(); ok 638 - is a valid object ok 639 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x + $y; ok 640 - is a valid object ok 641 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x + $y; ok 642 - is a valid object ok 643 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x + $y; ok 644 - is a valid object ok 645 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x + $y; ok 646 - is a valid object ok 647 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x + $y; ok 648 - is a valid object ok 649 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x + $y; ok 650 - is a valid object ok 651 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x + $y; ok 652 - is a valid object ok 653 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x + $y; ok 654 - is a valid object ok 655 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x + $y; ok 656 - is a valid object ok 657 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("baddNaN"); $x + $y; ok 658 - is a valid object ok 659 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("baddNaN"); $x + $y; ok 660 - is a valid object ok 661 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x + $y; ok 662 - is a valid object ok 663 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x + $y; ok 664 - is a valid object ok 665 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x + $y; ok 666 - is a valid object ok 667 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x + $y; ok 668 - is a valid object ok 669 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x + $y; ok 670 - is a valid object ok 671 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x + $y; ok 672 - is a valid object ok 673 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x + $y; ok 674 - is a valid object ok 675 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x + $y; ok 676 - is a valid object ok 677 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x + $y; ok 678 - is a valid object ok 679 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x + $y; ok 680 - is a valid object ok 681 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x + $y; ok 682 - is a valid object ok 683 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x + $y; ok 684 - is a valid object ok 685 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x + $y; ok 686 - is a valid object ok 687 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x + $y; ok 688 - is a valid object ok 689 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 690 - is a valid object ok 691 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 692 - is a valid object ok 693 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 694 - is a valid object ok 695 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 696 - is a valid object ok 697 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 698 - is a valid object ok 699 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 700 - is a valid object ok 701 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x + $y; ok 702 - is a valid object ok 703 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x + $y; ok 704 - is a valid object ok 705 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x + $y; ok 706 - is a valid object ok 707 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x + $y; ok 708 - is a valid object ok 709 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x + $y; ok 710 - is a valid object ok 711 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 712 - is a valid object ok 713 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 714 - is a valid object ok 715 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 716 - is a valid object ok 717 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 718 - is a valid object ok 719 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 720 - is a valid object ok 721 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("987654321"); $x + $y; ok 722 - is a valid object ok 723 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x + $y; ok 724 - is a valid object ok 725 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x + $y; ok 726 - is a valid object ok 727 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x + $y; ok 728 - is a valid object ok 729 - $x = Math::BigInt->new("2"); $y = Math::BigFloat->new("2.5"); $x + $y; ok 730 - ref($got) ok 731 - $Math::BigInt::upgrade ok 732 - is a valid object ok 733 - $x = Math::BigInt->new("-123"); $y = Math::BigFloat->new("-1.5"); $x + $y; ok 734 - ref($got) ok 735 - $Math::BigInt::upgrade ok 736 - is a valid object ok 737 - $x = Math::BigInt->new("-1.2"); $y = Math::BigInt->new("1"); $x + $y; ok 738 - ref($got) ok 739 - $Math::BigInt::upgrade ok 740 - is a valid object ok 741 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x - $y; ok 742 - is a valid object ok 743 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x - $y; ok 744 - is a valid object ok 745 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x - $y; ok 746 - is a valid object ok 747 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x - $y; ok 748 - is a valid object ok 749 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x - $y; ok 750 - is a valid object ok 751 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x - $y; ok 752 - is a valid object ok 753 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x - $y; ok 754 - is a valid object ok 755 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x - $y; ok 756 - is a valid object ok 757 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x - $y; ok 758 - is a valid object ok 759 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x - $y; ok 760 - is a valid object ok 761 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x - $y; ok 762 - is a valid object ok 763 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x - $y; ok 764 - is a valid object ok 765 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x - $y; ok 766 - is a valid object ok 767 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x - $y; ok 768 - is a valid object ok 769 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x - $y; ok 770 - is a valid object ok 771 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x - $y; ok 772 - is a valid object ok 773 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x - $y; ok 774 - is a valid object ok 775 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x - $y; ok 776 - is a valid object ok 777 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x - $y; ok 778 - is a valid object ok 779 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x - $y; ok 780 - is a valid object ok 781 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x - $y; ok 782 - is a valid object ok 783 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 784 - is a valid object ok 785 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 786 - is a valid object ok 787 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 788 - is a valid object ok 789 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 790 - is a valid object ok 791 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 792 - is a valid object ok 793 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 794 - is a valid object ok 795 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x - $y; ok 796 - is a valid object ok 797 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x - $y; ok 798 - is a valid object ok 799 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x - $y; ok 800 - is a valid object ok 801 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x - $y; ok 802 - is a valid object ok 803 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x - $y; ok 804 - is a valid object ok 805 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 806 - is a valid object ok 807 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 808 - is a valid object ok 809 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 810 - is a valid object ok 811 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 812 - is a valid object ok 813 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 814 - is a valid object ok 815 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("+987654321"); $x - $y; ok 816 - is a valid object ok 817 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x - $y; ok 818 - is a valid object ok 819 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x - $y; ok 820 - is a valid object ok 821 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x - $y; ok 822 - is a valid object ok 823 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x * $y; ok 824 - is a valid object ok 825 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x * $y; ok 826 - is a valid object ok 827 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x * $y; ok 828 - is a valid object ok 829 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("+inf"); $x * $y; ok 830 - is a valid object ok 831 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("-inf"); $x * $y; ok 832 - is a valid object ok 833 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaNmul"); $x * $y; ok 834 - is a valid object ok 835 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaNmul"); $x * $y; ok 836 - is a valid object ok 837 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x * $y; ok 838 - is a valid object ok 839 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x * $y; ok 840 - is a valid object ok 841 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x * $y; ok 842 - is a valid object ok 843 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x * $y; ok 844 - is a valid object ok 845 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x * $y; ok 846 - is a valid object ok 847 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x * $y; ok 848 - is a valid object ok 849 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x * $y; ok 850 - is a valid object ok 851 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x * $y; ok 852 - is a valid object ok 853 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x * $y; ok 854 - is a valid object ok 855 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $x * $y; ok 856 - is a valid object ok 857 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $x * $y; ok 858 - is a valid object ok 859 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x * $y; ok 860 - is a valid object ok 861 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x * $y; ok 862 - is a valid object ok 863 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x * $y; ok 864 - is a valid object ok 865 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x * $y; ok 866 - is a valid object ok 867 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $x * $y; ok 868 - is a valid object ok 869 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $x * $y; ok 870 - is a valid object ok 871 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $x * $y; ok 872 - is a valid object ok 873 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x * $y; ok 874 - is a valid object ok 875 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $x * $y; ok 876 - is a valid object ok 877 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $x * $y; ok 878 - is a valid object ok 879 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $x * $y; ok 880 - is a valid object ok 881 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $x * $y; ok 882 - is a valid object ok 883 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $x * $y; ok 884 - is a valid object ok 885 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $x * $y; ok 886 - is a valid object ok 887 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $x * $y; ok 888 - is a valid object ok 889 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $x * $y; ok 890 - is a valid object ok 891 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $x * $y; ok 892 - is a valid object ok 893 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $x * $y; ok 894 - is a valid object ok 895 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $x * $y; ok 896 - is a valid object ok 897 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $x * $y; ok 898 - is a valid object ok 899 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $x * $y; ok 900 - is a valid object ok 901 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $x * $y; ok 902 - is a valid object ok 903 - $x = Math::BigInt->new("+25"); $y = Math::BigInt->new("+25"); $x * $y; ok 904 - is a valid object ok 905 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("+12345"); $x * $y; ok 906 - is a valid object ok 907 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+11111"); $x * $y; ok 908 - is a valid object ok 909 - $x = Math::BigInt->new("9999"); $y = Math::BigInt->new("10000"); $x * $y; ok 910 - is a valid object ok 911 - $x = Math::BigInt->new("99999"); $y = Math::BigInt->new("100000"); $x * $y; ok 912 - is a valid object ok 913 - $x = Math::BigInt->new("999999"); $y = Math::BigInt->new("1000000"); $x * $y; ok 914 - is a valid object ok 915 - $x = Math::BigInt->new("9999999"); $y = Math::BigInt->new("10000000"); $x * $y; ok 916 - is a valid object ok 917 - $x = Math::BigInt->new("99999999"); $y = Math::BigInt->new("100000000"); $x * $y; ok 918 - is a valid object ok 919 - $x = Math::BigInt->new("999999999"); $y = Math::BigInt->new("1000000000"); $x * $y; ok 920 - is a valid object ok 921 - $x = Math::BigInt->new("9999999999"); $y = Math::BigInt->new("10000000000"); $x * $y; ok 922 - is a valid object ok 923 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("100000000000"); $x * $y; ok 924 - is a valid object ok 925 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("1000000000000"); $x * $y; ok 926 - is a valid object ok 927 - $x = Math::BigInt->new("9999999999999"); $y = Math::BigInt->new("10000000000000"); $x * $y; ok 928 - is a valid object ok 929 - $x = Math::BigInt->new("99999999999999"); $y = Math::BigInt->new("100000000000000"); $x * $y; ok 930 - is a valid object ok 931 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("1000000000000000"); $x * $y; ok 932 - is a valid object ok 933 - $x = Math::BigInt->new("9999999999999999"); $y = Math::BigInt->new("10000000000000000"); $x * $y; ok 934 - is a valid object ok 935 - $x = Math::BigInt->new("99999999999999999"); $y = Math::BigInt->new("100000000000000000"); $x * $y; ok 936 - is a valid object ok 937 - $x = Math::BigInt->new("999999999999999999"); $y = Math::BigInt->new("1000000000000000000"); $x * $y; ok 938 - is a valid object ok 939 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $x * $y; ok 940 - is a valid object ok 941 - $x = Math::BigInt->new("3"); $y = Math::BigFloat->new("3.5"); $x * $y; ok 942 - ref($got) ok 943 - $Math::BigInt::upgrade ok 944 - is a valid object ok 945 - $x = Math::BigInt->new("3.5"); $y = Math::BigInt->new("3"); $x * $y; ok 946 - ref($got) ok 947 - $Math::BigInt::upgrade ok 948 - is a valid object ok 949 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("20"); join(",", $x->bdiv($y)); ok 950 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); join(",", $x->bdiv($y)); ok 951 - $x = Math::BigInt->new("-4095"); $y = Math::BigInt->new("-4095"); join(",", $x->bdiv($y)); ok 952 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("-4095"); join(",", $x->bdiv($y)); ok 953 - $x = Math::BigInt->new("-4095"); $y = Math::BigInt->new("4095"); join(",", $x->bdiv($y)); ok 954 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 955 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 956 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("4"); join(",", $x->bdiv($y)); ok 957 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("8"); join(",", $x->bdiv($y)); ok 958 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("8"); join(",", $x->bdiv($y)); ok 959 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 960 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 961 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 962 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 963 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 964 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 965 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 966 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 967 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 968 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 969 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 970 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 971 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 972 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 973 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 974 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 975 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 976 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 977 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 978 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 979 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 980 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 981 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 982 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 983 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x / $y; ok 984 - is a valid object ok 985 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("1"); $x / $y; ok 986 - is a valid object ok 987 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("abc"); $x / $y; ok 988 - is a valid object ok 989 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x / $y; ok 990 - is a valid object ok 991 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x / $y; ok 992 - is a valid object ok 993 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x / $y; ok 994 - is a valid object ok 995 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x / $y; ok 996 - is a valid object ok 997 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x / $y; ok 998 - is a valid object ok 999 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x / $y; ok 1000 - is a valid object ok 1001 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1002 - is a valid object ok 1003 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x / $y; ok 1004 - is a valid object ok 1005 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x / $y; ok 1006 - is a valid object ok 1007 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x / $y; ok 1008 - is a valid object ok 1009 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x / $y; ok 1010 - is a valid object ok 1011 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x / $y; ok 1012 - is a valid object ok 1013 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x / $y; ok 1014 - is a valid object ok 1015 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x / $y; ok 1016 - is a valid object ok 1017 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1018 - is a valid object ok 1019 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x / $y; ok 1020 - is a valid object ok 1021 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1022 - is a valid object ok 1023 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); $x / $y; ok 1024 - is a valid object ok 1025 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x / $y; ok 1026 - is a valid object ok 1027 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); $x / $y; ok 1028 - is a valid object ok 1029 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x / $y; ok 1030 - is a valid object ok 1031 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); $x / $y; ok 1032 - ref($got) ok 1033 - $Math::BigInt::upgrade ok 1034 - is a valid object ok 1035 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("-2"); $x / $y; ok 1036 - ref($got) ok 1037 - $Math::BigInt::upgrade ok 1038 - is a valid object ok 1039 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); $x / $y; ok 1040 - ref($got) ok 1041 - $Math::BigInt::upgrade ok 1042 - is a valid object ok 1043 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); $x / $y; ok 1044 - ref($got) ok 1045 - $Math::BigInt::upgrade ok 1046 - is a valid object ok 1047 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x / $y; ok 1048 - is a valid object ok 1049 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x / $y; ok 1050 - is a valid object ok 1051 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x / $y; ok 1052 - is a valid object ok 1053 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x / $y; ok 1054 - is a valid object ok 1055 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x / $y; ok 1056 - is a valid object ok 1057 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x / $y; ok 1058 - is a valid object ok 1059 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x / $y; ok 1060 - ref($got) ok 1061 - $Math::BigInt::upgrade ok 1062 - is a valid object ok 1063 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x / $y; ok 1064 - is a valid object ok 1065 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1066 - ref($got) ok 1067 - $Math::BigInt::upgrade ok 1068 - is a valid object ok 1069 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1070 - ref($got) ok 1071 - $Math::BigInt::upgrade ok 1072 - is a valid object ok 1073 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1074 - ref($got) ok 1075 - $Math::BigInt::upgrade ok 1076 - is a valid object ok 1077 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1078 - ref($got) ok 1079 - $Math::BigInt::upgrade ok 1080 - is a valid object ok 1081 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1082 - ref($got) ok 1083 - $Math::BigInt::upgrade ok 1084 - is a valid object ok 1085 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1086 - ref($got) ok 1087 - $Math::BigInt::upgrade ok 1088 - is a valid object ok 1089 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1090 - ref($got) ok 1091 - $Math::BigInt::upgrade ok 1092 - is a valid object ok 1093 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1094 - ref($got) ok 1095 - $Math::BigInt::upgrade ok 1096 - is a valid object ok 1097 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1098 - is a valid object ok 1099 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x / $y; ok 1100 - ref($got) ok 1101 - $Math::BigInt::upgrade ok 1102 - is a valid object ok 1103 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x / $y; ok 1104 - ref($got) ok 1105 - $Math::BigInt::upgrade ok 1106 - is a valid object ok 1107 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x / $y; ok 1108 - ref($got) ok 1109 - $Math::BigInt::upgrade ok 1110 - is a valid object ok 1111 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x / $y; ok 1112 - ref($got) ok 1113 - $Math::BigInt::upgrade ok 1114 - is a valid object ok 1115 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("+5"); $x / $y; ok 1116 - is a valid object ok 1117 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("+4"); $x / $y; ok 1118 - is a valid object ok 1119 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("+8"); $x / $y; ok 1120 - is a valid object ok 1121 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("+16"); $x / $y; ok 1122 - is a valid object ok 1123 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x / $y; ok 1124 - is a valid object ok 1125 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x / $y; ok 1126 - is a valid object ok 1127 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x / $y; ok 1128 - is a valid object ok 1129 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x / $y; ok 1130 - is a valid object ok 1131 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x / $y; ok 1132 - is a valid object ok 1133 - $x = Math::BigInt->new("+1111088889"); $y = Math::BigInt->new("99999"); $x / $y; ok 1134 - is a valid object ok 1135 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x / $y; ok 1136 - ref($got) ok 1137 - $Math::BigInt::upgrade ok 1138 - is a valid object ok 1139 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x / $y; ok 1140 - ref($got) ok 1141 - $Math::BigInt::upgrade ok 1142 - is a valid object ok 1143 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x / $y; ok 1144 - ref($got) ok 1145 - $Math::BigInt::upgrade ok 1146 - is a valid object ok 1147 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x / $y; ok 1148 - ref($got) ok 1149 - $Math::BigInt::upgrade ok 1150 - is a valid object ok 1151 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x / $y; ok 1152 - ref($got) ok 1153 - $Math::BigInt::upgrade ok 1154 - is a valid object ok 1155 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x / $y; ok 1156 - ref($got) ok 1157 - $Math::BigInt::upgrade ok 1158 - is a valid object ok 1159 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x / $y; ok 1160 - ref($got) ok 1161 - $Math::BigInt::upgrade ok 1162 - is a valid object ok 1163 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x / $y; ok 1164 - ref($got) ok 1165 - $Math::BigInt::upgrade ok 1166 - is a valid object ok 1167 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5"); $x / $y; ok 1168 - ref($got) ok 1169 - $Math::BigInt::upgrade ok 1170 - is a valid object ok 1171 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("5"); $x / $y; ok 1172 - ref($got) ok 1173 - $Math::BigInt::upgrade ok 1174 - is a valid object ok 1175 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("-3"); $x / $y; ok 1176 - ref($got) ok 1177 - $Math::BigInt::upgrade ok 1178 - is a valid object ok 1179 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("3"); $x / $y; ok 1180 - ref($got) ok 1181 - $Math::BigInt::upgrade ok 1182 - is a valid object ok 1183 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("-3"); $x / $y; ok 1184 - ref($got) ok 1185 - $Math::BigInt::upgrade ok 1186 - is a valid object ok 1187 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("3"); $x / $y; ok 1188 - ref($got) ok 1189 - $Math::BigInt::upgrade ok 1190 - is a valid object ok 1191 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("24"); $x / $y; ok 1192 - ref($got) ok 1193 - $Math::BigInt::upgrade ok 1194 - is a valid object ok 1195 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x % $y; ok 1196 - is a valid object ok 1197 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1198 - is a valid object ok 1199 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x % $y; ok 1200 - is a valid object ok 1201 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1202 - is a valid object ok 1203 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x % $y; ok 1204 - is a valid object ok 1205 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1206 - is a valid object ok 1207 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x % $y; ok 1208 - is a valid object ok 1209 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x % $y; ok 1210 - is a valid object ok 1211 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 1212 - is a valid object ok 1213 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 1214 - is a valid object ok 1215 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x % $y; ok 1216 - is a valid object ok 1217 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x % $y; ok 1218 - is a valid object ok 1219 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 1220 - is a valid object ok 1221 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1222 - is a valid object ok 1223 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 1224 - is a valid object ok 1225 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1226 - is a valid object ok 1227 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); $x % $y; ok 1228 - is a valid object ok 1229 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x % $y; ok 1230 - is a valid object ok 1231 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x % $y; ok 1232 - is a valid object ok 1233 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); $x % $y; ok 1234 - is a valid object ok 1235 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x % $y; ok 1236 - is a valid object ok 1237 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x % $y; ok 1238 - is a valid object ok 1239 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("1"); $x % $y; ok 1240 - is a valid object ok 1241 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("abc"); $x % $y; ok 1242 - is a valid object ok 1243 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x % $y; ok 1244 - is a valid object ok 1245 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x % $y; ok 1246 - is a valid object ok 1247 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x % $y; ok 1248 - is a valid object ok 1249 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x % $y; ok 1250 - is a valid object ok 1251 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x % $y; ok 1252 - is a valid object ok 1253 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x % $y; ok 1254 - is a valid object ok 1255 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x % $y; ok 1256 - is a valid object ok 1257 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x % $y; ok 1258 - is a valid object ok 1259 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x % $y; ok 1260 - is a valid object ok 1261 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x % $y; ok 1262 - is a valid object ok 1263 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1264 - is a valid object ok 1265 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1266 - is a valid object ok 1267 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1268 - is a valid object ok 1269 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1270 - is a valid object ok 1271 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1272 - is a valid object ok 1273 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1274 - is a valid object ok 1275 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1276 - is a valid object ok 1277 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1278 - is a valid object ok 1279 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1280 - is a valid object ok 1281 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x % $y; ok 1282 - is a valid object ok 1283 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x % $y; ok 1284 - is a valid object ok 1285 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x % $y; ok 1286 - is a valid object ok 1287 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x % $y; ok 1288 - is a valid object ok 1289 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x % $y; ok 1290 - is a valid object ok 1291 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("4"); $x % $y; ok 1292 - is a valid object ok 1293 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("8"); $x % $y; ok 1294 - is a valid object ok 1295 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("16"); $x % $y; ok 1296 - is a valid object ok 1297 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x % $y; ok 1298 - is a valid object ok 1299 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x % $y; ok 1300 - is a valid object ok 1301 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x % $y; ok 1302 - is a valid object ok 1303 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x % $y; ok 1304 - is a valid object ok 1305 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x % $y; ok 1306 - is a valid object ok 1307 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("+5"); $x % $y; ok 1308 - is a valid object ok 1309 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("-5"); $x % $y; ok 1310 - is a valid object ok 1311 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("-5"); $x % $y; ok 1312 - is a valid object ok 1313 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x % $y; ok 1314 - is a valid object ok 1315 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x % $y; ok 1316 - is a valid object ok 1317 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x % $y; ok 1318 - is a valid object ok 1319 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x % $y; ok 1320 - is a valid object ok 1321 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x % $y; ok 1322 - is a valid object ok 1323 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x % $y; ok 1324 - is a valid object ok 1325 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x % $y; ok 1326 - is a valid object ok 1327 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x % $y; ok 1328 - is a valid object ok 1329 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); $x % $y; ok 1330 - is a valid object ok 1331 - $x = Math::BigInt->new("100041000510123"); $y = Math::BigInt->new("3"); $x % $y; ok 1332 - is a valid object ok 1333 - $x = Math::BigInt->new("152403346"); $y = Math::BigInt->new("12345"); $x % $y; ok 1334 - is a valid object ok 1335 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x % $y; ok 1336 - is a valid object ok 1337 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 1338 - is a valid object ok 1339 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 1340 - is a valid object ok 1341 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 1342 - is a valid object ok 1343 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 1344 - is a valid object ok 1345 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 1346 - is a valid object ok 1347 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 1348 - is a valid object ok 1349 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 1350 - is a valid object ok 1351 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); Math::BigInt::bgcd($x, $y); ok 1352 - is a valid object ok 1353 - $x = Math::BigInt->new("+3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 1354 - is a valid object ok 1355 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 1356 - is a valid object ok 1357 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("625"); Math::BigInt::bgcd($x, $y); ok 1358 - is a valid object ok 1359 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("81"); Math::BigInt::bgcd($x, $y); ok 1360 - is a valid object ok 1361 - $x = Math::BigInt->new("1034"); $y = Math::BigInt->new("804"); Math::BigInt::bgcd($x, $y); ok 1362 - is a valid object ok 1363 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("56"); Math::BigInt::bgcd($x, $y, $z); ok 1364 - is a valid object ok 1365 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("54"); Math::BigInt::bgcd($x, $y, $z); ok 1366 - is a valid object ok 1367 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 1368 - is a valid object ok 1369 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 1370 - is a valid object ok 1371 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 1372 - is a valid object ok 1373 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 1374 - is a valid object ok 1375 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 1376 - is a valid object ok 1377 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::blcm($x, $y); ok 1378 - is a valid object ok 1379 - $x = Math::BigInt->new("+27"); $y = Math::BigInt->new("+90"); Math::BigInt::blcm($x, $y); ok 1380 - is a valid object ok 1381 - $x = Math::BigInt->new("+1034"); $y = Math::BigInt->new("+804"); Math::BigInt::blcm($x, $y); ok 1382 - is a valid object ok 1383 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x & $y; ok 1384 - is a valid object ok 1385 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x & $y; ok 1386 - is a valid object ok 1387 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x & $y; ok 1388 - is a valid object ok 1389 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x & $y; ok 1390 - is a valid object ok 1391 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x & $y; ok 1392 - is a valid object ok 1393 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x & $y; ok 1394 - is a valid object ok 1395 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x & $y; ok 1396 - is a valid object ok 1397 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x & $y; ok 1398 - is a valid object ok 1399 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+281474976710656"); $x & $y; ok 1400 - is a valid object ok 1401 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x & $y; ok 1402 - is a valid object ok 1403 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x & $y; ok 1404 - is a valid object ok 1405 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x & $y; ok 1406 - is a valid object ok 1407 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("-4"); $x & $y; ok 1408 - is a valid object ok 1409 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x & $y; ok 1410 - is a valid object ok 1411 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x & $y; ok 1412 - is a valid object ok 1413 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x & $y; ok 1414 - is a valid object ok 1415 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x & $y; ok 1416 - is a valid object ok 1417 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x & $y; ok 1418 - is a valid object ok 1419 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x & $y; ok 1420 - is a valid object ok 1421 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x & $y; ok 1422 - is a valid object ok 1423 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x & $y; ok 1424 - is a valid object ok 1425 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x & $y; ok 1426 - is a valid object ok 1427 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x & $y; ok 1428 - is a valid object ok 1429 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x & $y; ok 1430 - is a valid object ok 1431 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x & $y; ok 1432 - is a valid object ok 1433 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x & $y; ok 1434 - is a valid object ok 1435 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x & $y; ok 1436 - is a valid object ok 1437 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x & $y; ok 1438 - is a valid object ok 1439 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x & $y; ok 1440 - is a valid object ok 1441 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x & $y; ok 1442 - is a valid object ok 1443 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0x3F0F0F0F0F0F"); $x & $y; ok 1444 - is a valid object ok 1445 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x | $y; ok 1446 - is a valid object ok 1447 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x | $y; ok 1448 - is a valid object ok 1449 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x | $y; ok 1450 - is a valid object ok 1451 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x | $y; ok 1452 - is a valid object ok 1453 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x | $y; ok 1454 - is a valid object ok 1455 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x | $y; ok 1456 - is a valid object ok 1457 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x | $y; ok 1458 - is a valid object ok 1459 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x | $y; ok 1460 - is a valid object ok 1461 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x | $y; ok 1462 - is a valid object ok 1463 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x | $y; ok 1464 - is a valid object ok 1465 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x | $y; ok 1466 - is a valid object ok 1467 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x | $y; ok 1468 - is a valid object ok 1469 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x | $y; ok 1470 - is a valid object ok 1471 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 1472 - is a valid object ok 1473 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 1474 - is a valid object ok 1475 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 1476 - is a valid object ok 1477 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 1478 - is a valid object ok 1479 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 1480 - is a valid object ok 1481 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 1482 - is a valid object ok 1483 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 1484 - is a valid object ok 1485 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 1486 - is a valid object ok 1487 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 1488 - is a valid object ok 1489 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 1490 - is a valid object ok 1491 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1492 - is a valid object ok 1493 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1494 - is a valid object ok 1495 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1496 - is a valid object ok 1497 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1498 - is a valid object ok 1499 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1500 - is a valid object ok 1501 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x | $y; ok 1502 - is a valid object ok 1503 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 1504 - is a valid object ok 1505 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 1506 - is a valid object ok 1507 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 1508 - is a valid object ok 1509 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x | $y; ok 1510 - is a valid object ok 1511 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 1512 - is a valid object ok 1513 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 1514 - is a valid object ok 1515 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x | $y; ok 1516 - is a valid object ok 1517 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 1518 - is a valid object ok 1519 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 1520 - is a valid object ok 1521 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x | $y; ok 1522 - is a valid object ok 1523 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 1524 - is a valid object ok 1525 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 1526 - is a valid object ok 1527 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x | $y; ok 1528 - is a valid object ok 1529 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 1530 - is a valid object ok 1531 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 1532 - is a valid object ok 1533 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 1534 - is a valid object ok 1535 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1536 - is a valid object ok 1537 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 1538 - is a valid object ok 1539 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ^ $y; ok 1540 - is a valid object ok 1541 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x ^ $y; ok 1542 - is a valid object ok 1543 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1544 - is a valid object ok 1545 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x ^ $y; ok 1546 - is a valid object ok 1547 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x ^ $y; ok 1548 - is a valid object ok 1549 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 1550 - is a valid object ok 1551 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ^ $y; ok 1552 - is a valid object ok 1553 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x ^ $y; ok 1554 - is a valid object ok 1555 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x ^ $y; ok 1556 - is a valid object ok 1557 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x ^ $y; ok 1558 - is a valid object ok 1559 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 1560 - is a valid object ok 1561 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 1562 - is a valid object ok 1563 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 1564 - is a valid object ok 1565 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 1566 - is a valid object ok 1567 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 1568 - is a valid object ok 1569 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 1570 - is a valid object ok 1571 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 1572 - is a valid object ok 1573 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 1574 - is a valid object ok 1575 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 1576 - is a valid object ok 1577 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 1578 - is a valid object ok 1579 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 1580 - is a valid object ok 1581 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 1582 - is a valid object ok 1583 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1584 - is a valid object ok 1585 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1586 - is a valid object ok 1587 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1588 - is a valid object ok 1589 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1590 - is a valid object ok 1591 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1592 - is a valid object ok 1593 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x ^ $y; ok 1594 - is a valid object ok 1595 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 1596 - is a valid object ok 1597 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 1598 - is a valid object ok 1599 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 1600 - is a valid object ok 1601 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x ^ $y; ok 1602 - is a valid object ok 1603 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 1604 - is a valid object ok 1605 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 1606 - is a valid object ok 1607 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x ^ $y; ok 1608 - is a valid object ok 1609 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 1610 - is a valid object ok 1611 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 1612 - is a valid object ok 1613 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x ^ $y; ok 1614 - is a valid object ok 1615 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 1616 - is a valid object ok 1617 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 1618 - is a valid object ok 1619 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 1620 - is a valid object ok 1621 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 1622 - is a valid object ok 1623 - $x = Math::BigInt->new("abc"); $x->bnot(); ok 1624 - is a valid object ok 1625 - $x = Math::BigInt->new("+0"); $x->bnot(); ok 1626 - is a valid object ok 1627 - $x = Math::BigInt->new("+8"); $x->bnot(); ok 1628 - is a valid object ok 1629 - $x = Math::BigInt->new("+281474976710656"); $x->bnot(); ok 1630 - is a valid object ok 1631 - $x = Math::BigInt->new("-1"); $x->bnot(); ok 1632 - is a valid object ok 1633 - $x = Math::BigInt->new("-2"); $x->bnot(); ok 1634 - is a valid object ok 1635 - $x = Math::BigInt->new("-12"); $x->bnot(); ok 1636 - is a valid object ok 1637 - $x = Math::BigInt->new("0"); $x->digit(0); ok 1638 - $x = Math::BigInt->new("12"); $x->digit(0); ok 1639 - $x = Math::BigInt->new("12"); $x->digit(1); ok 1640 - $x = Math::BigInt->new("123"); $x->digit(0); ok 1641 - $x = Math::BigInt->new("123"); $x->digit(1); ok 1642 - $x = Math::BigInt->new("123"); $x->digit(2); ok 1643 - $x = Math::BigInt->new("123"); $x->digit(-1); ok 1644 - $x = Math::BigInt->new("123"); $x->digit(-2); ok 1645 - $x = Math::BigInt->new("123"); $x->digit(-3); ok 1646 - $x = Math::BigInt->new("123456"); $x->digit(0); ok 1647 - $x = Math::BigInt->new("123456"); $x->digit(1); ok 1648 - $x = Math::BigInt->new("123456"); $x->digit(2); ok 1649 - $x = Math::BigInt->new("123456"); $x->digit(3); ok 1650 - $x = Math::BigInt->new("123456"); $x->digit(4); ok 1651 - $x = Math::BigInt->new("123456"); $x->digit(5); ok 1652 - $x = Math::BigInt->new("123456"); $x->digit(-1); ok 1653 - $x = Math::BigInt->new("123456"); $x->digit(-2); ok 1654 - $x = Math::BigInt->new("123456"); $x->digit(-3); ok 1655 - $x = Math::BigInt->new("100000"); $x->digit(-3); ok 1656 - $x = Math::BigInt->new("100000"); $x->digit(0); ok 1657 - $x = Math::BigInt->new("100000"); $x->digit(1); ok 1658 - $x = Math::BigInt->new("abc"); $x = $x->mantissa()->bstr(); ok 1659 - $x = Math::BigInt->new("1e4"); $x = $x->mantissa()->bstr(); ok 1660 - $x = Math::BigInt->new("2e0"); $x = $x->mantissa()->bstr(); ok 1661 - $x = Math::BigInt->new("123"); $x = $x->mantissa()->bstr(); ok 1662 - $x = Math::BigInt->new("-1"); $x = $x->mantissa()->bstr(); ok 1663 - $x = Math::BigInt->new("-2"); $x = $x->mantissa()->bstr(); ok 1664 - $x = Math::BigInt->new("+inf"); $x = $x->mantissa()->bstr(); ok 1665 - $x = Math::BigInt->new("-inf"); $x = $x->mantissa()->bstr(); ok 1666 - $x = Math::BigInt->new("abc"); $x = $x->exponent()->bstr(); ok 1667 - $x = Math::BigInt->new("1e4"); $x = $x->exponent()->bstr(); ok 1668 - $x = Math::BigInt->new("2e0"); $x = $x->exponent()->bstr(); ok 1669 - $x = Math::BigInt->new("123"); $x = $x->exponent()->bstr(); ok 1670 - $x = Math::BigInt->new("-1"); $x = $x->exponent()->bstr(); ok 1671 - $x = Math::BigInt->new("-2"); $x = $x->exponent()->bstr(); ok 1672 - $x = Math::BigInt->new("0"); $x = $x->exponent()->bstr(); ok 1673 - $x = Math::BigInt->new("+inf"); $x = $x->exponent()->bstr(); ok 1674 - $x = Math::BigInt->new("-inf"); $x = $x->exponent()->bstr(); ok 1675 - $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 1676 - $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 1677 - $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 1678 - $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 1679 - $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 1680 - $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 1681 - $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 1682 - $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 1683 - $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 1684 - $x = Math::BigInt->new("-1"); $x->bfac(); ok 1685 - is a valid object ok 1686 - $x = Math::BigInt->new("NaNfac"); $x->bfac(); ok 1687 - is a valid object ok 1688 - $x = Math::BigInt->new("+inf"); $x->bfac(); ok 1689 - is a valid object ok 1690 - $x = Math::BigInt->new("-inf"); $x->bfac(); ok 1691 - is a valid object ok 1692 - $x = Math::BigInt->new("0"); $x->bfac(); ok 1693 - is a valid object ok 1694 - $x = Math::BigInt->new("1"); $x->bfac(); ok 1695 - is a valid object ok 1696 - $x = Math::BigInt->new("2"); $x->bfac(); ok 1697 - is a valid object ok 1698 - $x = Math::BigInt->new("3"); $x->bfac(); ok 1699 - is a valid object ok 1700 - $x = Math::BigInt->new("4"); $x->bfac(); ok 1701 - is a valid object ok 1702 - $x = Math::BigInt->new("5"); $x->bfac(); ok 1703 - is a valid object ok 1704 - $x = Math::BigInt->new("6"); $x->bfac(); ok 1705 - is a valid object ok 1706 - $x = Math::BigInt->new("10"); $x->bfac(); ok 1707 - is a valid object ok 1708 - $x = Math::BigInt->new("11"); $x->bfac(); ok 1709 - is a valid object ok 1710 - $x = Math::BigInt->new("12"); $x->bfac(); ok 1711 - is a valid object ok 1712 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("12"); $x ** $y; ok 1713 - is a valid object ok 1714 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("abc"); $x ** $y; ok 1715 - is a valid object ok 1716 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x ** $y; ok 1717 - is a valid object ok 1718 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x ** $y; ok 1719 - is a valid object ok 1720 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x ** $y; ok 1721 - is a valid object ok 1722 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1723 - is a valid object ok 1724 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1725 - is a valid object ok 1726 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x ** $y; ok 1727 - is a valid object ok 1728 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x ** $y; ok 1729 - is a valid object ok 1730 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ** $y; ok 1731 - is a valid object ok 1732 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x ** $y; ok 1733 - is a valid object ok 1734 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1735 - is a valid object ok 1736 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1737 - is a valid object ok 1738 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 1739 - is a valid object ok 1740 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x ** $y; ok 1741 - is a valid object ok 1742 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x ** $y; ok 1743 - is a valid object ok 1744 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x ** $y; ok 1745 - is a valid object ok 1746 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x ** $y; ok 1747 - is a valid object ok 1748 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x ** $y; ok 1749 - is a valid object ok 1750 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1751 - ref($got) ok 1752 - $Math::BigInt::upgrade ok 1753 - is a valid object ok 1754 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1755 - ref($got) ok 1756 - $Math::BigInt::upgrade ok 1757 - is a valid object ok 1758 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1759 - ref($got) ok 1760 - $Math::BigInt::upgrade ok 1761 - is a valid object ok 1762 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1763 - ref($got) ok 1764 - $Math::BigInt::upgrade ok 1765 - is a valid object ok 1766 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ** $y; ok 1767 - ref($got) ok 1768 - $Math::BigInt::upgrade ok 1769 - is a valid object ok 1770 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 1771 - is a valid object ok 1772 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 1773 - is a valid object ok 1774 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500013"); $x ** $y; ok 1775 - is a valid object ok 1776 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 1777 - is a valid object ok 1778 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 1779 - is a valid object ok 1780 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x ** $y; ok 1781 - is a valid object ok 1782 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x ** $y; ok 1783 - is a valid object ok 1784 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x ** $y; ok 1785 - is a valid object ok 1786 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x ** $y; ok 1787 - is a valid object ok 1788 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x ** $y; ok 1789 - is a valid object ok 1790 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x ** $y; ok 1791 - is a valid object ok 1792 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x ** $y; ok 1793 - is a valid object ok 1794 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1795 - is a valid object ok 1796 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1797 - is a valid object ok 1798 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 1799 - is a valid object ok 1800 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-4"); $x ** $y; ok 1801 - is a valid object ok 1802 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 1803 - is a valid object ok 1804 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 1805 - is a valid object ok 1806 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 1807 - is a valid object ok 1808 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 1809 - is a valid object ok 1810 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("2"); $x ** $y; ok 1811 - is a valid object ok 1812 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 1813 - is a valid object ok 1814 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x ** $y; ok 1815 - is a valid object ok 1816 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x ** $y; ok 1817 - is a valid object ok 1818 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x ** $y; ok 1819 - is a valid object ok 1820 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x ** $y; ok 1821 - is a valid object ok 1822 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x ** $y; ok 1823 - is a valid object ok 1824 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x ** $y; ok 1825 - is a valid object ok 1826 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("6"); $x ** $y; ok 1827 - is a valid object ok 1828 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("7"); $x ** $y; ok 1829 - is a valid object ok 1830 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("8"); $x ** $y; ok 1831 - is a valid object ok 1832 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("9"); $x ** $y; ok 1833 - is a valid object ok 1834 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("20"); $x ** $y; ok 1835 - is a valid object ok 1836 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x ** $y; ok 1837 - is a valid object ok 1838 - $x = Math::BigInt->new("100"); $x->length(); ok 1839 - $x = Math::BigInt->new("10"); $x->length(); ok 1840 - $x = Math::BigInt->new("1"); $x->length(); ok 1841 - $x = Math::BigInt->new("0"); $x->length(); ok 1842 - $x = Math::BigInt->new("12345"); $x->length(); ok 1843 - $x = Math::BigInt->new("10000000000000000"); $x->length(); ok 1844 - $x = Math::BigInt->new("-123"); $x->length(); ok 1845 - $x = Math::BigInt->new("215960156869840440586892398248"); $x->length(); ok 1846 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("2"); $x->broot($y); ok 1847 - ref($got) ok 1848 - $Math::BigInt::upgrade ok 1849 - is a valid object ok 1850 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 1851 - ref($got) ok 1852 - $Math::BigInt::upgrade ok 1853 - is a valid object ok 1854 - $x = Math::BigInt->new("145"); $x->bsqrt(); ok 1855 - ref($got) ok 1856 - $Math::BigInt::upgrade ok 1857 - is a valid object ok 1858 - $x = Math::BigInt->new("144"); $x->bsqrt(); ok 1859 - ref($got) ok 1860 - $Math::BigInt::upgrade ok 1861 - is a valid object ok 1862 - $x = Math::BigInt->new("143"); $x->bsqrt(); ok 1863 - ref($got) ok 1864 - $Math::BigInt::upgrade ok 1865 - is a valid object ok 1866 - $x = Math::BigInt->new("16"); $x->bsqrt(); ok 1867 - is a valid object ok 1868 - $x = Math::BigInt->new("170"); $x->bsqrt(); ok 1869 - ref($got) ok 1870 - $Math::BigInt::upgrade ok 1871 - is a valid object ok 1872 - $x = Math::BigInt->new("169"); $x->bsqrt(); ok 1873 - is a valid object ok 1874 - $x = Math::BigInt->new("168"); $x->bsqrt(); ok 1875 - ref($got) ok 1876 - $Math::BigInt::upgrade ok 1877 - is a valid object ok 1878 - $x = Math::BigInt->new("4"); $x->bsqrt(); ok 1879 - is a valid object ok 1880 - $x = Math::BigInt->new("3"); $x->bsqrt(); ok 1881 - ref($got) ok 1882 - $Math::BigInt::upgrade ok 1883 - is a valid object ok 1884 - $x = Math::BigInt->new("2"); $x->bsqrt(); ok 1885 - ref($got) ok 1886 - $Math::BigInt::upgrade ok 1887 - is a valid object ok 1888 - $x = Math::BigInt->new("9"); $x->bsqrt(); ok 1889 - is a valid object ok 1890 - $x = Math::BigInt->new("12"); $x->bsqrt(); ok 1891 - ref($got) ok 1892 - $Math::BigInt::upgrade ok 1893 - is a valid object ok 1894 - $x = Math::BigInt->new("256"); $x->bsqrt(); ok 1895 - is a valid object ok 1896 - $x = Math::BigInt->new("100000000"); $x->bsqrt(); ok 1897 - is a valid object ok 1898 - $x = Math::BigInt->new("4000000000000"); $x->bsqrt(); ok 1899 - is a valid object ok 1900 - $x = Math::BigInt->new("152399026"); $x->bsqrt(); ok 1901 - ref($got) ok 1902 - $Math::BigInt::upgrade ok 1903 - is a valid object ok 1904 - $x = Math::BigInt->new("152399025"); $x->bsqrt(); ok 1905 - is a valid object ok 1906 - $x = Math::BigInt->new("152399024"); $x->bsqrt(); ok 1907 - ref($got) ok 1908 - $Math::BigInt::upgrade ok 1909 - is a valid object ok 1910 - $x = Math::BigInt->new("1"); $x->bsqrt(); ok 1911 - is a valid object ok 1912 - $x = Math::BigInt->new("0"); $x->bsqrt(); ok 1913 - is a valid object ok 1914 - $x = Math::BigInt->new("-2"); $x->bsqrt(); ok 1915 - is a valid object ok 1916 - $x = Math::BigInt->new("-123"); $x->bsqrt(); ok 1917 - is a valid object ok 1918 - $x = Math::BigInt->new("Nan"); $x->bsqrt(); ok 1919 - is a valid object ok 1920 - $x = Math::BigInt->new("+inf"); $x->bsqrt(); ok 1921 - is a valid object ok 1922 - $x = Math::BigInt->new("-inf"); $x->bsqrt(); ok 1923 - is a valid object ok 1924 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1925 - is a valid object ok 1926 - $x = Math::BigInt->new("NaNbround"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1927 - is a valid object ok 1928 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1929 - is a valid object ok 1930 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1931 - is a valid object ok 1932 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1933 - is a valid object ok 1934 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("2"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1935 - is a valid object ok 1936 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1937 - is a valid object ok 1938 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1939 - is a valid object ok 1940 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1941 - is a valid object ok 1942 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1943 - is a valid object ok 1944 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1945 - is a valid object ok 1946 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1947 - is a valid object ok 1948 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1949 - is a valid object ok 1950 - $x = Math::BigInt->new("+101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1951 - is a valid object ok 1952 - $x = Math::BigInt->new("-101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1953 - is a valid object ok 1954 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1955 - is a valid object ok 1956 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1957 - is a valid object ok 1958 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1959 - is a valid object ok 1960 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1961 - is a valid object ok 1962 - $x = Math::BigInt->new("+201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1963 - is a valid object ok 1964 - $x = Math::BigInt->new("-201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1965 - is a valid object ok 1966 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1967 - is a valid object ok 1968 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1969 - is a valid object ok 1970 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1971 - is a valid object ok 1972 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1973 - is a valid object ok 1974 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1975 - is a valid object ok 1976 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1977 - is a valid object ok 1978 - $x = Math::BigInt->new("+301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1979 - is a valid object ok 1980 - $x = Math::BigInt->new("-301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1981 - is a valid object ok 1982 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1983 - is a valid object ok 1984 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1985 - is a valid object ok 1986 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1987 - is a valid object ok 1988 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1989 - is a valid object ok 1990 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1991 - is a valid object ok 1992 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1993 - is a valid object ok 1994 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1995 - is a valid object ok 1996 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1997 - is a valid object ok 1998 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1999 - is a valid object ok 2000 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 2001 - is a valid object ok 2002 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 2003 - is a valid object ok 2004 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 2005 - is a valid object ok 2006 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 2007 - is a valid object ok 2008 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 2009 - is a valid object ok 2010 - $x = Math::BigInt->new("+501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 2011 - is a valid object ok 2012 - $x = Math::BigInt->new("-501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 2013 - is a valid object ok 2014 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 2015 - is a valid object ok 2016 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 2017 - is a valid object ok 2018 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2019 - is a valid object ok 2020 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2021 - is a valid object ok 2022 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2023 - is a valid object ok 2024 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2025 - is a valid object ok 2026 - $x = Math::BigInt->new("+601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2027 - is a valid object ok 2028 - $x = Math::BigInt->new("-601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2029 - is a valid object ok 2030 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("7"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2031 - is a valid object ok 2032 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2033 - is a valid object ok 2034 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2035 - is a valid object ok 2036 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2037 - is a valid object ok 2038 - $x = Math::BigInt->new("0"); $x->is_zero(); ok 2039 - $x = Math::BigInt->new("NaNzero"); $x->is_zero(); ok 2040 - $x = Math::BigInt->new("+inf"); $x->is_zero(); ok 2041 - $x = Math::BigInt->new("-inf"); $x->is_zero(); ok 2042 - $x = Math::BigInt->new("123"); $x->is_zero(); ok 2043 - $x = Math::BigInt->new("-1"); $x->is_zero(); ok 2044 - $x = Math::BigInt->new("1"); $x->is_zero(); ok 2045 - $x = Math::BigInt->new("0"); $x->is_one(); ok 2046 - $x = Math::BigInt->new("NaNone"); $x->is_one(); ok 2047 - $x = Math::BigInt->new("+inf"); $x->is_one(); ok 2048 - $x = Math::BigInt->new("-inf"); $x->is_one(); ok 2049 - $x = Math::BigInt->new("1"); $x->is_one(); ok 2050 - $x = Math::BigInt->new("2"); $x->is_one(); ok 2051 - $x = Math::BigInt->new("-1"); $x->is_one(); ok 2052 - $x = Math::BigInt->new("-2"); $x->is_one(); ok 2053 - $x = Math::BigInt->new("0"); $x->bfloor(); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt->new("NaNfloor"); $x->bfloor(); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt->new("+inf"); $x->bfloor(); ok 2058 - is a valid object ok 2059 - $x = Math::BigInt->new("-inf"); $x->bfloor(); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt->new("-1"); $x->bfloor(); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt->new("-2"); $x->bfloor(); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt->new("2"); $x->bfloor(); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt->new("3"); $x->bfloor(); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt->new("abc"); $x->bfloor(); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt->new("NaNceil"); $x->bceil(); ok 2072 - is a valid object ok 2073 - $x = Math::BigInt->new("+inf"); $x->bceil(); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt->new("-inf"); $x->bceil(); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt->new("0"); $x->bceil(); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt->new("-1"); $x->bceil(); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt->new("-2"); $x->bceil(); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt->new("2"); $x->bceil(); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt->new("3"); $x->bceil(); ok 2086 - is a valid object ok 2087 - $x = Math::BigInt->new("abc"); $x->bceil(); ok 2088 - is a valid object ok 2089 - $x = Math::BigInt->new("NaN"); $x->bint(); ok 2090 - is a valid object ok 2091 - $x = Math::BigInt->new("+inf"); $x->bint(); ok 2092 - is a valid object ok 2093 - $x = Math::BigInt->new("-inf"); $x->bint(); ok 2094 - is a valid object ok 2095 - $x = Math::BigInt->new("0"); $x->bint(); ok 2096 - is a valid object ok 2097 - $x = Math::BigInt->new("-1"); $x->bint(); ok 2098 - is a valid object ok 2099 - $x = Math::BigInt->new("-2"); $x->bint(); ok 2100 - is a valid object ok 2101 - $x = Math::BigInt->new("2"); $x->bint(); ok 2102 - is a valid object ok 2103 - $x = Math::BigInt->new("3"); $x->bint(); ok 2104 - is a valid object ok 2105 - $x = Math::BigInt->new("128"); $x->as_hex(); ok 2106 - $x = Math::BigInt->new("-128"); $x->as_hex(); ok 2107 - $x = Math::BigInt->new("0"); $x->as_hex(); ok 2108 - $x = Math::BigInt->new("-0"); $x->as_hex(); ok 2109 - $x = Math::BigInt->new("1"); $x->as_hex(); ok 2110 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_hex(); ok 2111 - $x = Math::BigInt->new("+inf"); $x->as_hex(); ok 2112 - $x = Math::BigInt->new("-inf"); $x->as_hex(); ok 2113 - $x = Math::BigInt->new("NaNas_hex"); $x->as_hex(); ok 2114 - $x = Math::BigInt->new("128"); $x->as_bin(); ok 2115 - $x = Math::BigInt->new("-128"); $x->as_bin(); ok 2116 - $x = Math::BigInt->new("0"); $x->as_bin(); ok 2117 - $x = Math::BigInt->new("-0"); $x->as_bin(); ok 2118 - $x = Math::BigInt->new("1"); $x->as_bin(); ok 2119 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 2120 - $x = Math::BigInt->new("+inf"); $x->as_bin(); ok 2121 - $x = Math::BigInt->new("-inf"); $x->as_bin(); ok 2122 - $x = Math::BigInt->new("NaNas_bin"); $x->as_bin(); ok 2123 - $z = 3.17 <= $y ok 2124 - the code "$z = 3.17 <= $y" issued no warning ok 2125 - $z = $y >= 3.17 ok 2126 - the code "$z = $y >= 3.17" issued no warning ok t\upgrade2.t ........... 1..1 ok 1 - sqrt on a big int does not segv if there are 2 upgrade levels ok t\upgradef.t ........... 1..6 ok 1 - Math::BigFloat->upgrade() ok 2 - Math::BigFloat->downgrade() || '' ok 3 - $x = Math::BigFloat->new(123); $y = Math::BigFloat::Test->new(123); $z = $x->bmul($y); ref($z) ok 4 - $x = Math::BigFloat->new(123); $y = Math::BigFloat::Test->new(123); $z = $x->bmul($y); $z ok 5 - 123 = Math::BigFloat->new(123); 123 = Math::BigFloat::Test->new(123); $z = $x->badd($y); ref($z) ok 6 - 123 = Math::BigFloat->new(123); 123 = Math::BigFloat::Test->new(123); $z = $x->badd($y); $z ok t\use.t ................ 1..1 ok 1 - $x = Math::BigInt->new(1); ++$x; ok t\use_lib1.t ........... 1..2 # BareCalc using Calc v1.999715 ok 1 - Math::BigInt->config()->{lib} ok 2 - Math::BigFloat->new(123)->badd(123) ok t\use_lib2.t ........... 1..2 # BareCalc using Calc v1.999715 ok 1 - Math::BigInt->config()->{lib} ok 2 - Math::BigFloat->new(123)->badd(123) ok t\use_lib3.t ........... 1..2 # BareCalc using Calc v1.999715 ok 1 - Math::BigInt->config()->{lib} ok 2 - Math::BigFloat->new(123)->badd(123) ok t\use_lib4.t ........... 1..2 # BareCalc using Calc v1.999715 ok 1 - Math::BigInt->config()->{lib} ok 2 - Math::BigFloat->new(123)->badd(123) ok t\use_mbfw.t ........... 1..2 # BareCalc using Calc v1.999715 ok 1 - Math::BigFloat->config()->{with} ok 2 - Math::BigInt->config->{lib} ok t\with_sub.t ........... 1..2410 ok 1 - Math::BigFloat->config()->{with} ok 2 - Math::BigFloat->config()->{lib} ok 3 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 4 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 5 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 6 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 7 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 8 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 9 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 10 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 11 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 12 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 13 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 14 - $x = Math::BigFloat->new("inf"); $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("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 18 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 19 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 20 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 21 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 22 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 23 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 24 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 25 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 26 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 27 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 28 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 29 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 30 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 31 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat::bgcd($x, $y); ok 32 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat::bgcd($x, $y); ok 33 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 34 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 35 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 36 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); 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("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 40 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 41 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 42 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); 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("100"); $y = Math::BigFloat->new("625"); Math::BigFloat::bgcd($x, $y); ok 46 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat::bgcd($x, $y); ok 47 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat::bgcd($x, $y); ok 48 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat::bgcd($x, $y); ok 49 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat::bgcd($x, $y); ok 50 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat::bgcd($x, $y); ok 51 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat::bgcd($x, $y, $z); ok 52 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat::bgcd($x, $y, $z); ok 53 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat::bgcd($x, $y, $z); ok 54 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat::bgcd($x, $y, $z); ok 55 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 56 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 57 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 58 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 59 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 60 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 61 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 62 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 63 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 64 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 65 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::blcm($x, $y); ok 66 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::blcm($x, $y); ok 67 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat::blcm($x, $y); ok 68 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat::blcm($x, $y); ok 69 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat::blcm($x, $y); ok 70 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat::blcm($x, $y); ok 71 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 72 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 73 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 74 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 75 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 76 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 77 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 78 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 79 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 80 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 81 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 82 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 83 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 84 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 85 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 86 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 87 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 88 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 89 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 90 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 91 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 92 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 93 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 94 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 95 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 96 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 97 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 98 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 99 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 100 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 101 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 102 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 103 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 104 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 105 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 106 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 107 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 108 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 109 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 110 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 111 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 112 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 113 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 114 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 115 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 116 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 117 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 118 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 119 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 120 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 121 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 122 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 123 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 124 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 125 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 126 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 127 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 128 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 129 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 130 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 131 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 132 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 133 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 134 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 135 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 136 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 137 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 138 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 139 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 140 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 141 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 142 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 143 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 144 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 145 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 146 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 150 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 151 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 152 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 153 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 154 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 155 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 156 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 160 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 161 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 162 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 163 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 164 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 165 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 166 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 170 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 171 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 172 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 173 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 174 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 175 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 176 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 180 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 181 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 182 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 183 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 184 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 185 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 186 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $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("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 190 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 191 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 192 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 193 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 194 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 195 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 196 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 197 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 198 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 199 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 200 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 201 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 202 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 203 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 204 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 205 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 206 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 207 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 208 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 209 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 210 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 211 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 212 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 213 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 214 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 215 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 216 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 217 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 218 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 219 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 220 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 221 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 222 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 223 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 224 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 225 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 226 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 227 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 228 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 229 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 230 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 231 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 232 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 233 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 234 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 235 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 236 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 237 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 238 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 239 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 240 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $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("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 244 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 245 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 246 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 247 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 248 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 249 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 250 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 251 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 252 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 253 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 254 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 255 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 256 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 257 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 258 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 259 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 260 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 261 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 262 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 263 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 264 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 265 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 266 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); 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("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 270 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 271 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 272 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 273 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 274 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 275 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 276 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 277 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 278 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 279 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 280 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 281 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 282 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 283 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 284 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 285 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 286 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 287 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 288 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 289 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 290 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 291 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 292 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 293 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 294 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 295 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 296 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 297 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 298 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 299 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 300 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 301 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 302 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 303 - $x = Math::BigFloat->new("NaNbrsft"); $y = Math::BigFloat->new("2"); $x >> $y; ok 304 - $x = Math::BigFloat->new("NaNbrsft"); $y = Math::BigFloat->new("2"); $x >> $y; ok 305 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x >> $y; ok 306 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x >> $y; ok 307 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x >> $y; ok 308 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x >> $y; ok 309 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x >> $y; ok 310 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x >> $y; ok 311 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x >> $y; ok 312 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x >> $y; ok 313 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x >> $y; ok 314 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x >> $y; ok 315 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x >> $y; ok 316 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x >> $y; ok 317 - $x = Math::BigFloat->new("NaNblsft"); $y = Math::BigFloat->new("0"); $x << $y; ok 318 - $x = Math::BigFloat->new("NaNblsft"); $y = Math::BigFloat->new("0"); $x << $y; ok 319 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x << $y; ok 320 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x << $y; ok 321 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x << $y; ok 322 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x << $y; ok 323 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x << $y; ok 324 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x << $y; ok 325 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x << $y; ok 326 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x << $y; ok 327 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x << $y; ok 328 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x << $y; ok 329 - $x = Math::BigFloat->new("1"); $x; ok 330 - $x = Math::BigFloat->new("1"); $x; ok 331 - $x = Math::BigFloat->new("-0"); $x; ok 332 - $x = Math::BigFloat->new("-0"); $x; ok 333 - $x = Math::BigFloat->new("bnormNaN"); $x; ok 334 - $x = Math::BigFloat->new("bnormNaN"); $x; ok 335 - $x = Math::BigFloat->new("+inf"); $x; ok 336 - $x = Math::BigFloat->new("+inf"); $x; ok 337 - $x = Math::BigFloat->new("-inf"); $x; ok 338 - $x = Math::BigFloat->new("-inf"); $x; ok 339 - $x = Math::BigFloat->new("123"); $x; ok 340 - $x = Math::BigFloat->new("123"); $x; ok 341 - $x = Math::BigFloat->new("-123.4567"); $x; ok 342 - $x = Math::BigFloat->new("-123.4567"); $x; ok 343 - $x = Math::BigFloat->new("1__2"); $x; ok 344 - $x = Math::BigFloat->new("1__2"); $x; ok 345 - $x = Math::BigFloat->new("1E1__2"); $x; ok 346 - $x = Math::BigFloat->new("1E1__2"); $x; ok 347 - $x = Math::BigFloat->new("11__2E2"); $x; ok 348 - $x = Math::BigFloat->new("11__2E2"); $x; ok 349 - $x = Math::BigFloat->new(".2E-3."); $x; ok 350 - $x = Math::BigFloat->new(".2E-3."); $x; ok 351 - $x = Math::BigFloat->new("1e3e4"); $x; ok 352 - $x = Math::BigFloat->new("1e3e4"); $x; ok 353 - $x = Math::BigFloat->new(".2E2"); $x; ok 354 - $x = Math::BigFloat->new(".2E2"); $x; ok 355 - $x = Math::BigFloat->new("1.E3"); $x; ok 356 - $x = Math::BigFloat->new("1.E3"); $x; ok 357 - $x = Math::BigFloat->new("0e0"); $x; ok 358 - $x = Math::BigFloat->new("0e0"); $x; ok 359 - $x = Math::BigFloat->new("+0e0"); $x; ok 360 - $x = Math::BigFloat->new("+0e0"); $x; ok 361 - $x = Math::BigFloat->new("+0e+0"); $x; ok 362 - $x = Math::BigFloat->new("+0e+0"); $x; ok 363 - $x = Math::BigFloat->new("-0e+0"); $x; ok 364 - $x = Math::BigFloat->new("-0e+0"); $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("000"); $x; ok 372 - $x = Math::BigFloat->new("000"); $x; ok 373 - $x = Math::BigFloat->new("00e2"); $x; ok 374 - $x = Math::BigFloat->new("00e2"); $x; ok 375 - $x = Math::BigFloat->new("00e02"); $x; ok 376 - $x = Math::BigFloat->new("00e02"); $x; ok 377 - $x = Math::BigFloat->new("000e002"); $x; ok 378 - $x = Math::BigFloat->new("000e002"); $x; ok 379 - $x = Math::BigFloat->new("000e1230"); $x; ok 380 - $x = Math::BigFloat->new("000e1230"); $x; ok 381 - $x = Math::BigFloat->new("00e-3"); $x; ok 382 - $x = Math::BigFloat->new("00e-3"); $x; ok 383 - $x = Math::BigFloat->new("00e+3"); $x; ok 384 - $x = Math::BigFloat->new("00e+3"); $x; ok 385 - $x = Math::BigFloat->new("00e-03"); $x; ok 386 - $x = Math::BigFloat->new("00e-03"); $x; ok 387 - $x = Math::BigFloat->new("00e+03"); $x; ok 388 - $x = Math::BigFloat->new("00e+03"); $x; ok 389 - $x = Math::BigFloat->new("-000"); $x; ok 390 - $x = Math::BigFloat->new("-000"); $x; ok 391 - $x = Math::BigFloat->new("-00e2"); $x; ok 392 - $x = Math::BigFloat->new("-00e2"); $x; ok 393 - $x = Math::BigFloat->new("-00e02"); $x; ok 394 - $x = Math::BigFloat->new("-00e02"); $x; ok 395 - $x = Math::BigFloat->new("-000e002"); $x; ok 396 - $x = Math::BigFloat->new("-000e002"); $x; ok 397 - $x = Math::BigFloat->new("-000e1230"); $x; ok 398 - $x = Math::BigFloat->new("-000e1230"); $x; ok 399 - $x = Math::BigFloat->new("-00e-3"); $x; ok 400 - $x = Math::BigFloat->new("-00e-3"); $x; ok 401 - $x = Math::BigFloat->new("-00e+3"); $x; ok 402 - $x = Math::BigFloat->new("-00e+3"); $x; ok 403 - $x = Math::BigFloat->new("-00e-03"); $x; ok 404 - $x = Math::BigFloat->new("-00e-03"); $x; ok 405 - $x = Math::BigFloat->new("-00e+03"); $x; ok 406 - $x = Math::BigFloat->new("-00e+03"); $x; ok 407 - $x = Math::BigFloat->new("0"); $x->as_number(); ok 408 - $x = Math::BigFloat->new("1"); $x->as_number(); ok 409 - $x = Math::BigFloat->new("1.2"); $x->as_number(); ok 410 - $x = Math::BigFloat->new("2.345"); $x->as_number(); ok 411 - $x = Math::BigFloat->new("-2"); $x->as_number(); ok 412 - $x = Math::BigFloat->new("-123.456"); $x->as_number(); ok 413 - $x = Math::BigFloat->new("-200"); $x->as_number(); ok 414 - $x = Math::BigFloat->new("-inf"); $x->as_number(); ok 415 - $x = Math::BigFloat->new("inf"); $x->as_number(); ok 416 - $x = Math::BigFloat->new("NaN"); $x->as_number(); ok 417 - $x = Math::BigFloat->new("71243225429896467497217836789578596379"); $x->as_number(); ok 418 - $x = Math::BigFloat->new("0.000641"); $x->as_number(); ok 419 - $x = Math::BigFloat->new("0.0006412"); $x->as_number(); ok 420 - $x = Math::BigFloat->new("0.00064123"); $x->as_number(); ok 421 - $x = Math::BigFloat->new("0.000641234"); $x->as_number(); ok 422 - $x = Math::BigFloat->new("0.0006412345"); $x->as_number(); ok 423 - $x = Math::BigFloat->new("0.00064123456"); $x->as_number(); ok 424 - $x = Math::BigFloat->new("0.000641234567"); $x->as_number(); ok 425 - $x = Math::BigFloat->new("0.0006412345678"); $x->as_number(); ok 426 - $x = Math::BigFloat->new("0.00064123456789"); $x->as_number(); ok 427 - $x = Math::BigFloat->new("0.1"); $x->as_number(); ok 428 - $x = Math::BigFloat->new("0.01"); $x->as_number(); ok 429 - $x = Math::BigFloat->new("0.001"); $x->as_number(); ok 430 - $x = Math::BigFloat->new("0.0001"); $x->as_number(); ok 431 - $x = Math::BigFloat->new("0.00001"); $x->as_number(); ok 432 - $x = Math::BigFloat->new("0.000001"); $x->as_number(); ok 433 - $x = Math::BigFloat->new("0.0000001"); $x->as_number(); ok 434 - $x = Math::BigFloat->new("0.00000001"); $x->as_number(); ok 435 - $x = Math::BigFloat->new("0.000000001"); $x->as_number(); ok 436 - $x = Math::BigFloat->new("0.0000000001"); $x->as_number(); ok 437 - $x = Math::BigFloat->new("0.00000000001"); $x->as_number(); ok 438 - $x = Math::BigFloat->new("0.12345"); $x->as_number(); ok 439 - $x = Math::BigFloat->new("0.123456"); $x->as_number(); ok 440 - $x = Math::BigFloat->new("0.1234567"); $x->as_number(); ok 441 - $x = Math::BigFloat->new("0.12345678"); $x->as_number(); ok 442 - $x = Math::BigFloat->new("0.123456789"); $x->as_number(); ok 443 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 444 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 445 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 446 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 447 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 448 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 449 - $x = Math::BigFloat->new("+inf"); $x->as_hex(); ok 450 - $x = Math::BigFloat->new("-inf"); $x->as_hex(); ok 451 - $x = Math::BigFloat->new("hexNaN"); $x->as_hex(); ok 452 - $x = Math::BigFloat->new("0"); $x->as_hex(); ok 453 - $x = Math::BigFloat->new("5"); $x->as_hex(); ok 454 - $x = Math::BigFloat->new("-5"); $x->as_hex(); ok 455 - $x = Math::BigFloat->new("+inf"); $x->as_bin(); ok 456 - $x = Math::BigFloat->new("-inf"); $x->as_bin(); ok 457 - $x = Math::BigFloat->new("hexNaN"); $x->as_bin(); ok 458 - $x = Math::BigFloat->new("0"); $x->as_bin(); ok 459 - $x = Math::BigFloat->new("5"); $x->as_bin(); ok 460 - $x = Math::BigFloat->new("-5"); $x->as_bin(); ok 461 - $x = Math::BigFloat->new("0"); $x->numify(); ok 462 - $x = Math::BigFloat->new("+1"); $x->numify(); ok 463 - $x = Math::BigFloat->new("1234"); $x->numify(); ok 464 - $x = Math::BigFloat->new("-5"); $x->numify(); ok 465 - $x = Math::BigFloat->new("100"); $x->numify(); ok 466 - $x = Math::BigFloat->new("-100"); $x->numify(); ok 467 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 468 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 469 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 470 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 471 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 472 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 473 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 474 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 475 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 476 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 477 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 478 - $x = Math::BigFloat->new("-2"); $x->bone("-"); 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("0"); $x->bone(""); ok 484 - $x = Math::BigFloat->new("0"); $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("abc"); $x->bone(""); ok 488 - $x = Math::BigFloat->new("abc"); $x->bone(""); ok 489 - $x = Math::BigFloat->new("2"); $x->bone("abc"); ok 490 - $x = Math::BigFloat->new("2"); $x->bone("abc"); ok 491 - $x = Math::BigFloat->new("+inf"); $x->bsstr(); ok 492 - $x = Math::BigFloat->new("-inf"); $x->bsstr(); ok 493 - $x = Math::BigFloat->new("abcfsstr"); $x->bsstr(); ok 494 - $x = Math::BigFloat->new("-abcfsstr"); $x->bsstr(); ok 495 - $x = Math::BigFloat->new("1234.567"); $x->bsstr(); ok 496 - $x = Math::BigFloat->new("123"); $x->bsstr(); ok 497 - $x = Math::BigFloat->new("-5"); $x->bsstr(); ok 498 - $x = Math::BigFloat->new("-100"); $x->bsstr(); ok 499 - $x = Math::BigFloat->new("+inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 500 - $x = Math::BigFloat->new("-inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 501 - $x = Math::BigFloat->new("abcfstr"); $x->accuracy(); $x->precision(); $x->bstr(); ok 502 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(9); $x->precision(); $x->bstr(); ok 503 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(); $x->precision(-6); $x->bstr(); ok 504 - $x = Math::BigFloat->new("12345"); $x->accuracy(5); $x->precision(); $x->bstr(); ok 505 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(6); $x->precision(); $x->bstr(); ok 506 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(); $x->precision(-8); $x->bstr(); ok 507 - $x = Math::BigFloat->new("0"); $x->accuracy(4); $x->precision(); $x->bstr(); ok 508 - $x = Math::BigFloat->new("0"); $x->accuracy(); $x->precision(-4); $x->bstr(); ok 509 - $x = Math::BigFloat->new("inf"); $x; ok 510 - $x = Math::BigFloat->new("inf"); $x; ok 511 - $x = Math::BigFloat->new("+inf"); $x; ok 512 - $x = Math::BigFloat->new("+inf"); $x; ok 513 - $x = Math::BigFloat->new("-inf"); $x; ok 514 - $x = Math::BigFloat->new("-inf"); $x; ok 515 - $x = Math::BigFloat->new("+infinity"); $x; ok 516 - $x = Math::BigFloat->new("+infinity"); $x; ok 517 - $x = Math::BigFloat->new("+-inf"); $x; ok 518 - $x = Math::BigFloat->new("+-inf"); $x; ok 519 - $x = Math::BigFloat->new("abc"); $x; ok 520 - $x = Math::BigFloat->new("abc"); $x; ok 521 - $x = Math::BigFloat->new(" 1 a"); $x; ok 522 - $x = Math::BigFloat->new(" 1 a"); $x; ok 523 - $x = Math::BigFloat->new("1bcd2"); $x; ok 524 - $x = Math::BigFloat->new("1bcd2"); $x; ok 525 - $x = Math::BigFloat->new("11111b"); $x; ok 526 - $x = Math::BigFloat->new("11111b"); $x; ok 527 - $x = Math::BigFloat->new("+1z"); $x; ok 528 - $x = Math::BigFloat->new("+1z"); $x; ok 529 - $x = Math::BigFloat->new("-1z"); $x; ok 530 - $x = Math::BigFloat->new("-1z"); $x; ok 531 - $x = Math::BigFloat->new("0e999"); $x; ok 532 - $x = Math::BigFloat->new("0e999"); $x; ok 533 - $x = Math::BigFloat->new("0e-999"); $x; ok 534 - $x = Math::BigFloat->new("0e-999"); $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("0"); $x; ok 540 - $x = Math::BigFloat->new("0"); $x; ok 541 - $x = Math::BigFloat->new("+0"); $x; ok 542 - $x = Math::BigFloat->new("+0"); $x; ok 543 - $x = Math::BigFloat->new("+00"); $x; ok 544 - $x = Math::BigFloat->new("+00"); $x; ok 545 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 546 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 547 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 548 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 549 - $x = Math::BigFloat->new("-0"); $x; ok 550 - $x = Math::BigFloat->new("-0"); $x; ok 551 - $x = Math::BigFloat->new("-0000"); $x; ok 552 - $x = Math::BigFloat->new("-0000"); $x; ok 553 - $x = Math::BigFloat->new("+1"); $x; ok 554 - $x = Math::BigFloat->new("+1"); $x; ok 555 - $x = Math::BigFloat->new("+01"); $x; ok 556 - $x = Math::BigFloat->new("+01"); $x; ok 557 - $x = Math::BigFloat->new("+001"); $x; ok 558 - $x = Math::BigFloat->new("+001"); $x; ok 559 - $x = Math::BigFloat->new("+00000100000"); $x; ok 560 - $x = Math::BigFloat->new("+00000100000"); $x; ok 561 - $x = Math::BigFloat->new("123456789"); $x; ok 562 - $x = Math::BigFloat->new("123456789"); $x; ok 563 - $x = Math::BigFloat->new("-1"); $x; ok 564 - $x = Math::BigFloat->new("-1"); $x; ok 565 - $x = Math::BigFloat->new("-01"); $x; ok 566 - $x = Math::BigFloat->new("-01"); $x; ok 567 - $x = Math::BigFloat->new("-001"); $x; ok 568 - $x = Math::BigFloat->new("-001"); $x; ok 569 - $x = Math::BigFloat->new("-123456789"); $x; ok 570 - $x = Math::BigFloat->new("-123456789"); $x; ok 571 - $x = Math::BigFloat->new("-00000100000"); $x; ok 572 - $x = Math::BigFloat->new("-00000100000"); $x; ok 573 - $x = Math::BigFloat->new("123.456a"); $x; ok 574 - $x = Math::BigFloat->new("123.456a"); $x; ok 575 - $x = Math::BigFloat->new("123.456"); $x; ok 576 - $x = Math::BigFloat->new("123.456"); $x; ok 577 - $x = Math::BigFloat->new("0.01"); $x; ok 578 - $x = Math::BigFloat->new("0.01"); $x; ok 579 - $x = Math::BigFloat->new(".002"); $x; ok 580 - $x = Math::BigFloat->new(".002"); $x; ok 581 - $x = Math::BigFloat->new("+.2"); $x; ok 582 - $x = Math::BigFloat->new("+.2"); $x; ok 583 - $x = Math::BigFloat->new("-0.0003"); $x; ok 584 - $x = Math::BigFloat->new("-0.0003"); $x; ok 585 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 586 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 587 - $x = Math::BigFloat->new("123456E2"); $x; ok 588 - $x = Math::BigFloat->new("123456E2"); $x; ok 589 - $x = Math::BigFloat->new("123456E-2"); $x; ok 590 - $x = Math::BigFloat->new("123456E-2"); $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("1e1"); $x; ok 596 - $x = Math::BigFloat->new("1e1"); $x; ok 597 - $x = Math::BigFloat->new("2e-11"); $x; ok 598 - $x = Math::BigFloat->new("2e-11"); $x; ok 599 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 600 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 601 - $x = Math::BigFloat->new(" 000001"); $x; ok 602 - $x = Math::BigFloat->new(" 000001"); $x; ok 603 - $x = Math::BigFloat->new(" -00001"); $x; ok 604 - $x = Math::BigFloat->new(" -00001"); $x; ok 605 - $x = Math::BigFloat->new(" -1"); $x; ok 606 - $x = Math::BigFloat->new(" -1"); $x; ok 607 - $x = Math::BigFloat->new(" 000.01"); $x; ok 608 - $x = Math::BigFloat->new(" 000.01"); $x; ok 609 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 610 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 611 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 612 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 613 - $x = Math::BigFloat->new("-3e111"); $x; ok 614 - $x = Math::BigFloat->new("-3e111"); $x; ok 615 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 616 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 617 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x ** $y; ok 618 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x ** $y; ok 619 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 620 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x ** $y; 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("-21"); $x ** $y; ok 626 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-21"); $x ** $y; ok 627 - $x = Math::BigFloat->new("-21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 628 - $x = Math::BigFloat->new("-21"); $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("0"); $y = Math::BigFloat->new("0"); $x ** $y; ok 634 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x ** $y; ok 635 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x ** $y; ok 636 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x ** $y; ok 637 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("9"); $x ** $y; ok 638 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("9"); $x ** $y; ok 639 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 640 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 641 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 642 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 643 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 644 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 645 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 646 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $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("123.456"); $y = Math::BigFloat->new("2"); $x ** $y; ok 652 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x ** $y; ok 653 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 654 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 655 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x ** $y; ok 656 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x ** $y; ok 657 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 658 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 659 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x ** $y; ok 660 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x ** $y; ok 661 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x ** $y; ok 662 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x ** $y; ok 663 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 664 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 665 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 666 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $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("-2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 672 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 673 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x ** $y; ok 674 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x ** $y; ok 675 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x ** $y; ok 676 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x ** $y; ok 677 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x ** $y; ok 678 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x ** $y; ok 679 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x ** $y; ok 680 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x ** $y; ok 681 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x ** $y; ok 682 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x ** $y; ok 683 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x ** $y; ok 684 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x ** $y; ok 685 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x ** $y; ok 686 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x ** $y; ok 687 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x ** $y; ok 688 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x ** $y; ok 689 - $x = Math::BigFloat->new("bnegNaN"); $x->bneg(); ok 690 - $x = Math::BigFloat->new("bnegNaN"); $x->bneg(); ok 691 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 692 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 693 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 694 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 695 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 696 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 697 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 698 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 699 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 700 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 701 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 702 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 703 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 704 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 705 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 706 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 707 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 708 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 709 - $x = Math::BigFloat->new("babsNaN"); $x->babs(); ok 710 - $x = Math::BigFloat->new("babsNaN"); $x->babs(); ok 711 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 712 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 713 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 714 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 715 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 716 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 717 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 718 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 719 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 720 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 721 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 722 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 723 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 724 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 725 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 726 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 727 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 728 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 729 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 730 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 731 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 732 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 733 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 734 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 735 - $x = Math::BigFloat->new("NaNfround"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 736 - $x = Math::BigFloat->new("NaNfround"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 737 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 738 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 739 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 740 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 741 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 742 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 743 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 744 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 745 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 746 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 747 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 748 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 749 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 750 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 751 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 752 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 753 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 754 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 755 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 756 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 757 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 758 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 759 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 760 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 761 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 762 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 763 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 764 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 765 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 766 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 767 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 768 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 769 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 770 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 771 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 772 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 773 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 774 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 775 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 776 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 777 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 778 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 779 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 780 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 781 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 782 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 783 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 784 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 785 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 786 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 787 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 788 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 789 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 790 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 791 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 792 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 793 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 794 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 795 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 796 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 797 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 798 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 799 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 800 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 801 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 802 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 803 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 804 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 805 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 806 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 807 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 808 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 809 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 810 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 811 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 812 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 813 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 814 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 815 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 816 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 817 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 818 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 819 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 820 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 821 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 822 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 823 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 824 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 825 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 826 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 827 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 828 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 829 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 830 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 831 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 832 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 833 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 834 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 835 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 836 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 837 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 838 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 839 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 840 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 841 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 842 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 843 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 844 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 845 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 846 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 847 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 848 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 849 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 850 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 851 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 852 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 853 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 854 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 855 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 856 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 857 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 858 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 859 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 860 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 861 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 862 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 863 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 864 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 865 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 866 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 867 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 868 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 869 - $x = Math::BigFloat->new("NaNffround"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 870 - $x = Math::BigFloat->new("NaNffround"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 871 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 872 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 873 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 874 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 875 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 876 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 877 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 878 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 879 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 880 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 881 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 882 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 883 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 884 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 885 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 886 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 887 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 888 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 889 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 890 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 891 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 892 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 893 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 894 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 895 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 896 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 897 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 898 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 899 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 900 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 901 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 902 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 903 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 904 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 905 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 906 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 907 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 908 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 909 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 910 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 911 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 912 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 913 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 914 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 915 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 916 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 917 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 918 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 919 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 920 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-4); ok 921 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-5); ok 922 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 923 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 924 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 925 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 926 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 927 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 928 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 929 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 930 - $x = Math::BigFloat->new("+2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 931 - $x = Math::BigFloat->new("-2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 932 - $x = Math::BigFloat->new("+2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 933 - $x = Math::BigFloat->new("-2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 934 - $x = Math::BigFloat->new("+2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 935 - $x = Math::BigFloat->new("-2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 936 - $x = Math::BigFloat->new("+2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 937 - $x = Math::BigFloat->new("-2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 938 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 939 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 940 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-2); ok 941 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-3); ok 942 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-4); ok 943 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-5); ok 944 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 945 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 946 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 947 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 948 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 949 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 950 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 951 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 952 - $x = Math::BigFloat->new("+3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 953 - $x = Math::BigFloat->new("-3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 954 - $x = Math::BigFloat->new("+3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 955 - $x = Math::BigFloat->new("-3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 956 - $x = Math::BigFloat->new("+3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 957 - $x = Math::BigFloat->new("-3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 958 - $x = Math::BigFloat->new("+3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 959 - $x = Math::BigFloat->new("-3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 960 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 961 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 962 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-2); ok 963 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-3); ok 964 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-4); ok 965 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-5); ok 966 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 967 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 968 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 969 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 970 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 971 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 972 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 973 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 974 - $x = Math::BigFloat->new("+4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 975 - $x = Math::BigFloat->new("-4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 976 - $x = Math::BigFloat->new("+4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 977 - $x = Math::BigFloat->new("-4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 978 - $x = Math::BigFloat->new("+4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 979 - $x = Math::BigFloat->new("-4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 980 - $x = Math::BigFloat->new("+4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 981 - $x = Math::BigFloat->new("-4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 982 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 983 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 984 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-2); ok 985 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-3); ok 986 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-4); ok 987 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-5); ok 988 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 989 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 990 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 991 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 992 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 993 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 994 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 995 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 996 - $x = Math::BigFloat->new("+5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 997 - $x = Math::BigFloat->new("-5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 998 - $x = Math::BigFloat->new("+5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 999 - $x = Math::BigFloat->new("-5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1000 - $x = Math::BigFloat->new("+5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1001 - $x = Math::BigFloat->new("-5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1002 - $x = Math::BigFloat->new("+5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1003 - $x = Math::BigFloat->new("-5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1004 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1005 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1006 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-2); ok 1007 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-3); ok 1008 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-4); ok 1009 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-5); ok 1010 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1011 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1012 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1013 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1014 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1015 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1016 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1017 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1018 - $x = Math::BigFloat->new("+6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1019 - $x = Math::BigFloat->new("-6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1020 - $x = Math::BigFloat->new("+6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1021 - $x = Math::BigFloat->new("-6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1022 - $x = Math::BigFloat->new("+6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1023 - $x = Math::BigFloat->new("-6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1024 - $x = Math::BigFloat->new("+6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1025 - $x = Math::BigFloat->new("-6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1026 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1027 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1028 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-2); ok 1029 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1030 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1031 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1032 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1033 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1034 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1035 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1036 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1037 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1038 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1039 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1040 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1041 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1042 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1043 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1044 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1045 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1046 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1047 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1048 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1049 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1050 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1051 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1052 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1053 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1054 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1055 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1056 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("bcmpNaN"); $x->bcmp($y); ok 1057 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1058 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("bcmpNaN"); $x->bcmp($y); ok 1059 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1060 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1061 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1062 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1063 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1064 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1065 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1066 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1067 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1068 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1069 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bcmp($y); ok 1070 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1071 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bcmp($y); ok 1072 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1073 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bcmp($y); ok 1074 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1075 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1076 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bcmp($y); ok 1077 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1078 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bcmp($y); ok 1079 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1080 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bcmp($y); ok 1081 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1082 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bcmp($y); ok 1083 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1084 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bcmp($y); ok 1085 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bcmp($y); ok 1086 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1087 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1088 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1089 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1090 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bcmp($y); ok 1091 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bcmp($y); ok 1092 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1093 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1094 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1095 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1096 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1097 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1098 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1099 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1100 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1101 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bcmp($y); ok 1102 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1103 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bcmp($y); ok 1104 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bcmp($y); ok 1105 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bcmp($y); ok 1106 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bcmp($y); ok 1107 - $x = Math::BigFloat->new("1e1234567890987654321"); $y = Math::BigFloat->new("1e1234567890987654320"); $x->bcmp($y); ok 1108 - $x = Math::BigFloat->new("1e-1234567890987654321"); $y = Math::BigFloat->new("1e-1234567890987654320"); $x->bcmp($y); ok 1109 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1110 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1111 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1112 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1113 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1114 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1115 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1116 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1117 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1118 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1119 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1120 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1121 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1122 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bcmp($y); ok 1123 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1124 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1125 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("bcmpNaN"); $x->bacmp($y); ok 1126 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1127 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("bcmpNaN"); $x->bacmp($y); ok 1128 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1129 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1130 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1131 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1132 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1133 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1134 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1135 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1136 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1137 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1138 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bacmp($y); ok 1139 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1140 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bacmp($y); ok 1141 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1142 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bacmp($y); ok 1143 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1144 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1145 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bacmp($y); ok 1146 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1147 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bacmp($y); ok 1148 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1149 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bacmp($y); ok 1150 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1151 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bacmp($y); ok 1152 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1153 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bacmp($y); ok 1154 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bacmp($y); ok 1155 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1156 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1157 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1158 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1159 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bacmp($y); ok 1160 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bacmp($y); ok 1161 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1162 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1163 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1164 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1165 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1166 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1167 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1168 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1169 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1170 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bacmp($y); ok 1171 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1172 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bacmp($y); ok 1173 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bacmp($y); ok 1174 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bacmp($y); ok 1175 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bacmp($y); ok 1176 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1177 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1178 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1179 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1180 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1181 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1182 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1183 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1184 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1185 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1186 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1187 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1188 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1189 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1190 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1191 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1192 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("bacmpNaN"); $x->bacmp($y); ok 1193 - $x = Math::BigFloat->new("bacmpNaN"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1194 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("bacmpNaN"); $x->bacmp($y); ok 1195 - $x = Math::BigFloat->new("bacmpNaN"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1196 - $x = Math::BigFloat->new("bdecNaN"); --$x; ok 1197 - $x = Math::BigFloat->new("bdecNaN"); --$x; ok 1198 - $x = Math::BigFloat->new("+inf"); --$x; ok 1199 - $x = Math::BigFloat->new("+inf"); --$x; ok 1200 - $x = Math::BigFloat->new("-inf"); --$x; ok 1201 - $x = Math::BigFloat->new("-inf"); --$x; ok 1202 - $x = Math::BigFloat->new("+0"); --$x; ok 1203 - $x = Math::BigFloat->new("+0"); --$x; ok 1204 - $x = Math::BigFloat->new("+1"); --$x; ok 1205 - $x = Math::BigFloat->new("+1"); --$x; ok 1206 - $x = Math::BigFloat->new("-1"); --$x; ok 1207 - $x = Math::BigFloat->new("-1"); --$x; ok 1208 - $x = Math::BigFloat->new("1.23"); --$x; ok 1209 - $x = Math::BigFloat->new("1.23"); --$x; ok 1210 - $x = Math::BigFloat->new("-1.23"); --$x; ok 1211 - $x = Math::BigFloat->new("-1.23"); --$x; ok 1212 - $x = Math::BigFloat->new("100"); --$x; ok 1213 - $x = Math::BigFloat->new("100"); --$x; ok 1214 - $x = Math::BigFloat->new("101"); --$x; ok 1215 - $x = Math::BigFloat->new("101"); --$x; ok 1216 - $x = Math::BigFloat->new("-100"); --$x; ok 1217 - $x = Math::BigFloat->new("-100"); --$x; ok 1218 - $x = Math::BigFloat->new("-99"); --$x; ok 1219 - $x = Math::BigFloat->new("-99"); --$x; ok 1220 - $x = Math::BigFloat->new("-98"); --$x; ok 1221 - $x = Math::BigFloat->new("-98"); --$x; ok 1222 - $x = Math::BigFloat->new("99"); --$x; ok 1223 - $x = Math::BigFloat->new("99"); --$x; ok 1224 - $x = Math::BigFloat->new("bincNaN"); ++$x; ok 1225 - $x = Math::BigFloat->new("bincNaN"); ++$x; ok 1226 - $x = Math::BigFloat->new("+inf"); ++$x; ok 1227 - $x = Math::BigFloat->new("+inf"); ++$x; ok 1228 - $x = Math::BigFloat->new("-inf"); ++$x; ok 1229 - $x = Math::BigFloat->new("-inf"); ++$x; ok 1230 - $x = Math::BigFloat->new("+0"); ++$x; ok 1231 - $x = Math::BigFloat->new("+0"); ++$x; ok 1232 - $x = Math::BigFloat->new("+1"); ++$x; ok 1233 - $x = Math::BigFloat->new("+1"); ++$x; ok 1234 - $x = Math::BigFloat->new("-1"); ++$x; ok 1235 - $x = Math::BigFloat->new("-1"); ++$x; ok 1236 - $x = Math::BigFloat->new("1.23"); ++$x; ok 1237 - $x = Math::BigFloat->new("1.23"); ++$x; ok 1238 - $x = Math::BigFloat->new("-1.23"); ++$x; ok 1239 - $x = Math::BigFloat->new("-1.23"); ++$x; ok 1240 - $x = Math::BigFloat->new("100"); ++$x; ok 1241 - $x = Math::BigFloat->new("100"); ++$x; ok 1242 - $x = Math::BigFloat->new("-100"); ++$x; ok 1243 - $x = Math::BigFloat->new("-100"); ++$x; ok 1244 - $x = Math::BigFloat->new("-99"); ++$x; ok 1245 - $x = Math::BigFloat->new("-99"); ++$x; ok 1246 - $x = Math::BigFloat->new("-101"); ++$x; ok 1247 - $x = Math::BigFloat->new("-101"); ++$x; ok 1248 - $x = Math::BigFloat->new("99"); ++$x; ok 1249 - $x = Math::BigFloat->new("99"); ++$x; ok 1250 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1251 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1252 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1253 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1254 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1255 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1256 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1257 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1258 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1259 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $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("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1265 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1266 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1267 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1268 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1269 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1270 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1271 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1272 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1273 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1274 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1275 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1276 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1277 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1278 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1279 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1280 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1281 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1282 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1283 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1284 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1285 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1286 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1287 - $x = Math::BigFloat->new("-1"); $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("+9"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1291 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1292 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1293 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1294 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1295 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1296 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1297 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1298 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1299 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1300 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1301 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1302 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1303 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1304 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1305 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1306 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1307 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1308 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1309 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1310 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1311 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1312 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1313 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1314 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1315 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1316 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1317 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1318 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1319 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1320 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1321 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1322 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1323 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1324 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1325 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1326 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1327 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1328 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1329 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1330 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1331 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1332 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1333 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1334 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1335 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $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("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x + $y; ok 1341 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x + $y; ok 1342 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1343 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1344 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1345 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1346 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1347 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1348 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1349 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1350 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1351 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $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("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1357 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1358 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1359 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1360 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1361 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1362 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1363 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1364 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1365 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1366 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1367 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1368 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1369 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1370 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1371 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1372 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1373 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1374 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1375 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1376 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1377 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1378 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1379 - $x = Math::BigFloat->new("-1"); $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("+9"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1383 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1384 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1385 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1386 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1387 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1388 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1389 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1390 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1391 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1392 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1393 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1394 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1395 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1396 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1397 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1398 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1399 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1400 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1401 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1402 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1403 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1404 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1405 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1406 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1407 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1408 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1409 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1410 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1411 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1412 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1413 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1414 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1415 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1416 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1417 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1418 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1419 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1420 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1421 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1422 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1423 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1424 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1425 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1426 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1427 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $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("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1433 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1434 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1435 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1436 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1437 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1438 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1439 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1440 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1441 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1442 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1443 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1444 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1445 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1446 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1447 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1448 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1449 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1450 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1451 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $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("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1457 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1458 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1459 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1460 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1461 - $x = Math::BigFloat->new("+1"); $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("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1467 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1468 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1469 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1470 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1471 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1472 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1473 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $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("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1481 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1482 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1483 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $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("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1489 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1490 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1491 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1492 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1493 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1494 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1495 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1496 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1497 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1498 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1499 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1500 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1501 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1502 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1503 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1504 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1505 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1506 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1507 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1508 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1509 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1510 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1511 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1512 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1513 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1514 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1515 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1516 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1517 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1518 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1519 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1520 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1521 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1522 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1523 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1524 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1525 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1526 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1527 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1528 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1529 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1530 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1531 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1532 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1533 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1534 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1535 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1536 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1537 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $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("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1547 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1548 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1549 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1550 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1551 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1552 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1553 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1554 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1555 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1556 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1557 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1558 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1559 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1560 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1561 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1562 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1563 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1564 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1565 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1566 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1567 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1568 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1569 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1570 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1571 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1572 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1573 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1574 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1575 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1576 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1577 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1578 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1579 - $x = Math::BigFloat->new("+inf"); $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("123.34"); $x * $y; ok 1585 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1586 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1587 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $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("123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1593 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1594 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1595 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $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("+0"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1601 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1602 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1603 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1604 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1605 - $x = Math::BigFloat->new("+1"); $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("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1611 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1612 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x * $y; ok 1613 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x * $y; ok 1614 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1615 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1616 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1617 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $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("+2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1623 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1624 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1625 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $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("+111"); $y = Math::BigFloat->new("+111"); $x * $y; ok 1631 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x * $y; ok 1632 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x * $y; ok 1633 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x * $y; ok 1634 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x * $y; ok 1635 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x * $y; ok 1636 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x * $y; ok 1637 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x * $y; ok 1638 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x * $y; ok 1639 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x * $y; ok 1640 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1641 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1642 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1643 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1644 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1645 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1646 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1647 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1648 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1649 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1650 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1651 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1652 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1653 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1654 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1655 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1656 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1657 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1658 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x * $y; ok 1659 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x * $y; ok 1660 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x * $y; ok 1661 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x * $y; ok 1662 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1663 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1664 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1665 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1666 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1667 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1668 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1669 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1670 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1671 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1672 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1673 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1674 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1675 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1676 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1677 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1678 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1679 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1680 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1681 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1682 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1683 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1684 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1685 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1686 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1687 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1688 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1689 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1690 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1691 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1692 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1693 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1694 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1695 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1696 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1697 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $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("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1703 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1704 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1705 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1706 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1707 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1708 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1709 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1710 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1711 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1712 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1713 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1714 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1715 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1716 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1717 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1718 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1719 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1720 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1721 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1722 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1723 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1724 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1725 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1726 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1727 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1728 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1729 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1730 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1731 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1732 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1733 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1734 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1735 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1736 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1737 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1738 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1739 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1740 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1741 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1742 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1743 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1744 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1745 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1746 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1747 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1748 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1749 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1750 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1751 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1752 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1753 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1754 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1755 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1756 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1757 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1758 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1759 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1760 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1761 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1762 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1763 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1764 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1765 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1766 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1767 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1768 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1769 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1770 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1771 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1772 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1773 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1774 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1775 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1776 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1777 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1778 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1779 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1780 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1781 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1782 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1783 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1784 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1785 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1786 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1787 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1788 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1789 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1790 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1791 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1792 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1793 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1794 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1795 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1796 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1797 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1798 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1799 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1800 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1801 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1802 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1803 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1804 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x % $y; ok 1805 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x % $y; ok 1806 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x % $y; ok 1807 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x % $y; ok 1808 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x % $y; ok 1809 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x % $y; ok 1810 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x % $y; ok 1811 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x % $y; ok 1812 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1813 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1814 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1815 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1816 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1817 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1818 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1819 - $x = Math::BigFloat->new("5"); $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("inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1825 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1826 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1827 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $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("5"); $y = Math::BigFloat->new("5"); $x % $y; ok 1833 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x % $y; ok 1834 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1835 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1836 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1837 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1838 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1839 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $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("8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1845 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1846 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1847 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1848 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1849 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1850 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1851 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1852 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x % $y; ok 1853 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x % $y; ok 1854 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1855 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1856 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x % $y; ok 1857 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x % $y; ok 1858 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1859 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1860 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x % $y; ok 1861 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x % $y; ok 1862 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1863 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $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("1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1869 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1870 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1871 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $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("2"); $x % $y; ok 1877 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x % $y; ok 1878 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x % $y; ok 1879 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x % $y; ok 1880 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1881 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1882 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1883 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1884 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1885 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1886 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1887 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1888 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1889 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1890 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1891 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1892 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1893 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1894 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1895 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1896 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1897 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1898 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x % $y; ok 1899 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x % $y; ok 1900 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x % $y; ok 1901 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x % $y; ok 1902 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x % $y; ok 1903 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x % $y; ok 1904 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x % $y; ok 1905 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x % $y; ok 1906 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x % $y; ok 1907 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x % $y; ok 1908 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x % $y; ok 1909 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x % $y; ok 1910 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x % $y; ok 1911 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x % $y; ok 1912 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x % $y; ok 1913 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x % $y; ok 1914 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x % $y; ok 1915 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x % $y; ok 1916 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x % $y; ok 1917 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x % $y; ok 1918 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x % $y; ok 1919 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x % $y; ok 1920 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x % $y; ok 1921 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x % $y; ok 1922 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x % $y; ok 1923 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x % $y; ok 1924 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x % $y; ok 1925 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x % $y; ok 1926 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1927 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $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("-5"); $y = Math::BigFloat->new("3"); $x % $y; ok 1931 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x % $y; ok 1932 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x % $y; ok 1933 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x % $y; ok 1934 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x % $y; ok 1935 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x % $y; ok 1936 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x % $y; ok 1937 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x % $y; ok 1938 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1939 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1940 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1941 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1942 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1943 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1944 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1945 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1946 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x % $y; ok 1947 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x % $y; ok 1948 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x % $y; ok 1949 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x % $y; ok 1950 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x % $y; ok 1951 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x % $y; ok 1952 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x % $y; ok 1953 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x % $y; ok 1954 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1955 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1956 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1957 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1958 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1959 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1960 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x % $y; ok 1961 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x % $y; ok 1962 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1963 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1964 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1965 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $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("-3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1971 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1972 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1973 - $x = Math::BigFloat->new("3"); $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("Nanfac"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1979 - $x = Math::BigFloat->new("Nanfac"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1980 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1981 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1982 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1983 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1984 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1985 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1986 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1987 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1988 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1989 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1990 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1991 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1992 - $x = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1993 - $x = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1994 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1995 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1996 - $x = Math::BigFloat->new("5"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1997 - $x = Math::BigFloat->new("5"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1998 - $x = Math::BigFloat->new("6"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1999 - $x = Math::BigFloat->new("6"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2000 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2001 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2002 - $x = Math::BigFloat->new("11"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2003 - $x = Math::BigFloat->new("11"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2004 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2005 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2006 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2007 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2008 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2009 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2010 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2011 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2012 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2013 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2014 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2015 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2016 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2017 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2018 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2019 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2020 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2021 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2022 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2023 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2024 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2025 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2026 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2027 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2028 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2029 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2030 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2031 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2032 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2033 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2034 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2035 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2036 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2037 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2038 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2039 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2040 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2041 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2042 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2043 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2044 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2045 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2046 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2047 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2048 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2049 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2050 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2051 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2052 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2053 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2054 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2055 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2056 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2057 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2058 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2059 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2060 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2061 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2062 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2063 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2064 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2065 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2066 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2067 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2068 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2069 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2070 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2071 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2072 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2073 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2074 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2075 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2076 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2077 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2078 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2079 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2080 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2081 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2082 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2083 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2084 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2085 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2086 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2087 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2088 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2089 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2090 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2091 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2092 - $x = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2093 - $x = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2094 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2095 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2096 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2097 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2098 - $x = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2099 - $x = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2100 - $x = Math::BigFloat->new("-123.45"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2101 - $x = Math::BigFloat->new("-123.45"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2102 - $x = Math::BigFloat->new("nanbsqrt"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2103 - $x = Math::BigFloat->new("nanbsqrt"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2104 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2105 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2106 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2107 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2108 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2109 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2110 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2111 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2112 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2113 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2114 - $x = Math::BigFloat->new("9"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2115 - $x = Math::BigFloat->new("9"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2116 - $x = Math::BigFloat->new("16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2117 - $x = Math::BigFloat->new("16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2118 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2119 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2120 - $x = Math::BigFloat->new("123.456"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2121 - $x = Math::BigFloat->new("123.456"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2122 - $x = Math::BigFloat->new("15241.38393"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2123 - $x = Math::BigFloat->new("15241.38393"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2124 - $x = Math::BigFloat->new("1.44"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2125 - $x = Math::BigFloat->new("1.44"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2126 - $x = Math::BigFloat->new("1.44E10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2127 - $x = Math::BigFloat->new("1.44E10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2128 - $x = Math::BigFloat->new("2e10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2129 - $x = Math::BigFloat->new("2e10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2130 - $x = Math::BigFloat->new("144e20"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2131 - $x = Math::BigFloat->new("144e20"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2132 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2133 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2134 - $x = Math::BigFloat->new("0.49"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2135 - $x = Math::BigFloat->new("0.49"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2136 - $x = Math::BigFloat->new("0.0049"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2137 - $x = Math::BigFloat->new("0.0049"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2138 - $x = Math::BigFloat->new("123"); $x->is_nan(); ok 2139 - $x = Math::BigFloat->new("abc"); $x->is_nan(); ok 2140 - $x = Math::BigFloat->new("NaN"); $x->is_nan(); ok 2141 - $x = Math::BigFloat->new("-123"); $x->is_nan(); ok 2142 - $x = Math::BigFloat->new("+inf"); $x->is_inf(""); ok 2143 - $x = Math::BigFloat->new("-inf"); $x->is_inf(""); ok 2144 - $x = Math::BigFloat->new("abc"); $x->is_inf(""); ok 2145 - $x = Math::BigFloat->new("1"); $x->is_inf(""); ok 2146 - $x = Math::BigFloat->new("NaN"); $x->is_inf(""); ok 2147 - $x = Math::BigFloat->new("-1"); $x->is_inf(""); ok 2148 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-"); ok 2149 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+"); ok 2150 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-"); ok 2151 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+"); ok 2152 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-inf"); ok 2153 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+inf"); ok 2154 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-inf"); ok 2155 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+inf"); ok 2156 - $x = Math::BigFloat->new("+iNfInItY"); $x->is_inf(""); ok 2157 - $x = Math::BigFloat->new("-InFiNiTy"); $x->is_inf(""); ok 2158 - $x = Math::BigFloat->new("abc"); $x->is_odd(); ok 2159 - $x = Math::BigFloat->new("0"); $x->is_odd(); ok 2160 - $x = Math::BigFloat->new("-1"); $x->is_odd(); ok 2161 - $x = Math::BigFloat->new("-3"); $x->is_odd(); ok 2162 - $x = Math::BigFloat->new("1"); $x->is_odd(); ok 2163 - $x = Math::BigFloat->new("3"); $x->is_odd(); ok 2164 - $x = Math::BigFloat->new("1000001"); $x->is_odd(); ok 2165 - $x = Math::BigFloat->new("1000002"); $x->is_odd(); ok 2166 - $x = Math::BigFloat->new("+inf"); $x->is_odd(); ok 2167 - $x = Math::BigFloat->new("-inf"); $x->is_odd(); ok 2168 - $x = Math::BigFloat->new("123.45"); $x->is_odd(); ok 2169 - $x = Math::BigFloat->new("-123.45"); $x->is_odd(); ok 2170 - $x = Math::BigFloat->new("2"); $x->is_odd(); ok 2171 - $x = Math::BigFloat->new("NaNis_int"); $x->is_int(); ok 2172 - $x = Math::BigFloat->new("0"); $x->is_int(); ok 2173 - $x = Math::BigFloat->new("1"); $x->is_int(); ok 2174 - $x = Math::BigFloat->new("2"); $x->is_int(); ok 2175 - $x = Math::BigFloat->new("-2"); $x->is_int(); ok 2176 - $x = Math::BigFloat->new("-1"); $x->is_int(); ok 2177 - $x = Math::BigFloat->new("-inf"); $x->is_int(); ok 2178 - $x = Math::BigFloat->new("+inf"); $x->is_int(); ok 2179 - $x = Math::BigFloat->new("123.4567"); $x->is_int(); ok 2180 - $x = Math::BigFloat->new("-0.1"); $x->is_int(); ok 2181 - $x = Math::BigFloat->new("-0.002"); $x->is_int(); ok 2182 - $x = Math::BigFloat->new("abc"); $x->is_even(); ok 2183 - $x = Math::BigFloat->new("0"); $x->is_even(); ok 2184 - $x = Math::BigFloat->new("-1"); $x->is_even(); ok 2185 - $x = Math::BigFloat->new("-3"); $x->is_even(); ok 2186 - $x = Math::BigFloat->new("1"); $x->is_even(); ok 2187 - $x = Math::BigFloat->new("3"); $x->is_even(); ok 2188 - $x = Math::BigFloat->new("1000001"); $x->is_even(); ok 2189 - $x = Math::BigFloat->new("1000002"); $x->is_even(); ok 2190 - $x = Math::BigFloat->new("2"); $x->is_even(); ok 2191 - $x = Math::BigFloat->new("+inf"); $x->is_even(); ok 2192 - $x = Math::BigFloat->new("-inf"); $x->is_even(); ok 2193 - $x = Math::BigFloat->new("123.456"); $x->is_even(); ok 2194 - $x = Math::BigFloat->new("-123.456"); $x->is_even(); ok 2195 - $x = Math::BigFloat->new("0.01"); $x->is_even(); ok 2196 - $x = Math::BigFloat->new("-0.01"); $x->is_even(); ok 2197 - $x = Math::BigFloat->new("120"); $x->is_even(); ok 2198 - $x = Math::BigFloat->new("1200"); $x->is_even(); ok 2199 - $x = Math::BigFloat->new("-1200"); $x->is_even(); ok 2200 - $x = Math::BigFloat->new("0"); $x->is_positive(); ok 2201 - $x = Math::BigFloat->new("1"); $x->is_positive(); ok 2202 - $x = Math::BigFloat->new("-1"); $x->is_positive(); ok 2203 - $x = Math::BigFloat->new("-123"); $x->is_positive(); ok 2204 - $x = Math::BigFloat->new("NaN"); $x->is_positive(); ok 2205 - $x = Math::BigFloat->new("-inf"); $x->is_positive(); ok 2206 - $x = Math::BigFloat->new("+inf"); $x->is_positive(); ok 2207 - $x = Math::BigFloat->new("0"); $x->is_negative(); ok 2208 - $x = Math::BigFloat->new("1"); $x->is_negative(); ok 2209 - $x = Math::BigFloat->new("-1"); $x->is_negative(); ok 2210 - $x = Math::BigFloat->new("-123"); $x->is_negative(); ok 2211 - $x = Math::BigFloat->new("NaN"); $x->is_negative(); ok 2212 - $x = Math::BigFloat->new("-inf"); $x->is_negative(); ok 2213 - $x = Math::BigFloat->new("+inf"); $x->is_negative(); ok 2214 - $x = Math::BigFloat->new("0"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2215 - $x = Math::BigFloat->new("1"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2216 - $x = Math::BigFloat->new("123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2217 - $x = Math::BigFloat->new("-123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2218 - $x = Math::BigFloat->new("-1200"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2219 - $x = Math::BigFloat->new("NaNparts"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2220 - $x = Math::BigFloat->new("+inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2221 - $x = Math::BigFloat->new("-inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2222 - $x = Math::BigFloat->new("0"); $x->exponent()->bstr(); ok 2223 - $x = Math::BigFloat->new("1"); $x->exponent()->bstr(); ok 2224 - $x = Math::BigFloat->new("123"); $x->exponent()->bstr(); ok 2225 - $x = Math::BigFloat->new("-123"); $x->exponent()->bstr(); ok 2226 - $x = Math::BigFloat->new("-1200"); $x->exponent()->bstr(); ok 2227 - $x = Math::BigFloat->new("+inf"); $x->exponent()->bstr(); ok 2228 - $x = Math::BigFloat->new("-inf"); $x->exponent()->bstr(); ok 2229 - $x = Math::BigFloat->new("NaNexponent"); $x->exponent()->bstr(); ok 2230 - $x = Math::BigFloat->new("0"); $x->mantissa()->bstr(); ok 2231 - $x = Math::BigFloat->new("1"); $x->mantissa()->bstr(); ok 2232 - $x = Math::BigFloat->new("123"); $x->mantissa()->bstr(); ok 2233 - $x = Math::BigFloat->new("-123"); $x->mantissa()->bstr(); ok 2234 - $x = Math::BigFloat->new("-1200"); $x->mantissa()->bstr(); ok 2235 - $x = Math::BigFloat->new("+inf"); $x->mantissa()->bstr(); ok 2236 - $x = Math::BigFloat->new("-inf"); $x->mantissa()->bstr(); ok 2237 - $x = Math::BigFloat->new("NaNmantissa"); $x->mantissa()->bstr(); ok 2238 - $x = Math::BigFloat->new("123"); $x->length(); ok 2239 - $x = Math::BigFloat->new("-123"); $x->length(); ok 2240 - $x = Math::BigFloat->new("0"); $x->length(); ok 2241 - $x = Math::BigFloat->new("1"); $x->length(); ok 2242 - $x = Math::BigFloat->new("12345678901234567890"); $x->length(); ok 2243 - $x = Math::BigFloat->new("NaNzero"); $x->is_zero(); ok 2244 - $x = Math::BigFloat->new("+inf"); $x->is_zero(); ok 2245 - $x = Math::BigFloat->new("-inf"); $x->is_zero(); ok 2246 - $x = Math::BigFloat->new("0"); $x->is_zero(); ok 2247 - $x = Math::BigFloat->new("-1"); $x->is_zero(); ok 2248 - $x = Math::BigFloat->new("1"); $x->is_zero(); ok 2249 - $x = Math::BigFloat->new("NaNone"); $x->is_one(); ok 2250 - $x = Math::BigFloat->new("+inf"); $x->is_one(); ok 2251 - $x = Math::BigFloat->new("-inf"); $x->is_one(); ok 2252 - $x = Math::BigFloat->new("0"); $x->is_one(); ok 2253 - $x = Math::BigFloat->new("2"); $x->is_one(); ok 2254 - $x = Math::BigFloat->new("1"); $x->is_one(); ok 2255 - $x = Math::BigFloat->new("-1"); $x->is_one(); ok 2256 - $x = Math::BigFloat->new("-2"); $x->is_one(); ok 2257 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2258 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2259 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2260 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2261 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2262 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2263 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2264 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2265 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2266 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2267 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2268 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2269 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2270 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2271 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2272 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2273 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2274 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2275 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2276 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2277 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2278 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2279 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2280 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2281 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2282 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2283 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2284 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2285 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2286 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2287 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2288 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2289 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2290 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2291 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2292 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2293 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2294 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2295 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2296 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2297 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2298 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2299 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2300 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2301 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2302 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2303 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2304 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2305 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2306 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2307 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2308 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2309 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2310 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2311 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2312 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2313 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2314 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2315 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2316 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2317 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2318 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2319 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2320 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2321 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2322 - $x = Math::BigFloat->new("0"); $x = log($x); 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("2"); $x = log($x); ok 2326 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2327 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2328 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2329 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2330 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2331 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 2332 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 2333 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 2334 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 2335 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 2336 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 2337 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 2338 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 2339 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $y ok 2340 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $x ok 2341 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsstr() ok 2342 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->exponent() ok 2343 - Math::BigFloat->new("1e1234567890123456789012345678901234567890") > 0 ok 2344 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsub("1e1234567890123456789012345678901234567890") ok 2345 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bmul(2)->bsstr() ok 2346 - Math::BigFloat->new("1234567890123456789012345678901234567890e2")->mantissa() ok 2347 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_a} ok 2348 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_p} ok 2349 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_a} ok 2350 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_p} ok 2351 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_a} ok 2352 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_p} ok 2353 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_a} ok 2354 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_p} ok 2355 - Math::BigFloat->bzero() ok 2356 - Math::BigFloat->bone() ok 2357 - Math::BigFloat->bone("+") ok 2358 - Math::BigFloat->bone("-") ok 2359 - Math::BigFloat->bnan() ok 2360 - Math::BigFloat->binf() ok 2361 - Math::BigFloat->binf("+") ok 2362 - Math::BigFloat->binf("-") ok 2363 - Math::BigFloat->binf("-inf") ok 2364 - $x = Math::BigFloat->new("0.008"); $y = Math::BigFloat->new(2); $x->bdiv(3, $y); ok 2365 - Math::BigFloat->new("12345e67")->numify() ok 2366 - Math::BigFloat->new("1e-9999")->numify() ok 2367 - Math::BigFloat->new("1e9999")->numify() ok 2368 - numify of +Inf ok 2369 - numify of -Inf ok 2370 - numify of NaN ok 2371 - $x = Math::BigFloat->new(12); Math::BigFloat->precision(-2); $x->bsqrt(); ok 2372 - Math::BigFloat->precision(undef); $x = Math::BigFloat->new(12); Math::BigFloat->precision(0); $x->bsqrt(); ok 2373 - Math::BigFloat->precision(-3); $x = Math::BigFloat->new(12); $x->bsqrt(); ok 2374 - A and P set => NaN ok 2375 - supplied arg overrides set global ok 2376 - @args = Math::BigFloat::objectify(2, Math::BigFloat, 4, 5); join(" ", @args); ok 2377 - Math::BigFloat->new(-1)->is_one() ok 2378 - Math::BigFloat->new(-1)->is_one("-") ok 2379 - Math::BigFloat->new(1)->bdiv("0.5")->bsstr() ok 2380 - $x = Math::BigFloat->new(3); $x -= $x; ok 2381 - $x = Math::BigFloat->new(-3); $x -= $x; ok 2382 - $x = Math::BigFloat->new(3); $x += $x; ok 2383 - $x = Math::BigFloat->new(-3); $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("NaN"); $x += $x; ok 2388 - $x = Math::BigFloat->new("inf"); $x += $x; ok 2389 - $x = Math::BigFloat->new("-inf"); $x += $x; ok 2390 - $x = Math::BigFloat->new("3.14"); $x -= $x; ok 2391 - $x = Math::BigFloat->new("-3.14"); $x -= $x; ok 2392 - 6.28 = Math::BigFloat->new("3.14"); 6.28 += 6.28; ok 2393 - -6.28 = Math::BigFloat->new("-3.14"); -6.28 += -6.28; ok 2394 - 9.8596 = Math::BigFloat->new("3.14"); 9.8596 *= 9.8596; ok 2395 - 9.8596 = Math::BigFloat->new("-3.14"); 9.8596 *= 9.8596; ok 2396 - 1 = Math::BigFloat->new("3.14"); 1 /= 1; ok 2397 - 1 = Math::BigFloat->new("-3.14"); 1 /= 1; ok 2398 - 0 = Math::BigFloat->new("3.14"); 0 %= 0; ok 2399 - 0 = Math::BigFloat->new("-3.14"); 0 %= 0; ok 2400 - $x = Math::BigFloat->new(0); $y = Math::BigFloat->new("0.1"); $x ** $y ok 2401 - 1 = Math::BigFloat->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 2402 - value of ((2**148)+1)/17 ok 2403 - number of digits in ((2**148)+1)/17 ok 2404 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y ok 2405 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x ok 2406 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y ok 2407 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y; $x ok 2408 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); ok 2409 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 2410 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y; $x ok All tests successful. Files=62, Tests=28665, 41 wallclock secs ( 3.73 usr + 0.42 sys = 4.16 CPU) Result: PASS PJACKLAM/Math-BigInt-1.999715.tar.gz nmake test TEST_VERBOSE=1 -- OK Peter John Acklam <pjacklam@online.no> Arbitrary size integer/float math package >>> (cd C:\cpanfly-5.16\var\cpan\build\Math-BigInt-1.999715-p1mCzM && tar cvf - Math-BigInt-1.999715.ppd blib) | gzip -c >C:/cpanfly-5.16/var/REPO/P/PJ/PJACKLAM/Math-BigInt-1.999715.tar.gz No data could be read from file at C:\cpanfly-5.16\lib/Fly/MakePPD.pm line 333. Bad tarball: Archive::Tar can't read C:/cpanfly-5.16/var/REPO/P/PJ/PJACKLAM/Math-BigInt-1.999715.tar.gz at C:\cpanfly-5.16\lib/Fly/MakePPD.pm line 334. C:\Perl-5.16\bin\perl.exe exits with 255.