PATH=/usr/bin:/bin:/home/fly1800/cpanfly-5.18/var/megalib/bin Start 2016-04-24T12:08:22 ActivePerl-1800 CPAN-2.10 Reading '/home/fly1800/cpanfly-5.18/var/cpan/Metadata' Database was generated on Sun, 24 Apr 2016 04:17:02 GMT Fetching with LWP: http://ppm.activestate.com/CPAN/authors/id/S/SC/SCHWIGON/Net-SSH-Perl-2.01.tar.gz Checksum for /home/fly1800/cpanfly-5.18/var/cpan/sources/authors/id/S/SC/SCHWIGON/Net-SSH-Perl-2.01.tar.gz ok Net-SSH-Perl-2.01/ Net-SSH-Perl-2.01/t/ Net-SSH-Perl-2.01/t/05-cipher.t Net-SSH-Perl-2.01/t/00-signature.t Net-SSH-Perl-2.01/t/config Net-SSH-Perl-2.01/t/psshd Net-SSH-Perl-2.01/t/03-packet.t Net-SSH-Perl-2.01/t/07-ed25519.t Net-SSH-Perl-2.01/t/test-common.pl Net-SSH-Perl-2.01/t/99-perlcritic.t Net-SSH-Perl-2.01/t/06-auth.t Net-SSH-Perl-2.01/t/04-config.t Net-SSH-Perl-2.01/t/99-pod.t Net-SSH-Perl-2.01/t/ed25519.key Net-SSH-Perl-2.01/t/01-compile.t Net-SSH-Perl-2.01/t/99-yaml.t Net-SSH-Perl-2.01/t/99-spellcheck.t Net-SSH-Perl-2.01/t/06-circular.t Net-SSH-Perl-2.01/t/02-buffer.t Net-SSH-Perl-2.01/typemap Net-SSH-Perl-2.01/.perlcriticrc Net-SSH-Perl-2.01/lib/ Net-SSH-Perl-2.01/lib/Net/ Net-SSH-Perl-2.01/lib/Net/SSH/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Kex.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/AuthMgr.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Buffer.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Agent.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Handle.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/SSH2.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util/Authfile.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util/Hosts.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util/SSH1Misc.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util/RSA.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util/SSH1MP.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util/Win32.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util/Term.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Util/SSH2MP.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Comp.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Key/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Key/Ed25519.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Key/DSA.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Key/Ed25519.xs Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Key/RSA.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Key/RSA1.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/AES256_CBC.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/RC4.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/CFB.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/ChachaPoly.xs Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/AES_CTR.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/CBC.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/DES.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/DES3.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/IDEA.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/CTR.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/AES192_CTR.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/ChachaPoly.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/AES128_CBC.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/AES192_CBC.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/AES_CBC.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/Blowfish.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/AES128_CTR.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Cipher/AES256_CTR.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Constants.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/SSH1.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Channel.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth/Rhosts.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth/RSA.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth/PublicKey.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth/KeyboardInteractive.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth/KeyboardInt.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth/ChallengeResponse.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth/Password.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth/Rhosts_RSA.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Comp/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Comp/Zlib.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Handle/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Handle/SSH2.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Handle/SSH1.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Config.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Mac.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Subsystem/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Subsystem/Server.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Subsystem/Client.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Kex/ Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Kex/DH14.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Kex/C25519.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Kex/DHGEX.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Kex/DH1.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Kex/DH.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Kex/DHGEXSHA1.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Kex/DHGEXSHA256.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Packet.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Proxy.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/ChannelMgr.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Auth.pm Net-SSH-Perl-2.01/lib/Net/SSH/Perl/Key.pm Net-SSH-Perl-2.01/ppport.h Net-SSH-Perl-2.01/src/ Net-SSH-Perl-2.01/src/chacha/ Net-SSH-Perl-2.01/src/chacha/poly1305.c Net-SSH-Perl-2.01/src/chacha/chacha.c Net-SSH-Perl-2.01/src/chacha/poly1305.h Net-SSH-Perl-2.01/src/chacha/chacha.h Net-SSH-Perl-2.01/src/blowfish/ Net-SSH-Perl-2.01/src/blowfish/blf.h Net-SSH-Perl-2.01/src/blowfish/blowfish.c Net-SSH-Perl-2.01/src/ed25519/ Net-SSH-Perl-2.01/src/ed25519/fixedint.h Net-SSH-Perl-2.01/src/ed25519/sha512.c Net-SSH-Perl-2.01/src/ed25519/fe.c Net-SSH-Perl-2.01/src/ed25519/fe.h Net-SSH-Perl-2.01/src/ed25519/sc.h Net-SSH-Perl-2.01/src/ed25519/sha512.h Net-SSH-Perl-2.01/src/ed25519/ge.h Net-SSH-Perl-2.01/src/ed25519/keypair.c Net-SSH-Perl-2.01/src/ed25519/sign.c Net-SSH-Perl-2.01/src/ed25519/README Net-SSH-Perl-2.01/src/ed25519/verify.c Net-SSH-Perl-2.01/src/ed25519/ge.c Net-SSH-Perl-2.01/src/ed25519/ed25519.h Net-SSH-Perl-2.01/src/ed25519/precomp_data.h Net-SSH-Perl-2.01/src/ed25519/sc.c Net-SSH-Perl-2.01/MANIFEST.SKIP Net-SSH-Perl-2.01/Makefile.PL Net-SSH-Perl-2.01/LICENSE Net-SSH-Perl-2.01/META.yml Net-SSH-Perl-2.01/eg/ Net-SSH-Perl-2.01/eg/pscp Net-SSH-Perl-2.01/eg/cmd.pl Net-SSH-Perl-2.01/eg/remoteinteract.pl Net-SSH-Perl-2.01/eg/remoteinteract2.pl Net-SSH-Perl-2.01/eg/pssh-keygen Net-SSH-Perl-2.01/eg/pssh Net-SSH-Perl-2.01/Changes Net-SSH-Perl-2.01/MANIFEST Net-SSH-Perl-2.01/README Net-SSH-Perl-2.01/SIGNATURE Net-SSH-Perl-2.01/ToDo Net-SSH-Perl-2.01/Perl.xs Configuring S/SC/SCHWIGON/Net-SSH-Perl-2.01.tar.gz with Makefile.PL >>> /home/fly1800/ap1800-297235/bin/perl-static Makefile.PL This is Net::SSH::Perl. As of version 1.00, Net::SSH::Perl supports both the SSH1 and SSH2 protocols natively. The two protocols have different module prerequisitives, so you need to decide which protocol(s) you plan to use. If you use one or the other, only those modules for your chosen protocol will be installed; if you choose both, all of the supporting modules will be installed. Please choose the protocols you'd like to use from the following list ("Both" is the default). [1] SSH1 [2] SSH2 [3] Both SSH1 and SSH2 Which protocol(s) do you plan to use? [3] 3 Warning: prerequisite Crypt::DH 0.01 not found. Checking for optional modules Checking if your kit is complete... Looks good Have /home/fly1800/cpanfly-5.18/var/megalib Want /home/fly1800/ap1800-297235/lib Your perl and your Config.pm seem to have different ideas about the architecture they are running on. Perl thinks: [megalib] Config says: [i686-linux-thread-multi-64int] This may or may not cause problems. Please check your installation of perl if you have problems building this extension. Generating a Unix-style Makefile Writing Makefile for Net::SSH::Perl Writing MYMETA.yml and MYMETA.json SCHWIGON/Net-SSH-Perl-2.01.tar.gz /home/fly1800/ap1800-297235/bin/perl-static Makefile.PL -- OK Running make for S/SC/SCHWIGON/Net-SSH-Perl-2.01.tar.gz ---- Unsatisfied dependencies detected during ---- ---- SCHWIGON/Net-SSH-Perl-2.01.tar.gz ---- Crypt::DH [requires] Running test for module 'Crypt::DH' Checksum for /home/fly1800/cpanfly-5.18/var/cpan/sources/authors/id/M/MI/MITHALDU/Crypt-DH-0.07.tar.gz ok ./ ./Crypt-DH-0.07/ ./Crypt-DH-0.07/Changes ./Crypt-DH-0.07/inc/ ./Crypt-DH-0.07/inc/Devel/ ./Crypt-DH-0.07/inc/Devel/CheckLib.pm ./Crypt-DH-0.07/inc/Module/ ./Crypt-DH-0.07/inc/Module/AutoInstall.pm ./Crypt-DH-0.07/inc/Module/Install/ ./Crypt-DH-0.07/inc/Module/Install/AutoInstall.pm ./Crypt-DH-0.07/inc/Module/Install/Base.pm ./Crypt-DH-0.07/inc/Module/Install/Can.pm ./Crypt-DH-0.07/inc/Module/Install/CheckLib.pm ./Crypt-DH-0.07/inc/Module/Install/Fetch.pm ./Crypt-DH-0.07/inc/Module/Install/GithubMeta.pm ./Crypt-DH-0.07/inc/Module/Install/Include.pm ./Crypt-DH-0.07/inc/Module/Install/Makefile.pm ./Crypt-DH-0.07/inc/Module/Install/Metadata.pm ./Crypt-DH-0.07/inc/Module/Install/ReadmeFromPod.pm ./Crypt-DH-0.07/inc/Module/Install/Win32.pm ./Crypt-DH-0.07/inc/Module/Install/WriteAll.pm ./Crypt-DH-0.07/inc/Module/Install.pm ./Crypt-DH-0.07/inc/Test/ ./Crypt-DH-0.07/inc/Test/More.pm ./Crypt-DH-0.07/lib/ ./Crypt-DH-0.07/lib/Crypt/ ./Crypt-DH-0.07/lib/Crypt/DH.pm ./Crypt-DH-0.07/Makefile.PL ./Crypt-DH-0.07/MANIFEST ./Crypt-DH-0.07/META.yml ./Crypt-DH-0.07/README ./Crypt-DH-0.07/t/ ./Crypt-DH-0.07/t/00-compile.t ./Crypt-DH-0.07/t/01-dh.t ./Crypt-DH-0.07/ToDo Configuring M/MI/MITHALDU/Crypt-DH-0.07.tar.gz with Makefile.PL >>> /home/fly1800/ap1800-297235/bin/perl-static Makefile.PL *** Module::AutoInstall version 1.06 *** Checking for Perl dependencies... *** Since we're running under CPAN, I'll just let it take care of the dependency's installation later. [Core Features] - Test::More ...loaded. (0.98 >= 0.47) - Math::BigInt::GMP ...missing. (would need 1.24) - Math::BigInt ...loaded. (1.999718 >= 1.60) *** Module::AutoInstall configuration finished. Warning: prerequisite Math::BigInt::GMP 1.24 not found. Checking if your kit is complete... Looks good Have /home/fly1800/cpanfly-5.18/var/megalib Want /home/fly1800/ap1800-297235/lib Your perl and your Config.pm seem to have different ideas about the architecture they are running on. Perl thinks: [megalib] Config says: [i686-linux-thread-multi-64int] This may or may not cause problems. Please check your installation of perl if you have problems building this extension. Generating a Unix-style Makefile Writing Makefile for Crypt::DH Writing MYMETA.yml and MYMETA.json MITHALDU/Crypt-DH-0.07.tar.gz /home/fly1800/ap1800-297235/bin/perl-static Makefile.PL -- OK Running make for M/MI/MITHALDU/Crypt-DH-0.07.tar.gz ---- Unsatisfied dependencies detected during ---- ---- MITHALDU/Crypt-DH-0.07.tar.gz ---- Math::BigInt::GMP [requires] Running test for module 'Math::BigInt::GMP' Checksum for /home/fly1800/cpanfly-5.18/var/cpan/sources/authors/id/P/PJ/PJACKLAM/Math-BigInt-GMP-1.50.tar.gz ok Math-BigInt-GMP-1.50/ Math-BigInt-GMP-1.50/BUGS Math-BigInt-GMP-1.50/build/ Math-BigInt-GMP-1.50/build/leak.pl Math-BigInt-GMP-1.50/build/leaktest Math-BigInt-GMP-1.50/build/README Math-BigInt-GMP-1.50/CHANGES Math-BigInt-GMP-1.50/CREDITS Math-BigInt-GMP-1.50/GMP.xs Math-BigInt-GMP-1.50/inc/ Math-BigInt-GMP-1.50/inc/Devel/ Math-BigInt-GMP-1.50/inc/Devel/CheckLib.pm Math-BigInt-GMP-1.50/INSTALL Math-BigInt-GMP-1.50/lib/ Math-BigInt-GMP-1.50/lib/Math/ Math-BigInt-GMP-1.50/lib/Math/BigInt/ Math-BigInt-GMP-1.50/lib/Math/BigInt/GMP.pm Math-BigInt-GMP-1.50/LICENSE Math-BigInt-GMP-1.50/Makefile.PL Math-BigInt-GMP-1.50/MANIFEST Math-BigInt-GMP-1.50/MANIFEST.SKIP Math-BigInt-GMP-1.50/META.json Math-BigInt-GMP-1.50/META.yml Math-BigInt-GMP-1.50/README Math-BigInt-GMP-1.50/SIGNATURE Math-BigInt-GMP-1.50/t/ Math-BigInt-GMP-1.50/t/00sig.t Math-BigInt-GMP-1.50/t/01load.t Math-BigInt-GMP-1.50/t/02pod.t Math-BigInt-GMP-1.50/t/03podcov.t Math-BigInt-GMP-1.50/t/bigfltpm.inc Math-BigInt-GMP-1.50/t/bigfltpm.t Math-BigInt-GMP-1.50/t/bigintg.t Math-BigInt-GMP-1.50/t/bigintpm.inc Math-BigInt-GMP-1.50/t/bigintpm.t Math-BigInt-GMP-1.50/t/biglog.t Math-BigInt-GMP-1.50/t/bigroot.t Math-BigInt-GMP-1.50/t/mbi-from-big-scalar.t Math-BigInt-GMP-1.50/t/storable.t Math-BigInt-GMP-1.50/t/threads.t Math-BigInt-GMP-1.50/TODO Math-BigInt-GMP-1.50/typemap Configuring P/PJ/PJACKLAM/Math-BigInt-GMP-1.50.tar.gz with Makefile.PL >>> /home/fly1800/ap1800-297235/bin/perl-static Makefile.PL Checking if your kit is complete... Looks good Have /home/fly1800/cpanfly-5.18/var/megalib Want /home/fly1800/ap1800-297235/lib Your perl and your Config.pm seem to have different ideas about the architecture they are running on. Perl thinks: [megalib] Config says: [i686-linux-thread-multi-64int] This may or may not cause problems. Please check your installation of perl if you have problems building this extension. Generating a Unix-style Makefile Writing Makefile for Math::BigInt::GMP Writing MYMETA.yml and MYMETA.json PJACKLAM/Math-BigInt-GMP-1.50.tar.gz /home/fly1800/ap1800-297235/bin/perl-static Makefile.PL -- OK Running make for P/PJ/PJACKLAM/Math-BigInt-GMP-1.50.tar.gz >>> make cp lib/Math/BigInt/GMP.pm blib/lib/Math/BigInt/GMP.pm Running Mkbootstrap for Math::BigInt::GMP () chmod 644 "GMP.bs" "/home/fly1800/ap1800-297235/bin/perl-static" "/home/fly1800/cpanfly-5.18/var/megalib/ExtUtils/xsubpp" -typemap "/home/fly1800/ap1800-297235/lib/ExtUtils/typemap" -typemap "typemap" GMP.xs > GMP.xsc && mv GMP.xsc GMP.c gcc -c -D_REENTRANT -D_GNU_SOURCE -DUSE_SITECUSTOMIZE -DPERL_RELOCATABLE_INCPUSH -fno-merge-constants -fno-strict-aliasing -pipe -fstack-protector -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O2 -DVERSION=\"1.50\" -DXS_VERSION=\"1.50\" -fPIC "-I/home/fly1800/ap1800-297235/lib/CORE" GMP.c rm -f blib/arch/auto/Math/BigInt/GMP/GMP.so LD_RUN_PATH="/usr/lib" gcc -shared -O2 -fstack-protector GMP.o -o blib/arch/auto/Math/BigInt/GMP/GMP.so \ -lgmp \ chmod 755 blib/arch/auto/Math/BigInt/GMP/GMP.so "/home/fly1800/ap1800-297235/bin/perl-static" -MExtUtils::Command::MM -e 'cp_nonempty' -- GMP.bs blib/arch/auto/Math/BigInt/GMP/GMP.bs 644 Manifying 1 pod document PJACKLAM/Math-BigInt-GMP-1.50.tar.gz make -- OK Running make test >>> make test TEST_VERBOSE=1 Running Mkbootstrap for Math::BigInt::GMP () chmod 644 "GMP.bs" PERL_DL_NONLAZY=1 "/home/fly1800/ap1800-297235/bin/perl-static" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/00sig.t ................ skipped: Set the environment variable TEST_SIGNATURE to enable this test. # # Testing with Perl 5.018000, /home/fly1800/ap1800-297235/bin/perl-static # # Version Module # ------- ------ # 1.50 Math::BigInt::GMP # 1.999718 Math::BigInt # t/01load.t ............... 1..2 ok 1 - use Math::BigInt::GMP; ok 2 - use Math::BigInt; ok t/02pod.t ................ 1..1 ok 1 - POD test for blib/lib/Math/BigInt/GMP.pm ok t/03podcov.t ............. 1..1 ok 1 - All modules are covered ok t/bigfltpm.t ............. 1..2407 ok 1 - Math::BigFloat->config()->{class} ok 2 - Math::BigFloat->config()->{with} ok 3 - $c = Math::BigFloat -> new("123.3"); $y = $c -> bsub("123") ok 4 - 0.008 / 3 = 0.0027 ok 5 # skip skipping test which is not for this backend ok 6 - Math::BigFloat->config()->{lib} ok 7 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 8 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 9 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 10 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat::bgcd($x, $y); ok 11 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 12 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 13 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 14 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 15 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 16 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat::bgcd($x, $y); ok 17 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 18 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 19 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 20 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat::bgcd($x, $y); ok 21 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 22 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 23 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 24 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 25 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 26 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::bgcd($x, $y); ok 27 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 28 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 29 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 30 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 31 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 32 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::bgcd($x, $y); ok 33 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 34 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat::bgcd($x, $y); ok 35 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat::bgcd($x, $y); ok 36 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat::bgcd($x, $y); ok 37 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 38 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 39 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 40 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat::bgcd($x, $y); ok 41 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat::bgcd($x, $y); ok 42 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat::bgcd($x, $y); ok 43 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 44 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 45 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 46 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat::bgcd($x, $y); ok 47 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat::bgcd($x, $y); ok 48 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat::bgcd($x, $y); ok 49 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat::bgcd($x, $y); ok 50 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat::bgcd($x, $y); ok 51 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat::bgcd($x, $y); ok 52 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat::bgcd($x, $y); ok 53 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat::bgcd($x, $y); ok 54 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat::bgcd($x, $y); ok 55 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat::bgcd($x, $y, $z); ok 56 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat::bgcd($x, $y, $z); ok 57 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat::bgcd($x, $y, $z); ok 58 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat::bgcd($x, $y, $z); ok 59 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 60 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 61 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 62 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 63 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 64 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat::blcm($x, $y); ok 65 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 66 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 67 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 68 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat::blcm($x, $y); ok 69 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::blcm($x, $y); ok 70 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat::blcm($x, $y); ok 71 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat::blcm($x, $y); ok 72 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat::blcm($x, $y); ok 73 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat::blcm($x, $y); ok 74 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat::blcm($x, $y); ok 75 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 76 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 77 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 78 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 79 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 80 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 81 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 82 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 83 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 84 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 85 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 86 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 87 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 88 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 89 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 90 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 91 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 92 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 93 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 94 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 95 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 96 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 97 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 98 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 99 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 100 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 101 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 102 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 103 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 104 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 105 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 106 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 107 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 108 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 109 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 110 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 111 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 112 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 113 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 114 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 115 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 116 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 117 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 118 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 119 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 120 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 121 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 122 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 123 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 124 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 125 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 126 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 127 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 128 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 129 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 130 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 131 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 132 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 133 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 134 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 135 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 136 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 137 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 138 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 139 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 140 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 141 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 142 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 143 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 144 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 145 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 146 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 147 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 148 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 149 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 150 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 151 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 152 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 153 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 154 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 155 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 156 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 157 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 158 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 159 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 160 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 161 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 162 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 163 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 164 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 165 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 166 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 167 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 168 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 169 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 170 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 171 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 172 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 173 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 174 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 175 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 176 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 177 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 178 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 179 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 180 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 181 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 182 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 183 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 184 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 185 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 186 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 187 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 188 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 189 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 190 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 191 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 192 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 193 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 194 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 195 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 196 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 197 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 198 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 199 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 200 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 201 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 202 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 203 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 204 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 205 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 206 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 207 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 208 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 209 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 210 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 211 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 212 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 213 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 214 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 215 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 216 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 217 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 218 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 219 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 220 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 221 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 222 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 223 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 224 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 225 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 226 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 227 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 228 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 229 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 230 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 231 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 232 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 233 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 234 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 235 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 236 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 237 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 238 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 239 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 240 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 241 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 242 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 243 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 244 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 245 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 246 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 247 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 248 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 249 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 250 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 251 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 252 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 253 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 254 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 255 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 256 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 257 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 258 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 259 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 260 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 261 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 262 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 263 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 264 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 265 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 266 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 267 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 268 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 269 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 270 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 271 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 272 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 273 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 274 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 275 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 276 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 277 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 278 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 279 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 280 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 281 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 282 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 283 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 284 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 285 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 286 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 287 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 288 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 289 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 290 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 291 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 292 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 293 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 294 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 295 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 296 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 297 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 298 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 299 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 300 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 301 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 302 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 303 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 304 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 305 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 306 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 307 - $x = Math::BigFloat->new("NaNbrsft"); $y = Math::BigFloat->new("2"); $x >> $y; ok 308 - $x = Math::BigFloat->new("NaNbrsft"); $y = Math::BigFloat->new("2"); $x >> $y; ok 309 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x >> $y; ok 310 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x >> $y; ok 311 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x >> $y; ok 312 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x >> $y; ok 313 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x >> $y; ok 314 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x >> $y; ok 315 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x >> $y; ok 316 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x >> $y; ok 317 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x >> $y; ok 318 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x >> $y; ok 319 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x >> $y; ok 320 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x >> $y; ok 321 - $x = Math::BigFloat->new("NaNblsft"); $y = Math::BigFloat->new("0"); $x << $y; ok 322 - $x = Math::BigFloat->new("NaNblsft"); $y = Math::BigFloat->new("0"); $x << $y; ok 323 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x << $y; ok 324 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x << $y; ok 325 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x << $y; ok 326 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x << $y; ok 327 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x << $y; ok 328 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x << $y; ok 329 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x << $y; ok 330 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x << $y; ok 331 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x << $y; ok 332 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x << $y; ok 333 - $x = Math::BigFloat->new("1"); $x; ok 334 - $x = Math::BigFloat->new("1"); $x; ok 335 - $x = Math::BigFloat->new("-0"); $x; ok 336 - $x = Math::BigFloat->new("-0"); $x; ok 337 - $x = Math::BigFloat->new("bnormNaN"); $x; ok 338 - $x = Math::BigFloat->new("bnormNaN"); $x; ok 339 - $x = Math::BigFloat->new("+inf"); $x; ok 340 - $x = Math::BigFloat->new("+inf"); $x; ok 341 - $x = Math::BigFloat->new("-inf"); $x; ok 342 - $x = Math::BigFloat->new("-inf"); $x; ok 343 - $x = Math::BigFloat->new("123"); $x; ok 344 - $x = Math::BigFloat->new("123"); $x; ok 345 - $x = Math::BigFloat->new("-123.4567"); $x; ok 346 - $x = Math::BigFloat->new("-123.4567"); $x; ok 347 - $x = Math::BigFloat->new("1__2"); $x; ok 348 - $x = Math::BigFloat->new("1__2"); $x; ok 349 - $x = Math::BigFloat->new("1E1__2"); $x; ok 350 - $x = Math::BigFloat->new("1E1__2"); $x; ok 351 - $x = Math::BigFloat->new("11__2E2"); $x; ok 352 - $x = Math::BigFloat->new("11__2E2"); $x; ok 353 - $x = Math::BigFloat->new(".2E-3."); $x; ok 354 - $x = Math::BigFloat->new(".2E-3."); $x; ok 355 - $x = Math::BigFloat->new("1e3e4"); $x; ok 356 - $x = Math::BigFloat->new("1e3e4"); $x; ok 357 - $x = Math::BigFloat->new(".2E2"); $x; ok 358 - $x = Math::BigFloat->new(".2E2"); $x; ok 359 - $x = Math::BigFloat->new("1.E3"); $x; ok 360 - $x = Math::BigFloat->new("1.E3"); $x; ok 361 - $x = Math::BigFloat->new("0e0"); $x; ok 362 - $x = Math::BigFloat->new("0e0"); $x; ok 363 - $x = Math::BigFloat->new("+0e0"); $x; ok 364 - $x = Math::BigFloat->new("+0e0"); $x; ok 365 - $x = Math::BigFloat->new("+0e+0"); $x; ok 366 - $x = Math::BigFloat->new("+0e+0"); $x; ok 367 - $x = Math::BigFloat->new("-0e+0"); $x; ok 368 - $x = Math::BigFloat->new("-0e+0"); $x; ok 369 - $x = Math::BigFloat->new("0e-0"); $x; ok 370 - $x = Math::BigFloat->new("0e-0"); $x; ok 371 - $x = Math::BigFloat->new("-0e-0"); $x; ok 372 - $x = Math::BigFloat->new("-0e-0"); $x; ok 373 - $x = Math::BigFloat->new("+0e-0"); $x; ok 374 - $x = Math::BigFloat->new("+0e-0"); $x; ok 375 - $x = Math::BigFloat->new("000"); $x; ok 376 - $x = Math::BigFloat->new("000"); $x; ok 377 - $x = Math::BigFloat->new("00e2"); $x; ok 378 - $x = Math::BigFloat->new("00e2"); $x; ok 379 - $x = Math::BigFloat->new("00e02"); $x; ok 380 - $x = Math::BigFloat->new("00e02"); $x; ok 381 - $x = Math::BigFloat->new("000e002"); $x; ok 382 - $x = Math::BigFloat->new("000e002"); $x; ok 383 - $x = Math::BigFloat->new("000e1230"); $x; ok 384 - $x = Math::BigFloat->new("000e1230"); $x; ok 385 - $x = Math::BigFloat->new("00e-3"); $x; ok 386 - $x = Math::BigFloat->new("00e-3"); $x; ok 387 - $x = Math::BigFloat->new("00e+3"); $x; ok 388 - $x = Math::BigFloat->new("00e+3"); $x; ok 389 - $x = Math::BigFloat->new("00e-03"); $x; ok 390 - $x = Math::BigFloat->new("00e-03"); $x; ok 391 - $x = Math::BigFloat->new("00e+03"); $x; ok 392 - $x = Math::BigFloat->new("00e+03"); $x; ok 393 - $x = Math::BigFloat->new("-000"); $x; ok 394 - $x = Math::BigFloat->new("-000"); $x; ok 395 - $x = Math::BigFloat->new("-00e2"); $x; ok 396 - $x = Math::BigFloat->new("-00e2"); $x; ok 397 - $x = Math::BigFloat->new("-00e02"); $x; ok 398 - $x = Math::BigFloat->new("-00e02"); $x; ok 399 - $x = Math::BigFloat->new("-000e002"); $x; ok 400 - $x = Math::BigFloat->new("-000e002"); $x; ok 401 - $x = Math::BigFloat->new("-000e1230"); $x; ok 402 - $x = Math::BigFloat->new("-000e1230"); $x; ok 403 - $x = Math::BigFloat->new("-00e-3"); $x; ok 404 - $x = Math::BigFloat->new("-00e-3"); $x; ok 405 - $x = Math::BigFloat->new("-00e+3"); $x; ok 406 - $x = Math::BigFloat->new("-00e+3"); $x; ok 407 - $x = Math::BigFloat->new("-00e-03"); $x; ok 408 - $x = Math::BigFloat->new("-00e-03"); $x; ok 409 - $x = Math::BigFloat->new("-00e+03"); $x; ok 410 - $x = Math::BigFloat->new("-00e+03"); $x; ok 411 - $x = Math::BigFloat->new("0"); $x->as_number(); ok 412 - $x = Math::BigFloat->new("1"); $x->as_number(); ok 413 - $x = Math::BigFloat->new("1.2"); $x->as_number(); ok 414 - $x = Math::BigFloat->new("2.345"); $x->as_number(); ok 415 - $x = Math::BigFloat->new("-2"); $x->as_number(); ok 416 - $x = Math::BigFloat->new("-123.456"); $x->as_number(); ok 417 - $x = Math::BigFloat->new("-200"); $x->as_number(); ok 418 - $x = Math::BigFloat->new("-inf"); $x->as_number(); ok 419 - $x = Math::BigFloat->new("inf"); $x->as_number(); ok 420 - $x = Math::BigFloat->new("NaN"); $x->as_number(); ok 421 - $x = Math::BigFloat->new("71243225429896467497217836789578596379"); $x->as_number(); ok 422 - $x = Math::BigFloat->new("0.000641"); $x->as_number(); ok 423 - $x = Math::BigFloat->new("0.0006412"); $x->as_number(); ok 424 - $x = Math::BigFloat->new("0.00064123"); $x->as_number(); ok 425 - $x = Math::BigFloat->new("0.000641234"); $x->as_number(); ok 426 - $x = Math::BigFloat->new("0.0006412345"); $x->as_number(); ok 427 - $x = Math::BigFloat->new("0.00064123456"); $x->as_number(); ok 428 - $x = Math::BigFloat->new("0.000641234567"); $x->as_number(); ok 429 - $x = Math::BigFloat->new("0.0006412345678"); $x->as_number(); ok 430 - $x = Math::BigFloat->new("0.00064123456789"); $x->as_number(); ok 431 - $x = Math::BigFloat->new("0.1"); $x->as_number(); ok 432 - $x = Math::BigFloat->new("0.01"); $x->as_number(); ok 433 - $x = Math::BigFloat->new("0.001"); $x->as_number(); ok 434 - $x = Math::BigFloat->new("0.0001"); $x->as_number(); ok 435 - $x = Math::BigFloat->new("0.00001"); $x->as_number(); ok 436 - $x = Math::BigFloat->new("0.000001"); $x->as_number(); ok 437 - $x = Math::BigFloat->new("0.0000001"); $x->as_number(); ok 438 - $x = Math::BigFloat->new("0.00000001"); $x->as_number(); ok 439 - $x = Math::BigFloat->new("0.000000001"); $x->as_number(); ok 440 - $x = Math::BigFloat->new("0.0000000001"); $x->as_number(); ok 441 - $x = Math::BigFloat->new("0.00000000001"); $x->as_number(); ok 442 - $x = Math::BigFloat->new("0.12345"); $x->as_number(); ok 443 - $x = Math::BigFloat->new("0.123456"); $x->as_number(); ok 444 - $x = Math::BigFloat->new("0.1234567"); $x->as_number(); ok 445 - $x = Math::BigFloat->new("0.12345678"); $x->as_number(); ok 446 - $x = Math::BigFloat->new("0.123456789"); $x->as_number(); ok 447 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 448 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 449 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 450 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 451 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 452 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 453 - $x = Math::BigFloat->new("+inf"); $x->as_hex(); ok 454 - $x = Math::BigFloat->new("-inf"); $x->as_hex(); ok 455 - $x = Math::BigFloat->new("hexNaN"); $x->as_hex(); ok 456 - $x = Math::BigFloat->new("0"); $x->as_hex(); ok 457 - $x = Math::BigFloat->new("5"); $x->as_hex(); ok 458 - $x = Math::BigFloat->new("-5"); $x->as_hex(); ok 459 - $x = Math::BigFloat->new("+inf"); $x->as_bin(); ok 460 - $x = Math::BigFloat->new("-inf"); $x->as_bin(); ok 461 - $x = Math::BigFloat->new("hexNaN"); $x->as_bin(); ok 462 - $x = Math::BigFloat->new("0"); $x->as_bin(); ok 463 - $x = Math::BigFloat->new("5"); $x->as_bin(); ok 464 - $x = Math::BigFloat->new("-5"); $x->as_bin(); ok 465 - $x = Math::BigFloat->new("0"); $x->numify(); ok 466 - $x = Math::BigFloat->new("+1"); $x->numify(); ok 467 - $x = Math::BigFloat->new("1234"); $x->numify(); ok 468 - $x = Math::BigFloat->new("-5"); $x->numify(); ok 469 - $x = Math::BigFloat->new("100"); $x->numify(); ok 470 - $x = Math::BigFloat->new("-100"); $x->numify(); ok 471 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 472 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 473 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 474 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 475 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 476 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 477 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 478 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 479 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 480 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 481 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 482 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 483 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 484 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 485 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 486 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 487 - $x = Math::BigFloat->new("0"); $x->bone(""); ok 488 - $x = Math::BigFloat->new("0"); $x->bone(""); ok 489 - $x = Math::BigFloat->new("-2"); $x->bone(""); ok 490 - $x = Math::BigFloat->new("-2"); $x->bone(""); ok 491 - $x = Math::BigFloat->new("abc"); $x->bone(""); ok 492 - $x = Math::BigFloat->new("abc"); $x->bone(""); ok 493 - $x = Math::BigFloat->new("2"); $x->bone("abc"); ok 494 - $x = Math::BigFloat->new("2"); $x->bone("abc"); ok 495 - $x = Math::BigFloat->new("+inf"); $x->bsstr(); ok 496 - $x = Math::BigFloat->new("-inf"); $x->bsstr(); ok 497 - $x = Math::BigFloat->new("abcfsstr"); $x->bsstr(); ok 498 - $x = Math::BigFloat->new("-abcfsstr"); $x->bsstr(); ok 499 - $x = Math::BigFloat->new("1234.567"); $x->bsstr(); ok 500 - $x = Math::BigFloat->new("123"); $x->bsstr(); ok 501 - $x = Math::BigFloat->new("-5"); $x->bsstr(); ok 502 - $x = Math::BigFloat->new("-100"); $x->bsstr(); ok 503 - $x = Math::BigFloat->new("+inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 504 - $x = Math::BigFloat->new("-inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 505 - $x = Math::BigFloat->new("abcfstr"); $x->accuracy(); $x->precision(); $x->bstr(); ok 506 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(9); $x->precision(); $x->bstr(); ok 507 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(); $x->precision(-6); $x->bstr(); ok 508 - $x = Math::BigFloat->new("12345"); $x->accuracy(5); $x->precision(); $x->bstr(); ok 509 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(6); $x->precision(); $x->bstr(); ok 510 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(); $x->precision(-8); $x->bstr(); ok 511 - $x = Math::BigFloat->new("0"); $x->accuracy(4); $x->precision(); $x->bstr(); ok 512 - $x = Math::BigFloat->new("0"); $x->accuracy(); $x->precision(-4); $x->bstr(); ok 513 - $x = Math::BigFloat->new("inf"); $x; ok 514 - $x = Math::BigFloat->new("inf"); $x; ok 515 - $x = Math::BigFloat->new("+inf"); $x; ok 516 - $x = Math::BigFloat->new("+inf"); $x; ok 517 - $x = Math::BigFloat->new("-inf"); $x; ok 518 - $x = Math::BigFloat->new("-inf"); $x; ok 519 - $x = Math::BigFloat->new("+infinity"); $x; ok 520 - $x = Math::BigFloat->new("+infinity"); $x; ok 521 - $x = Math::BigFloat->new("+-inf"); $x; ok 522 - $x = Math::BigFloat->new("+-inf"); $x; ok 523 - $x = Math::BigFloat->new("abc"); $x; ok 524 - $x = Math::BigFloat->new("abc"); $x; ok 525 - $x = Math::BigFloat->new(" 1 a"); $x; ok 526 - $x = Math::BigFloat->new(" 1 a"); $x; ok 527 - $x = Math::BigFloat->new("1bcd2"); $x; ok 528 - $x = Math::BigFloat->new("1bcd2"); $x; ok 529 - $x = Math::BigFloat->new("11111b"); $x; ok 530 - $x = Math::BigFloat->new("11111b"); $x; ok 531 - $x = Math::BigFloat->new("+1z"); $x; ok 532 - $x = Math::BigFloat->new("+1z"); $x; ok 533 - $x = Math::BigFloat->new("-1z"); $x; ok 534 - $x = Math::BigFloat->new("-1z"); $x; ok 535 - $x = Math::BigFloat->new("0e999"); $x; ok 536 - $x = Math::BigFloat->new("0e999"); $x; ok 537 - $x = Math::BigFloat->new("0e-999"); $x; ok 538 - $x = Math::BigFloat->new("0e-999"); $x; ok 539 - $x = Math::BigFloat->new("-0e999"); $x; ok 540 - $x = Math::BigFloat->new("-0e999"); $x; ok 541 - $x = Math::BigFloat->new("-0e-999"); $x; ok 542 - $x = Math::BigFloat->new("-0e-999"); $x; ok 543 - $x = Math::BigFloat->new("0"); $x; ok 544 - $x = Math::BigFloat->new("0"); $x; ok 545 - $x = Math::BigFloat->new("+0"); $x; ok 546 - $x = Math::BigFloat->new("+0"); $x; ok 547 - $x = Math::BigFloat->new("+00"); $x; ok 548 - $x = Math::BigFloat->new("+00"); $x; ok 549 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 550 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 551 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 552 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 553 - $x = Math::BigFloat->new("-0"); $x; ok 554 - $x = Math::BigFloat->new("-0"); $x; ok 555 - $x = Math::BigFloat->new("-0000"); $x; ok 556 - $x = Math::BigFloat->new("-0000"); $x; ok 557 - $x = Math::BigFloat->new("+1"); $x; ok 558 - $x = Math::BigFloat->new("+1"); $x; ok 559 - $x = Math::BigFloat->new("+01"); $x; ok 560 - $x = Math::BigFloat->new("+01"); $x; ok 561 - $x = Math::BigFloat->new("+001"); $x; ok 562 - $x = Math::BigFloat->new("+001"); $x; ok 563 - $x = Math::BigFloat->new("+00000100000"); $x; ok 564 - $x = Math::BigFloat->new("+00000100000"); $x; ok 565 - $x = Math::BigFloat->new("123456789"); $x; ok 566 - $x = Math::BigFloat->new("123456789"); $x; ok 567 - $x = Math::BigFloat->new("-1"); $x; ok 568 - $x = Math::BigFloat->new("-1"); $x; ok 569 - $x = Math::BigFloat->new("-01"); $x; ok 570 - $x = Math::BigFloat->new("-01"); $x; ok 571 - $x = Math::BigFloat->new("-001"); $x; ok 572 - $x = Math::BigFloat->new("-001"); $x; ok 573 - $x = Math::BigFloat->new("-123456789"); $x; ok 574 - $x = Math::BigFloat->new("-123456789"); $x; ok 575 - $x = Math::BigFloat->new("-00000100000"); $x; ok 576 - $x = Math::BigFloat->new("-00000100000"); $x; ok 577 - $x = Math::BigFloat->new("123.456a"); $x; ok 578 - $x = Math::BigFloat->new("123.456a"); $x; ok 579 - $x = Math::BigFloat->new("123.456"); $x; ok 580 - $x = Math::BigFloat->new("123.456"); $x; ok 581 - $x = Math::BigFloat->new("0.01"); $x; ok 582 - $x = Math::BigFloat->new("0.01"); $x; ok 583 - $x = Math::BigFloat->new(".002"); $x; ok 584 - $x = Math::BigFloat->new(".002"); $x; ok 585 - $x = Math::BigFloat->new("+.2"); $x; ok 586 - $x = Math::BigFloat->new("+.2"); $x; ok 587 - $x = Math::BigFloat->new("-0.0003"); $x; ok 588 - $x = Math::BigFloat->new("-0.0003"); $x; ok 589 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 590 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 591 - $x = Math::BigFloat->new("123456E2"); $x; ok 592 - $x = Math::BigFloat->new("123456E2"); $x; ok 593 - $x = Math::BigFloat->new("123456E-2"); $x; ok 594 - $x = Math::BigFloat->new("123456E-2"); $x; ok 595 - $x = Math::BigFloat->new("-123456E2"); $x; ok 596 - $x = Math::BigFloat->new("-123456E2"); $x; ok 597 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 598 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 599 - $x = Math::BigFloat->new("1e1"); $x; ok 600 - $x = Math::BigFloat->new("1e1"); $x; ok 601 - $x = Math::BigFloat->new("2e-11"); $x; ok 602 - $x = Math::BigFloat->new("2e-11"); $x; ok 603 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 604 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 605 - $x = Math::BigFloat->new(" 000001"); $x; ok 606 - $x = Math::BigFloat->new(" 000001"); $x; ok 607 - $x = Math::BigFloat->new(" -00001"); $x; ok 608 - $x = Math::BigFloat->new(" -00001"); $x; ok 609 - $x = Math::BigFloat->new(" -1"); $x; ok 610 - $x = Math::BigFloat->new(" -1"); $x; ok 611 - $x = Math::BigFloat->new(" 000.01"); $x; ok 612 - $x = Math::BigFloat->new(" 000.01"); $x; ok 613 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 614 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 615 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 616 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 617 - $x = Math::BigFloat->new("-3e111"); $x; ok 618 - $x = Math::BigFloat->new("-3e111"); $x; ok 619 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 620 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 621 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x ** $y; ok 622 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x ** $y; ok 623 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 624 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 625 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x ** $y; ok 626 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x ** $y; ok 627 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 628 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 629 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-21"); $x ** $y; ok 630 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-21"); $x ** $y; ok 631 - $x = Math::BigFloat->new("-21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 632 - $x = Math::BigFloat->new("-21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 633 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("21"); $x ** $y; ok 634 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("21"); $x ** $y; ok 635 - $x = Math::BigFloat->new("21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 636 - $x = Math::BigFloat->new("21"); $y = Math::BigFloat->new("NaN"); $x ** $y; ok 637 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x ** $y; ok 638 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x ** $y; ok 639 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x ** $y; ok 640 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x ** $y; ok 641 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("9"); $x ** $y; ok 642 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("9"); $x ** $y; ok 643 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 644 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 645 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 646 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 647 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 648 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 649 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 650 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 651 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 652 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x ** $y; ok 653 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 654 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x ** $y; ok 655 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x ** $y; ok 656 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x ** $y; ok 657 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 658 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 659 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x ** $y; ok 660 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x ** $y; ok 661 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 662 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x ** $y; ok 663 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x ** $y; ok 664 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x ** $y; ok 665 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x ** $y; ok 666 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x ** $y; ok 667 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 668 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 669 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 670 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x ** $y; ok 671 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x ** $y; ok 672 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x ** $y; ok 673 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x ** $y; ok 674 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x ** $y; ok 675 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 676 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x ** $y; ok 677 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x ** $y; ok 678 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x ** $y; ok 679 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x ** $y; ok 680 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x ** $y; ok 681 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x ** $y; ok 682 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x ** $y; ok 683 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x ** $y; ok 684 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x ** $y; ok 685 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x ** $y; ok 686 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x ** $y; ok 687 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x ** $y; ok 688 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x ** $y; ok 689 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x ** $y; ok 690 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x ** $y; ok 691 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x ** $y; ok 692 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x ** $y; ok 693 - $x = Math::BigFloat->new("bnegNaN"); $x->bneg(); ok 694 - $x = Math::BigFloat->new("bnegNaN"); $x->bneg(); ok 695 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 696 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 697 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 698 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 699 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 700 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 701 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 702 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 703 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 704 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 705 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 706 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 707 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 708 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 709 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 710 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 711 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 712 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 713 - $x = Math::BigFloat->new("babsNaN"); $x->babs(); ok 714 - $x = Math::BigFloat->new("babsNaN"); $x->babs(); ok 715 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 716 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 717 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 718 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 719 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 720 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 721 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 722 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 723 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 724 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 725 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 726 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 727 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 728 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 729 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 730 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 731 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 732 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 733 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 734 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 735 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 736 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 737 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 738 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 739 - $x = Math::BigFloat->new("NaNfround"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 740 - $x = Math::BigFloat->new("NaNfround"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 741 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 742 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 743 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 744 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 745 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 746 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 747 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 748 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 749 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 750 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 751 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 752 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 753 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 754 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 755 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 756 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 757 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 758 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 759 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 760 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 761 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 762 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 763 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 764 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 765 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 766 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 767 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 768 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 769 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 770 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 771 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 772 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 773 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 774 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 775 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 776 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 777 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 778 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 779 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 780 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 781 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 782 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 783 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 784 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 785 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 786 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 787 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 788 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 789 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 790 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 791 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 792 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 793 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 794 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 795 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 796 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 797 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 798 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 799 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 800 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 801 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 802 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 803 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 804 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 805 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 806 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 807 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 808 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 809 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 810 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 811 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 812 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 813 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 814 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 815 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 816 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 817 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 818 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 819 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 820 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 821 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 822 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 823 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 824 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 825 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 826 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 827 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 828 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 829 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 830 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 831 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 832 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 833 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 834 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 835 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 836 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 837 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 838 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 839 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 840 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 841 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 842 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 843 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 844 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 845 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 846 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 847 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 848 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 849 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 850 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 851 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 852 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 853 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 854 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 855 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 856 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 857 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 858 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 859 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 860 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 861 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 862 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 863 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 864 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 865 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 866 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 867 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 868 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 869 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 870 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 871 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 872 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 873 - $x = Math::BigFloat->new("NaNffround"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 874 - $x = Math::BigFloat->new("NaNffround"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 875 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 876 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 877 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 878 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 879 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 880 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 881 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 882 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 883 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 884 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 885 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 886 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 887 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 888 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 889 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 890 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 891 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 892 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 893 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 894 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 895 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 896 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 897 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 898 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 899 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 900 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 901 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 902 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 903 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 904 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 905 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 906 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 907 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 908 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 909 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 910 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 911 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 912 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 913 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 914 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 915 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 916 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 917 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 918 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 919 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 920 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 921 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 922 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 923 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 924 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-4); ok 925 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-5); ok 926 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 927 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 928 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 929 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 930 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 931 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 932 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 933 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 934 - $x = Math::BigFloat->new("+2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 935 - $x = Math::BigFloat->new("-2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 936 - $x = Math::BigFloat->new("+2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 937 - $x = Math::BigFloat->new("-2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 938 - $x = Math::BigFloat->new("+2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 939 - $x = Math::BigFloat->new("-2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 940 - $x = Math::BigFloat->new("+2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 941 - $x = Math::BigFloat->new("-2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 942 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 943 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 944 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-2); ok 945 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-3); ok 946 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-4); ok 947 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-5); ok 948 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 949 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 950 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 951 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 952 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 953 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 954 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 955 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 956 - $x = Math::BigFloat->new("+3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 957 - $x = Math::BigFloat->new("-3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 958 - $x = Math::BigFloat->new("+3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 959 - $x = Math::BigFloat->new("-3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 960 - $x = Math::BigFloat->new("+3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 961 - $x = Math::BigFloat->new("-3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 962 - $x = Math::BigFloat->new("+3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 963 - $x = Math::BigFloat->new("-3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 964 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 965 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 966 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-2); ok 967 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-3); ok 968 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-4); ok 969 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-5); ok 970 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 971 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 972 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 973 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 974 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 975 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 976 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 977 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 978 - $x = Math::BigFloat->new("+4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 979 - $x = Math::BigFloat->new("-4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 980 - $x = Math::BigFloat->new("+4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 981 - $x = Math::BigFloat->new("-4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 982 - $x = Math::BigFloat->new("+4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 983 - $x = Math::BigFloat->new("-4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 984 - $x = Math::BigFloat->new("+4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 985 - $x = Math::BigFloat->new("-4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 986 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 987 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 988 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-2); ok 989 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-3); ok 990 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-4); ok 991 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-5); ok 992 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 993 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 994 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 995 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 996 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 997 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 998 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 999 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1000 - $x = Math::BigFloat->new("+5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1001 - $x = Math::BigFloat->new("-5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1002 - $x = Math::BigFloat->new("+5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1003 - $x = Math::BigFloat->new("-5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1004 - $x = Math::BigFloat->new("+5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1005 - $x = Math::BigFloat->new("-5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1006 - $x = Math::BigFloat->new("+5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1007 - $x = Math::BigFloat->new("-5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1008 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1009 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1010 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-2); ok 1011 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-3); ok 1012 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-4); ok 1013 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-5); ok 1014 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1015 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1016 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1017 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1018 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1019 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1020 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1021 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1022 - $x = Math::BigFloat->new("+6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1023 - $x = Math::BigFloat->new("-6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1024 - $x = Math::BigFloat->new("+6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1025 - $x = Math::BigFloat->new("-6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1026 - $x = Math::BigFloat->new("+6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1027 - $x = Math::BigFloat->new("-6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1028 - $x = Math::BigFloat->new("+6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1029 - $x = Math::BigFloat->new("-6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1030 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1031 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1032 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-2); ok 1033 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1034 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1035 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1036 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1037 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1038 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1039 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1040 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1041 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1042 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1043 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1044 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1045 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1046 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1047 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1048 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1049 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1050 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1051 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1052 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1053 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1054 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1055 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1056 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1057 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1058 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1059 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1060 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("bcmpNaN"); $x->bcmp($y); ok 1061 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1062 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("bcmpNaN"); $x->bcmp($y); ok 1063 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1064 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1065 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1066 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1067 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1068 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1069 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1070 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1071 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1072 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1073 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bcmp($y); ok 1074 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1075 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bcmp($y); ok 1076 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1077 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bcmp($y); ok 1078 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1079 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1080 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bcmp($y); ok 1081 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1082 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bcmp($y); ok 1083 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1084 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bcmp($y); ok 1085 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1086 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bcmp($y); ok 1087 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1088 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bcmp($y); ok 1089 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bcmp($y); ok 1090 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1091 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1092 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1093 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1094 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bcmp($y); ok 1095 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bcmp($y); ok 1096 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1097 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1098 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1099 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1100 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1101 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1102 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1103 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1104 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1105 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bcmp($y); ok 1106 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1107 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bcmp($y); ok 1108 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bcmp($y); ok 1109 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bcmp($y); ok 1110 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bcmp($y); ok 1111 - $x = Math::BigFloat->new("1e1234567890987654321"); $y = Math::BigFloat->new("1e1234567890987654320"); $x->bcmp($y); ok 1112 - $x = Math::BigFloat->new("1e-1234567890987654321"); $y = Math::BigFloat->new("1e-1234567890987654320"); $x->bcmp($y); ok 1113 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1114 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1115 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1116 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1117 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1118 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1119 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1120 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1121 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1122 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1123 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1124 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1125 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1126 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bcmp($y); ok 1127 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1128 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1129 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("bcmpNaN"); $x->bacmp($y); ok 1130 - $x = Math::BigFloat->new("bcmpNaN"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1131 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("bcmpNaN"); $x->bacmp($y); ok 1132 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1133 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1134 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1135 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1136 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1137 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1138 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1139 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1140 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1141 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1142 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bacmp($y); ok 1143 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1144 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bacmp($y); ok 1145 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1146 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bacmp($y); ok 1147 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1148 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1149 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bacmp($y); ok 1150 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1151 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bacmp($y); ok 1152 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1153 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bacmp($y); ok 1154 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1155 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bacmp($y); ok 1156 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1157 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bacmp($y); ok 1158 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bacmp($y); ok 1159 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1160 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1161 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1162 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1163 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bacmp($y); ok 1164 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bacmp($y); ok 1165 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1166 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1167 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1168 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1169 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1170 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1171 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1172 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1173 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1174 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bacmp($y); ok 1175 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1176 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bacmp($y); ok 1177 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bacmp($y); ok 1178 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bacmp($y); ok 1179 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bacmp($y); ok 1180 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1181 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1182 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1183 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1184 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1185 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1186 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1187 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1188 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1189 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1190 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1191 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1192 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1193 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1194 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1195 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1196 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("bacmpNaN"); $x->bacmp($y); ok 1197 - $x = Math::BigFloat->new("bacmpNaN"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1198 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("bacmpNaN"); $x->bacmp($y); ok 1199 - $x = Math::BigFloat->new("bacmpNaN"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1200 - $x = Math::BigFloat->new("bdecNaN"); --$x; ok 1201 - $x = Math::BigFloat->new("bdecNaN"); --$x; ok 1202 - $x = Math::BigFloat->new("+inf"); --$x; ok 1203 - $x = Math::BigFloat->new("+inf"); --$x; ok 1204 - $x = Math::BigFloat->new("-inf"); --$x; ok 1205 - $x = Math::BigFloat->new("-inf"); --$x; ok 1206 - $x = Math::BigFloat->new("+0"); --$x; ok 1207 - $x = Math::BigFloat->new("+0"); --$x; ok 1208 - $x = Math::BigFloat->new("+1"); --$x; ok 1209 - $x = Math::BigFloat->new("+1"); --$x; ok 1210 - $x = Math::BigFloat->new("-1"); --$x; ok 1211 - $x = Math::BigFloat->new("-1"); --$x; ok 1212 - $x = Math::BigFloat->new("1.23"); --$x; ok 1213 - $x = Math::BigFloat->new("1.23"); --$x; ok 1214 - $x = Math::BigFloat->new("-1.23"); --$x; ok 1215 - $x = Math::BigFloat->new("-1.23"); --$x; ok 1216 - $x = Math::BigFloat->new("100"); --$x; ok 1217 - $x = Math::BigFloat->new("100"); --$x; ok 1218 - $x = Math::BigFloat->new("101"); --$x; ok 1219 - $x = Math::BigFloat->new("101"); --$x; ok 1220 - $x = Math::BigFloat->new("-100"); --$x; ok 1221 - $x = Math::BigFloat->new("-100"); --$x; ok 1222 - $x = Math::BigFloat->new("-99"); --$x; ok 1223 - $x = Math::BigFloat->new("-99"); --$x; ok 1224 - $x = Math::BigFloat->new("-98"); --$x; ok 1225 - $x = Math::BigFloat->new("-98"); --$x; ok 1226 - $x = Math::BigFloat->new("99"); --$x; ok 1227 - $x = Math::BigFloat->new("99"); --$x; ok 1228 - $x = Math::BigFloat->new("bincNaN"); ++$x; ok 1229 - $x = Math::BigFloat->new("bincNaN"); ++$x; ok 1230 - $x = Math::BigFloat->new("+inf"); ++$x; ok 1231 - $x = Math::BigFloat->new("+inf"); ++$x; ok 1232 - $x = Math::BigFloat->new("-inf"); ++$x; ok 1233 - $x = Math::BigFloat->new("-inf"); ++$x; ok 1234 - $x = Math::BigFloat->new("+0"); ++$x; ok 1235 - $x = Math::BigFloat->new("+0"); ++$x; ok 1236 - $x = Math::BigFloat->new("+1"); ++$x; ok 1237 - $x = Math::BigFloat->new("+1"); ++$x; ok 1238 - $x = Math::BigFloat->new("-1"); ++$x; ok 1239 - $x = Math::BigFloat->new("-1"); ++$x; ok 1240 - $x = Math::BigFloat->new("1.23"); ++$x; ok 1241 - $x = Math::BigFloat->new("1.23"); ++$x; ok 1242 - $x = Math::BigFloat->new("-1.23"); ++$x; ok 1243 - $x = Math::BigFloat->new("-1.23"); ++$x; ok 1244 - $x = Math::BigFloat->new("100"); ++$x; ok 1245 - $x = Math::BigFloat->new("100"); ++$x; ok 1246 - $x = Math::BigFloat->new("-100"); ++$x; ok 1247 - $x = Math::BigFloat->new("-100"); ++$x; ok 1248 - $x = Math::BigFloat->new("-99"); ++$x; ok 1249 - $x = Math::BigFloat->new("-99"); ++$x; ok 1250 - $x = Math::BigFloat->new("-101"); ++$x; ok 1251 - $x = Math::BigFloat->new("-101"); ++$x; ok 1252 - $x = Math::BigFloat->new("99"); ++$x; ok 1253 - $x = Math::BigFloat->new("99"); ++$x; ok 1254 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1255 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1256 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1257 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1258 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1259 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x + $y; ok 1260 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1261 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1262 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1263 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1264 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1265 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1266 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1267 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x + $y; ok 1268 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1269 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1270 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1271 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x + $y; ok 1272 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1273 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1274 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1275 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x + $y; ok 1276 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1277 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1278 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1279 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1280 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1281 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1282 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1283 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1284 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1285 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x + $y; ok 1286 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1287 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1288 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1289 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1290 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1291 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1292 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1293 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1294 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1295 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1296 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1297 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1298 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1299 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1300 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1301 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1302 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1303 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1304 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1305 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1306 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1307 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1308 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1309 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1310 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1311 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1312 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1313 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1314 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1315 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x + $y; ok 1316 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1317 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1318 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1319 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1320 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1321 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1322 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1323 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1324 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1325 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1326 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1327 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1328 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1329 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1330 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1331 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1332 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1333 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1334 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1335 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x + $y; ok 1336 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1337 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1338 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1339 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x + $y; ok 1340 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x + $y; ok 1341 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x + $y; ok 1342 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x + $y; ok 1343 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x + $y; ok 1344 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x + $y; ok 1345 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x + $y; ok 1346 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1347 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1348 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1349 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1350 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1351 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x - $y; ok 1352 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1353 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1354 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1355 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1356 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1357 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1358 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1359 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x - $y; ok 1360 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1361 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1362 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1363 - $x = Math::BigFloat->new("baddNaN"); $y = Math::BigFloat->new("+inf"); $x - $y; ok 1364 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1365 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1366 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1367 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("baddNaN"); $x - $y; ok 1368 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1369 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1370 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1371 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1372 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1373 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1374 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1375 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1376 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1377 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x - $y; ok 1378 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1379 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1380 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1381 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1382 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1383 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1384 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1385 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1386 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1387 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1388 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1389 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1390 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1391 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1392 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1393 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1394 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1395 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1396 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1397 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1398 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1399 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1400 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1401 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1402 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1403 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1404 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1405 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1406 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1407 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x - $y; ok 1408 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1409 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1410 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1411 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1412 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1413 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1414 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1415 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1416 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1417 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1418 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1419 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1420 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1421 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1422 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1423 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1424 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1425 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1426 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1427 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x - $y; ok 1428 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1429 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1430 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1431 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x - $y; ok 1432 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x - $y; ok 1433 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x - $y; ok 1434 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x - $y; ok 1435 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x - $y; ok 1436 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1437 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1438 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1439 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1440 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1441 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1442 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1443 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1444 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1445 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1446 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1447 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1448 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1449 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1450 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1451 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1452 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1453 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1454 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1455 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1456 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1457 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1458 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1459 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1460 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1461 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1462 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1463 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1464 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1465 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1466 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1467 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1468 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1469 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1470 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1471 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1472 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1473 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1474 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1475 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1476 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1477 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1478 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1479 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1480 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1481 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1482 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1483 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1484 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1485 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1486 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1487 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1488 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1489 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1490 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1491 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1492 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1493 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1494 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1495 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1496 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1497 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1498 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1499 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1500 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1501 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1502 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1503 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1504 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1505 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1506 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1507 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1508 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1509 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1510 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1511 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1512 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1513 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1514 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1515 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1516 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1517 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1518 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1519 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1520 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1521 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1522 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1523 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1524 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1525 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1526 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1527 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1528 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1529 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1530 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1531 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1532 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1533 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1534 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1535 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1536 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1537 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1538 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1539 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1540 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1541 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1542 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1543 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1544 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1545 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1546 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1547 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1548 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1549 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1550 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1551 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1552 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1553 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1554 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1555 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1556 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1557 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1558 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1559 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1560 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1561 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1562 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1563 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1564 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1565 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1566 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1567 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1568 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1569 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1570 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1571 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x * $y; ok 1572 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1573 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1574 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1575 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaNmul"); $x * $y; ok 1576 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1577 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1578 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1579 - $x = Math::BigFloat->new("NaNmul"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1580 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1581 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1582 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1583 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1584 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1585 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1586 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1587 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1588 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1589 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1590 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1591 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1592 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1593 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x * $y; ok 1594 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1595 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x * $y; ok 1596 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1597 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1598 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1599 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x * $y; ok 1600 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1601 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1602 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1603 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x * $y; ok 1604 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1605 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1606 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1607 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1608 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1609 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1610 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1611 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1612 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1613 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1614 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1615 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x * $y; ok 1616 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x * $y; ok 1617 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x * $y; ok 1618 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1619 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1620 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1621 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1622 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1623 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x * $y; ok 1624 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1625 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x * $y; ok 1626 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1627 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1628 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1629 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x * $y; ok 1630 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x * $y; ok 1631 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x * $y; ok 1632 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x * $y; ok 1633 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x * $y; ok 1634 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x * $y; ok 1635 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x * $y; ok 1636 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x * $y; ok 1637 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x * $y; ok 1638 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x * $y; ok 1639 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x * $y; ok 1640 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x * $y; ok 1641 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x * $y; ok 1642 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x * $y; ok 1643 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x * $y; ok 1644 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1645 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1646 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1647 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1648 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1649 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1650 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1651 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1652 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1653 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1654 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1655 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1656 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1657 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1658 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1659 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1660 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1661 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x * $y; ok 1662 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x * $y; ok 1663 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x * $y; ok 1664 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x * $y; ok 1665 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x * $y; ok 1666 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1667 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1668 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1669 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1670 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1671 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1672 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1673 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 1674 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1675 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1676 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1677 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1678 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1679 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1680 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1681 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1682 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1683 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1684 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1685 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1686 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1687 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1688 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1689 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1690 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1691 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1692 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1693 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1694 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1695 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1696 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1697 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1698 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1699 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1700 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1701 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1702 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1703 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1704 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1705 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1706 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1707 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1708 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1709 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1710 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1711 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1712 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1713 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1714 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1715 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1716 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1717 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1718 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1719 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1720 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1721 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1722 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1723 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1724 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1725 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1726 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1727 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1728 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1729 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1730 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1731 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1732 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1733 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1734 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1735 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1736 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1737 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1738 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1739 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1740 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1741 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1742 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1743 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1744 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1745 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1746 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1747 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1748 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1749 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1750 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1751 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1752 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1753 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1754 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1755 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1756 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1757 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1758 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1759 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1760 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1761 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1762 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1763 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; $x / $y; ok 1764 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1765 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1766 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1767 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1768 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1769 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1770 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1771 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1772 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1773 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1774 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1775 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1776 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1777 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1778 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1779 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1780 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1781 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1782 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1783 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1784 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1785 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1786 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1787 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1788 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1789 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1790 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1791 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1792 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1793 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1794 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1795 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1796 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1797 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1798 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1799 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1800 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1801 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1802 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1803 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; $x / $y; ok 1804 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1805 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1806 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1807 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; $x / $y; ok 1808 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x % $y; ok 1809 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x % $y; ok 1810 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x % $y; ok 1811 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x % $y; ok 1812 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x % $y; ok 1813 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x % $y; ok 1814 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x % $y; ok 1815 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x % $y; ok 1816 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1817 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1818 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1819 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1820 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1821 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1822 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1823 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1824 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1825 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1826 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1827 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1828 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1829 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1830 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1831 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x % $y; ok 1832 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1833 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1834 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1835 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1836 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x % $y; ok 1837 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x % $y; ok 1838 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1839 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1840 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1841 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1842 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1843 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1844 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1845 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x % $y; ok 1846 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1847 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x % $y; ok 1848 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1849 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1850 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1851 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1852 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1853 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x % $y; ok 1854 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1855 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x % $y; ok 1856 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x % $y; ok 1857 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x % $y; ok 1858 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1859 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1860 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x % $y; ok 1861 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x % $y; ok 1862 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1863 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x % $y; ok 1864 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x % $y; ok 1865 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x % $y; ok 1866 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1867 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1868 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1869 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1870 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1871 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x % $y; ok 1872 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1873 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1874 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1875 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1876 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1877 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1878 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1879 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1880 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x % $y; ok 1881 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x % $y; ok 1882 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x % $y; ok 1883 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x % $y; ok 1884 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1885 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1886 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1887 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1888 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1889 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1890 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1891 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1892 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1893 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1894 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1895 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1896 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1897 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1898 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1899 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1900 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1901 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x % $y; ok 1902 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x % $y; ok 1903 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x % $y; ok 1904 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x % $y; ok 1905 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x % $y; ok 1906 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x % $y; ok 1907 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x % $y; ok 1908 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x % $y; ok 1909 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x % $y; ok 1910 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x % $y; ok 1911 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x % $y; ok 1912 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x % $y; ok 1913 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x % $y; ok 1914 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x % $y; ok 1915 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x % $y; ok 1916 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x % $y; ok 1917 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x % $y; ok 1918 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x % $y; ok 1919 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x % $y; ok 1920 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x % $y; ok 1921 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x % $y; ok 1922 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x % $y; ok 1923 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x % $y; ok 1924 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x % $y; ok 1925 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x % $y; ok 1926 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x % $y; ok 1927 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x % $y; ok 1928 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x % $y; ok 1929 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x % $y; ok 1930 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1931 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1932 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1933 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x % $y; ok 1934 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x % $y; ok 1935 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x % $y; ok 1936 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x % $y; ok 1937 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x % $y; ok 1938 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x % $y; ok 1939 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x % $y; ok 1940 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x % $y; ok 1941 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x % $y; ok 1942 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1943 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1944 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1945 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1946 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1947 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1948 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1949 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x % $y; ok 1950 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x % $y; ok 1951 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x % $y; ok 1952 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x % $y; ok 1953 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x % $y; ok 1954 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x % $y; ok 1955 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x % $y; ok 1956 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x % $y; ok 1957 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x % $y; ok 1958 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1959 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1960 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1961 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1962 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1963 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x % $y; ok 1964 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x % $y; ok 1965 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x % $y; ok 1966 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1967 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1968 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1969 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x % $y; ok 1970 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1971 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1972 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1973 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1974 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1975 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1976 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1977 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x % $y; ok 1978 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1979 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1980 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1981 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x % $y; ok 1982 - $x = Math::BigFloat->new("Nanfac"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1983 - $x = Math::BigFloat->new("Nanfac"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1984 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1985 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1986 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1987 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1988 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1989 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1990 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1991 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1992 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1993 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1994 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1995 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1996 - $x = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1997 - $x = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1998 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 1999 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2000 - $x = Math::BigFloat->new("5"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2001 - $x = Math::BigFloat->new("5"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2002 - $x = Math::BigFloat->new("6"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2003 - $x = Math::BigFloat->new("6"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2004 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2005 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2006 - $x = Math::BigFloat->new("11"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2007 - $x = Math::BigFloat->new("11"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2008 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2009 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bfac(); ok 2010 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2011 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2012 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2013 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2014 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2015 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2016 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2017 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2018 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2019 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2020 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2021 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2022 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2023 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2024 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2025 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2026 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2027 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2028 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2029 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2030 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2031 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2032 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2033 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2034 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2035 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2036 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2037 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2038 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2039 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2040 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2041 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2042 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2043 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2044 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2045 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2046 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2047 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2048 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2049 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2050 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2051 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2052 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2053 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2054 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2055 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2056 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2057 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2058 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2059 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2060 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2061 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2062 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2063 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2064 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2065 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2066 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2067 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2068 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2069 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2070 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2071 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2072 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2073 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2074 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2075 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2076 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2077 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2078 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2079 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2080 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2081 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2082 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2083 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2084 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2085 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2086 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2087 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2088 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2089 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2090 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2091 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2092 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2093 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2094 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2095 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2096 - $x = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2097 - $x = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2098 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2099 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2100 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2101 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2102 - $x = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2103 - $x = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2104 - $x = Math::BigFloat->new("-123.45"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2105 - $x = Math::BigFloat->new("-123.45"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2106 - $x = Math::BigFloat->new("nanbsqrt"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2107 - $x = Math::BigFloat->new("nanbsqrt"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2108 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2109 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2110 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2111 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2112 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2113 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2114 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2115 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2116 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2117 - $x = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2118 - $x = Math::BigFloat->new("9"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2119 - $x = Math::BigFloat->new("9"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2120 - $x = Math::BigFloat->new("16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2121 - $x = Math::BigFloat->new("16"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2122 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2123 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2124 - $x = Math::BigFloat->new("123.456"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2125 - $x = Math::BigFloat->new("123.456"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2126 - $x = Math::BigFloat->new("15241.38393"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2127 - $x = Math::BigFloat->new("15241.38393"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2128 - $x = Math::BigFloat->new("1.44"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2129 - $x = Math::BigFloat->new("1.44"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2130 - $x = Math::BigFloat->new("1.44E10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2131 - $x = Math::BigFloat->new("1.44E10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2132 - $x = Math::BigFloat->new("2e10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2133 - $x = Math::BigFloat->new("2e10"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2134 - $x = Math::BigFloat->new("144e20"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2135 - $x = Math::BigFloat->new("144e20"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2136 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2137 - $x = Math::BigFloat->new("12"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2138 - $x = Math::BigFloat->new("0.49"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2139 - $x = Math::BigFloat->new("0.49"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2140 - $x = Math::BigFloat->new("0.0049"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2141 - $x = Math::BigFloat->new("0.0049"); $Math::BigFloat::div_scale = 40; $x->bsqrt(); ok 2142 - $x = Math::BigFloat->new("123"); $x->is_nan(); ok 2143 - $x = Math::BigFloat->new("abc"); $x->is_nan(); ok 2144 - $x = Math::BigFloat->new("NaN"); $x->is_nan(); ok 2145 - $x = Math::BigFloat->new("-123"); $x->is_nan(); ok 2146 - $x = Math::BigFloat->new("+inf"); $x->is_inf(""); ok 2147 - $x = Math::BigFloat->new("-inf"); $x->is_inf(""); ok 2148 - $x = Math::BigFloat->new("abc"); $x->is_inf(""); ok 2149 - $x = Math::BigFloat->new("1"); $x->is_inf(""); ok 2150 - $x = Math::BigFloat->new("NaN"); $x->is_inf(""); ok 2151 - $x = Math::BigFloat->new("-1"); $x->is_inf(""); ok 2152 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-"); ok 2153 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+"); ok 2154 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-"); ok 2155 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+"); ok 2156 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-inf"); ok 2157 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+inf"); ok 2158 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-inf"); ok 2159 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+inf"); ok 2160 - $x = Math::BigFloat->new("+iNfInItY"); $x->is_inf(""); ok 2161 - $x = Math::BigFloat->new("-InFiNiTy"); $x->is_inf(""); ok 2162 - $x = Math::BigFloat->new("abc"); $x->is_odd(); ok 2163 - $x = Math::BigFloat->new("0"); $x->is_odd(); ok 2164 - $x = Math::BigFloat->new("-1"); $x->is_odd(); ok 2165 - $x = Math::BigFloat->new("-3"); $x->is_odd(); ok 2166 - $x = Math::BigFloat->new("1"); $x->is_odd(); ok 2167 - $x = Math::BigFloat->new("3"); $x->is_odd(); ok 2168 - $x = Math::BigFloat->new("1000001"); $x->is_odd(); ok 2169 - $x = Math::BigFloat->new("1000002"); $x->is_odd(); ok 2170 - $x = Math::BigFloat->new("+inf"); $x->is_odd(); ok 2171 - $x = Math::BigFloat->new("-inf"); $x->is_odd(); ok 2172 - $x = Math::BigFloat->new("123.45"); $x->is_odd(); ok 2173 - $x = Math::BigFloat->new("-123.45"); $x->is_odd(); ok 2174 - $x = Math::BigFloat->new("2"); $x->is_odd(); ok 2175 - $x = Math::BigFloat->new("NaNis_int"); $x->is_int(); ok 2176 - $x = Math::BigFloat->new("0"); $x->is_int(); ok 2177 - $x = Math::BigFloat->new("1"); $x->is_int(); ok 2178 - $x = Math::BigFloat->new("2"); $x->is_int(); ok 2179 - $x = Math::BigFloat->new("-2"); $x->is_int(); ok 2180 - $x = Math::BigFloat->new("-1"); $x->is_int(); ok 2181 - $x = Math::BigFloat->new("-inf"); $x->is_int(); ok 2182 - $x = Math::BigFloat->new("+inf"); $x->is_int(); ok 2183 - $x = Math::BigFloat->new("123.4567"); $x->is_int(); ok 2184 - $x = Math::BigFloat->new("-0.1"); $x->is_int(); ok 2185 - $x = Math::BigFloat->new("-0.002"); $x->is_int(); ok 2186 - $x = Math::BigFloat->new("abc"); $x->is_even(); ok 2187 - $x = Math::BigFloat->new("0"); $x->is_even(); ok 2188 - $x = Math::BigFloat->new("-1"); $x->is_even(); ok 2189 - $x = Math::BigFloat->new("-3"); $x->is_even(); ok 2190 - $x = Math::BigFloat->new("1"); $x->is_even(); ok 2191 - $x = Math::BigFloat->new("3"); $x->is_even(); ok 2192 - $x = Math::BigFloat->new("1000001"); $x->is_even(); ok 2193 - $x = Math::BigFloat->new("1000002"); $x->is_even(); ok 2194 - $x = Math::BigFloat->new("2"); $x->is_even(); ok 2195 - $x = Math::BigFloat->new("+inf"); $x->is_even(); ok 2196 - $x = Math::BigFloat->new("-inf"); $x->is_even(); ok 2197 - $x = Math::BigFloat->new("123.456"); $x->is_even(); ok 2198 - $x = Math::BigFloat->new("-123.456"); $x->is_even(); ok 2199 - $x = Math::BigFloat->new("0.01"); $x->is_even(); ok 2200 - $x = Math::BigFloat->new("-0.01"); $x->is_even(); ok 2201 - $x = Math::BigFloat->new("120"); $x->is_even(); ok 2202 - $x = Math::BigFloat->new("1200"); $x->is_even(); ok 2203 - $x = Math::BigFloat->new("-1200"); $x->is_even(); ok 2204 - $x = Math::BigFloat->new("0"); $x->is_positive(); ok 2205 - $x = Math::BigFloat->new("1"); $x->is_positive(); ok 2206 - $x = Math::BigFloat->new("-1"); $x->is_positive(); ok 2207 - $x = Math::BigFloat->new("-123"); $x->is_positive(); ok 2208 - $x = Math::BigFloat->new("NaN"); $x->is_positive(); ok 2209 - $x = Math::BigFloat->new("-inf"); $x->is_positive(); ok 2210 - $x = Math::BigFloat->new("+inf"); $x->is_positive(); ok 2211 - $x = Math::BigFloat->new("0"); $x->is_negative(); ok 2212 - $x = Math::BigFloat->new("1"); $x->is_negative(); ok 2213 - $x = Math::BigFloat->new("-1"); $x->is_negative(); ok 2214 - $x = Math::BigFloat->new("-123"); $x->is_negative(); ok 2215 - $x = Math::BigFloat->new("NaN"); $x->is_negative(); ok 2216 - $x = Math::BigFloat->new("-inf"); $x->is_negative(); ok 2217 - $x = Math::BigFloat->new("+inf"); $x->is_negative(); ok 2218 - $x = Math::BigFloat->new("0"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2219 - $x = Math::BigFloat->new("1"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2220 - $x = Math::BigFloat->new("123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2221 - $x = Math::BigFloat->new("-123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2222 - $x = Math::BigFloat->new("-1200"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2223 - $x = Math::BigFloat->new("NaNparts"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2224 - $x = Math::BigFloat->new("+inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2225 - $x = Math::BigFloat->new("-inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2226 - $x = Math::BigFloat->new("0"); $x->exponent()->bstr(); ok 2227 - $x = Math::BigFloat->new("1"); $x->exponent()->bstr(); ok 2228 - $x = Math::BigFloat->new("123"); $x->exponent()->bstr(); ok 2229 - $x = Math::BigFloat->new("-123"); $x->exponent()->bstr(); ok 2230 - $x = Math::BigFloat->new("-1200"); $x->exponent()->bstr(); ok 2231 - $x = Math::BigFloat->new("+inf"); $x->exponent()->bstr(); ok 2232 - $x = Math::BigFloat->new("-inf"); $x->exponent()->bstr(); ok 2233 - $x = Math::BigFloat->new("NaNexponent"); $x->exponent()->bstr(); ok 2234 - $x = Math::BigFloat->new("0"); $x->mantissa()->bstr(); ok 2235 - $x = Math::BigFloat->new("1"); $x->mantissa()->bstr(); ok 2236 - $x = Math::BigFloat->new("123"); $x->mantissa()->bstr(); ok 2237 - $x = Math::BigFloat->new("-123"); $x->mantissa()->bstr(); ok 2238 - $x = Math::BigFloat->new("-1200"); $x->mantissa()->bstr(); ok 2239 - $x = Math::BigFloat->new("+inf"); $x->mantissa()->bstr(); ok 2240 - $x = Math::BigFloat->new("-inf"); $x->mantissa()->bstr(); ok 2241 - $x = Math::BigFloat->new("NaNmantissa"); $x->mantissa()->bstr(); ok 2242 - $x = Math::BigFloat->new("123"); $x->length(); ok 2243 - $x = Math::BigFloat->new("-123"); $x->length(); ok 2244 - $x = Math::BigFloat->new("0"); $x->length(); ok 2245 - $x = Math::BigFloat->new("1"); $x->length(); ok 2246 - $x = Math::BigFloat->new("12345678901234567890"); $x->length(); ok 2247 - $x = Math::BigFloat->new("NaNzero"); $x->is_zero(); ok 2248 - $x = Math::BigFloat->new("+inf"); $x->is_zero(); ok 2249 - $x = Math::BigFloat->new("-inf"); $x->is_zero(); ok 2250 - $x = Math::BigFloat->new("0"); $x->is_zero(); ok 2251 - $x = Math::BigFloat->new("-1"); $x->is_zero(); ok 2252 - $x = Math::BigFloat->new("1"); $x->is_zero(); ok 2253 - $x = Math::BigFloat->new("NaNone"); $x->is_one(); ok 2254 - $x = Math::BigFloat->new("+inf"); $x->is_one(); ok 2255 - $x = Math::BigFloat->new("-inf"); $x->is_one(); ok 2256 - $x = Math::BigFloat->new("0"); $x->is_one(); ok 2257 - $x = Math::BigFloat->new("2"); $x->is_one(); ok 2258 - $x = Math::BigFloat->new("1"); $x->is_one(); ok 2259 - $x = Math::BigFloat->new("-1"); $x->is_one(); ok 2260 - $x = Math::BigFloat->new("-2"); $x->is_one(); ok 2261 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2262 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2263 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2264 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2265 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2266 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2267 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2268 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2269 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2270 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2271 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2272 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2273 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2274 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2275 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2276 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2277 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2278 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2279 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2280 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2281 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2282 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2283 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2284 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2285 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2286 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2287 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2288 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2289 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2290 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2291 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2292 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2293 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2294 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2295 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2296 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2297 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2298 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2299 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2300 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2301 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2302 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2303 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2304 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2305 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2306 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2307 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2308 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2309 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2310 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2311 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2312 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2313 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2314 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2315 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2316 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2317 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2318 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2319 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2320 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2321 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2322 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2323 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2324 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2325 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2326 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2327 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2328 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2329 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2330 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2331 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2332 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2333 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2334 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2335 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 2336 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 2337 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 2338 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 2339 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 2340 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 2341 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 2342 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 2343 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $y ok 2344 - $x = Math::BigInt->new(1200); $y = $CLASS->new($x); \# check $x ok 2345 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsstr() ok 2346 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->exponent() ok 2347 - Math::BigFloat->new("1e1234567890123456789012345678901234567890") > 0 ok 2348 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsub("1e1234567890123456789012345678901234567890") ok 2349 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bmul(2)->bsstr() ok 2350 - Math::BigFloat->new("1234567890123456789012345678901234567890e2")->mantissa() ok 2351 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_a} ok 2352 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_p} ok 2353 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_a} ok 2354 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_p} ok 2355 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_a} ok 2356 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_p} ok 2357 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_a} ok 2358 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_p} ok 2359 - Math::BigFloat->bzero() ok 2360 - Math::BigFloat->bone() ok 2361 - Math::BigFloat->bone("+") ok 2362 - Math::BigFloat->bone("-") ok 2363 - Math::BigFloat->bnan() ok 2364 - Math::BigFloat->binf() ok 2365 - Math::BigFloat->binf("+") ok 2366 - Math::BigFloat->binf("-") ok 2367 - Math::BigFloat->binf("-inf") ok 2368 - $x = Math::BigFloat->new(12); Math::BigFloat->precision(-2); $x->bsqrt(); ok 2369 - Math::BigFloat->precision(undef); $x = Math::BigFloat->new(12); Math::BigFloat->precision(0); $x->bsqrt(); ok 2370 - Math::BigFloat->precision(-3); $x = Math::BigFloat->new(12); $x->bsqrt(); ok 2371 - A and P set => NaN ok 2372 - supplied arg overrides set global ok 2373 - @args = Math::BigFloat::objectify(2, Math::BigFloat, 4, 5); join(" ", @args); ok 2374 - Math::BigFloat->new(-1)->is_one() ok 2375 - Math::BigFloat->new(-1)->is_one("-") ok 2376 - Math::BigFloat->new(1)->bdiv("0.5")->bsstr() ok 2377 - $x = Math::BigFloat->new(3); $x -= $x; ok 2378 - $x = Math::BigFloat->new(-3); $x -= $x; ok 2379 - $x = Math::BigFloat->new(3); $x += $x; ok 2380 - $x = Math::BigFloat->new(-3); $x += $x; ok 2381 - $x = Math::BigFloat->new("NaN"); $x -= $x; ok 2382 - $x = Math::BigFloat->new("inf"); $x -= $x; ok 2383 - $x = Math::BigFloat->new("-inf"); $x -= $x; ok 2384 - $x = Math::BigFloat->new("NaN"); $x += $x; ok 2385 - $x = Math::BigFloat->new("inf"); $x += $x; ok 2386 - $x = Math::BigFloat->new("-inf"); $x += $x; ok 2387 - $x = Math::BigFloat->new("3.14"); $x -= $x; ok 2388 - $x = Math::BigFloat->new("-3.14"); $x -= $x; ok 2389 - 6.28 = Math::BigFloat->new("3.14"); 6.28 += 6.28; ok 2390 - -6.28 = Math::BigFloat->new("-3.14"); -6.28 += -6.28; ok 2391 - 9.8596 = Math::BigFloat->new("3.14"); 9.8596 *= 9.8596; ok 2392 - 9.8596 = Math::BigFloat->new("-3.14"); 9.8596 *= 9.8596; ok 2393 - 1 = Math::BigFloat->new("3.14"); 1 /= 1; ok 2394 - 1 = Math::BigFloat->new("-3.14"); 1 /= 1; ok 2395 - 0 = Math::BigFloat->new("3.14"); 0 %= 0; ok 2396 - 0 = Math::BigFloat->new("-3.14"); 0 %= 0; ok 2397 - $x = Math::BigFloat->new(0); $y = Math::BigFloat->new("0.1"); $x ** $y ok 2398 - 1 = Math::BigFloat->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 2399 - value of ((2**148)+1)/17 ok 2400 - number of digits in ((2**148)+1)/17 ok 2401 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y ok 2402 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x ok 2403 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y ok 2404 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y; $x ok 2405 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); ok 2406 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 2407 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y; $x ok t/bigintg.t .............. 1..356 # Running under perl version 5.018000 for linux # Current time local: Sun Apr 24 12:08:31 2016 # Current time GMT: Sun Apr 24 19:08:31 2016 # Using Test.pm version 1.26 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 ok 27 ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 ok 38 ok 39 ok 40 ok 41 ok 42 ok 43 ok 44 ok 45 ok 46 ok 47 ok 48 ok 49 ok 50 ok 51 ok 52 ok 53 ok 54 ok 55 ok 56 ok 57 ok 58 ok 59 ok 60 ok 61 ok 62 ok 63 ok 64 ok 65 ok 66 ok 67 ok 68 ok 69 ok 70 ok 71 ok 72 ok 73 ok 74 ok 75 ok 76 ok 77 ok 78 ok 79 ok 80 ok 81 ok 82 ok 83 ok 84 ok 85 ok 86 ok 87 ok 88 ok 89 ok 90 ok 91 ok 92 ok 93 ok 94 ok 95 ok 96 ok 97 ok 98 ok 99 ok 100 ok 101 ok 102 ok 103 ok 104 ok 105 ok 106 ok 107 ok 108 ok 109 ok 110 ok 111 ok 112 ok 113 ok 114 ok 115 ok 116 ok 117 ok 118 ok 119 ok 120 ok 121 ok 122 ok 123 ok 124 ok 125 ok 126 ok 127 ok 128 ok 129 ok 130 ok 131 ok 132 ok 133 ok 134 ok 135 ok 136 ok 137 ok 138 ok 139 ok 140 ok 141 ok 142 ok 143 ok 144 ok 145 ok 146 ok 147 ok 148 ok 149 ok 150 ok 151 ok 152 ok 153 ok 154 ok 155 ok 156 ok 157 ok 158 ok 159 ok 160 ok 161 ok 162 ok 163 ok 164 ok 165 ok 166 ok 167 ok 168 ok 169 ok 170 ok 171 ok 172 ok 173 ok 174 ok 175 ok 176 ok 177 ok 178 ok 179 ok 180 ok 181 ok 182 ok 183 ok 184 ok 185 ok 186 ok 187 ok 188 ok 189 ok 190 ok 191 ok 192 ok 193 ok 194 ok 195 ok 196 ok 197 ok 198 ok 199 ok 200 ok 201 ok 202 ok 203 ok 204 ok 205 ok 206 ok 207 ok 208 ok 209 ok 210 ok 211 ok 212 ok 213 ok 214 ok 215 ok 216 ok 217 ok 218 ok 219 ok 220 ok 221 ok 222 ok 223 ok 224 ok 225 ok 226 ok 227 ok 228 ok 229 ok 230 ok 231 ok 232 ok 233 ok 234 ok 235 ok 236 ok 237 ok 238 ok 239 ok 240 ok 241 ok 242 ok 243 ok 244 ok 245 ok 246 ok 247 ok 248 ok 249 ok 250 ok 251 ok 252 ok 253 ok 254 ok 255 ok 256 ok 257 ok 258 ok 259 ok 260 ok 261 ok 262 ok 263 ok 264 ok 265 ok 266 ok 267 ok 268 ok 269 ok 270 ok 271 ok 272 ok 273 ok 274 ok 275 ok 276 ok 277 ok 278 ok 279 ok 280 ok 281 ok 282 ok 283 ok 284 ok 285 ok 286 ok 287 ok 288 ok 289 ok 290 ok 291 ok 292 ok 293 ok 294 ok 295 ok 296 ok 297 ok 298 ok 299 ok 300 ok 301 ok 302 ok 303 ok 304 ok 305 ok 306 ok 307 ok 308 ok 309 ok 310 ok 311 ok 312 ok 313 ok 314 ok 315 ok 316 ok 317 ok 318 ok 319 ok 320 ok 321 ok 322 ok 323 ok 324 ok 325 ok 326 ok 327 ok 328 ok 329 ok 330 ok 331 ok 332 ok 333 ok 334 ok 335 ok 336 ok 337 ok 338 ok 339 ok 340 ok 341 ok 342 ok 343 ok 344 ok 345 ok 346 ok 347 ok 348 ok 349 ok 350 ok 351 ok 352 ok 353 ok 354 ok 355 ok 356 ok t/bigintpm.t ............. 1..3919 ok 1 - Math::BigInt->from_hex("0xcafe") ok 2 - Math::BigInt->from_hex("0xcafebabedead") ok 3 - Math::BigInt->from_bin("0b1001") ok 4 - Math::BigInt->from_bin("0b1001100110011001100110011001"); ok 5 - Math::BigInt->from_oct("0775"); ok 6 - Math::BigInt->from_oct("07777777777777711111111222222222"); ok 7 - Math::BigInt->config()->{lib} ok 8 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("-345"); $x .= $y; ok 9 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x += $y; ok 10 - is a valid object ok 11 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x += $y; ok 12 - is a valid object ok 13 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x -= $y; ok 14 - is a valid object ok 15 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x -= $y; ok 16 - is a valid object ok 17 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x *= $y; ok 18 - is a valid object ok 19 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x *= $y; ok 20 - is a valid object ok 21 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x %= $y; ok 22 - is a valid object ok 23 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("9"); $x %= $y; ok 24 - is a valid object ok 25 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x %= $y; ok 26 - is a valid object ok 27 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x /= $y; ok 28 - is a valid object ok 29 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("2"); $x /= $y; ok 30 - is a valid object ok 31 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x |= $y; ok 32 - is a valid object ok 33 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x &= $y; ok 34 - is a valid object ok 35 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x ^= $y; ok 36 - is a valid object ok 37 - $x = Math::BigInt->new("NaNlog"); $y = Math::BigInt->new("2"); $x->blog($y); ok 38 - is a valid object ok 39 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("NaNlog"); $x->blog($y); ok 40 - is a valid object ok 41 - $x = Math::BigInt->new("NaNlog1"); $y = Math::BigInt->new("NaNlog"); $x->blog($y); ok 42 - is a valid object ok 43 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 44 - is a valid object ok 45 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 46 - is a valid object ok 47 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 48 - is a valid object ok 49 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 50 - is a valid object ok 51 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 52 - is a valid object ok 53 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->blog($y); ok 54 - is a valid object ok 55 - $x = Math::BigInt->new("-21"); $y = Math::BigInt->new("4"); $x->blog($y); ok 56 - is a valid object ok 57 - $x = Math::BigInt->new("21"); $y = Math::BigInt->new("-21"); $x->blog($y); ok 58 - is a valid object ok 59 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 60 - is a valid object ok 61 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 62 - is a valid object ok 63 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->blog($y); ok 64 - is a valid object ok 65 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->blog($y); ok 66 - is a valid object ok 67 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 68 - is a valid object ok 69 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 70 - is a valid object ok 71 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 72 - is a valid object ok 73 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->blog($y); ok 74 - is a valid object ok 75 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->blog($y); ok 76 - is a valid object ok 77 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->blog($y); ok 78 - is a valid object ok 79 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 80 - is a valid object ok 81 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 82 - is a valid object ok 83 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 84 - is a valid object ok 85 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->blog($y); ok 86 - is a valid object ok 87 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->blog($y); ok 88 - is a valid object ok 89 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("4"); $x->blog($y); ok 90 - is a valid object ok 91 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 92 - is a valid object ok 93 - $x = Math::BigInt->new("1024"); $y = Math::BigInt->new("2"); $x->blog($y); ok 94 - is a valid object ok 95 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("3"); $x->blog($y); ok 96 - is a valid object ok 97 - $x = Math::BigInt->new("82"); $y = Math::BigInt->new("3"); $x->blog($y); ok 98 - is a valid object ok 99 - $x = Math::BigInt->new("80"); $y = Math::BigInt->new("3"); $x->blog($y); ok 100 - is a valid object ok 101 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("2"); $x->blog($y); ok 102 - is a valid object ok 103 - $x = Math::BigInt->new("15625"); $y = Math::BigInt->new("5"); $x->blog($y); ok 104 - is a valid object ok 105 - $x = Math::BigInt->new("15626"); $y = Math::BigInt->new("5"); $x->blog($y); ok 106 - is a valid object ok 107 - $x = Math::BigInt->new("15624"); $y = Math::BigInt->new("5"); $x->blog($y); ok 108 - is a valid object ok 109 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 110 - is a valid object ok 111 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 112 - is a valid object ok 113 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 114 - is a valid object ok 115 - $x = Math::BigInt->new("1000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 116 - is a valid object ok 117 - $x = Math::BigInt->new("10000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 118 - is a valid object ok 119 - $x = Math::BigInt->new("100000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 120 - is a valid object ok 121 - $x = Math::BigInt->new("8916100448256"); $y = Math::BigInt->new("12"); $x->blog($y); ok 122 - is a valid object ok 123 - $x = Math::BigInt->new("8916100448257"); $y = Math::BigInt->new("12"); $x->blog($y); ok 124 - is a valid object ok 125 - $x = Math::BigInt->new("8916100448255"); $y = Math::BigInt->new("12"); $x->blog($y); ok 126 - is a valid object ok 127 - $x = Math::BigInt->new("2251799813685248"); $y = Math::BigInt->new("8"); $x->blog($y); ok 128 - is a valid object ok 129 - $x = Math::BigInt->new("72057594037927936"); $y = Math::BigInt->new("2"); $x->blog($y); ok 130 - is a valid object ok 131 - $x = Math::BigInt->new("144115188075855872"); $y = Math::BigInt->new("2"); $x->blog($y); ok 132 - is a valid object ok 133 - $x = Math::BigInt->new("288230376151711744"); $y = Math::BigInt->new("2"); $x->blog($y); ok 134 - is a valid object ok 135 - $x = Math::BigInt->new("576460752303423488"); $y = Math::BigInt->new("2"); $x->blog($y); ok 136 - is a valid object ok 137 - $x = Math::BigInt->new("1329227995784915872903807060280344576"); $y = Math::BigInt->new("2"); $x->blog($y); ok 138 - is a valid object ok 139 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->blog($y); ok 140 - is a valid object ok 141 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->blog($y); ok 142 - is a valid object ok 143 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->blog($y); ok 144 - is a valid object ok 145 - $x = Math::BigInt->new("0"); $x->is_negative() || 0; ok 146 - $x = Math::BigInt->new("-1"); $x->is_negative() || 0; ok 147 - $x = Math::BigInt->new("1"); $x->is_negative() || 0; ok 148 - $x = Math::BigInt->new("+inf"); $x->is_negative() || 0; ok 149 - $x = Math::BigInt->new("-inf"); $x->is_negative() || 0; ok 150 - $x = Math::BigInt->new("NaNneg"); $x->is_negative() || 0; ok 151 - $x = Math::BigInt->new("0"); $x->is_positive() || 0; ok 152 - $x = Math::BigInt->new("-1"); $x->is_positive() || 0; ok 153 - $x = Math::BigInt->new("1"); $x->is_positive() || 0; ok 154 - $x = Math::BigInt->new("+inf"); $x->is_positive() || 0; ok 155 - $x = Math::BigInt->new("-inf"); $x->is_positive() || 0; ok 156 - $x = Math::BigInt->new("NaNneg"); $x->is_positive() || 0; ok 157 - $x = Math::BigInt->new("-inf"); $x->is_int() || 0; ok 158 - $x = Math::BigInt->new("+inf"); $x->is_int() || 0; ok 159 - $x = Math::BigInt->new("NaNis_int"); $x->is_int() || 0; ok 160 - $x = Math::BigInt->new("1"); $x->is_int() || 0; ok 161 - $x = Math::BigInt->new("0"); $x->is_int() || 0; ok 162 - $x = Math::BigInt->new("123e12"); $x->is_int() || 0; ok 163 - $x = Math::BigInt->new("abc"); $x->is_odd() || 0; ok 164 - $x = Math::BigInt->new("0"); $x->is_odd() || 0; ok 165 - $x = Math::BigInt->new("1"); $x->is_odd() || 0; ok 166 - $x = Math::BigInt->new("3"); $x->is_odd() || 0; ok 167 - $x = Math::BigInt->new("-1"); $x->is_odd() || 0; ok 168 - $x = Math::BigInt->new("-3"); $x->is_odd() || 0; ok 169 - $x = Math::BigInt->new("10000001"); $x->is_odd() || 0; ok 170 - $x = Math::BigInt->new("10000002"); $x->is_odd() || 0; ok 171 - $x = Math::BigInt->new("2"); $x->is_odd() || 0; ok 172 - $x = Math::BigInt->new("120"); $x->is_odd() || 0; ok 173 - $x = Math::BigInt->new("121"); $x->is_odd() || 0; ok 174 - $x = Math::BigInt->new("abc"); $x->is_even() || 0; ok 175 - $x = Math::BigInt->new("0"); $x->is_even() || 0; ok 176 - $x = Math::BigInt->new("1"); $x->is_even() || 0; ok 177 - $x = Math::BigInt->new("3"); $x->is_even() || 0; ok 178 - $x = Math::BigInt->new("-1"); $x->is_even() || 0; ok 179 - $x = Math::BigInt->new("-3"); $x->is_even() || 0; ok 180 - $x = Math::BigInt->new("10000001"); $x->is_even() || 0; ok 181 - $x = Math::BigInt->new("10000002"); $x->is_even() || 0; ok 182 - $x = Math::BigInt->new("2"); $x->is_even() || 0; ok 183 - $x = Math::BigInt->new("120"); $x->is_even() || 0; ok 184 - $x = Math::BigInt->new("121"); $x->is_even() || 0; ok 185 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-0"); $x->bacmp($y); ok 186 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 187 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 188 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 189 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+2"); $x->bacmp($y); ok 190 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 191 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bacmp($y); ok 192 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bacmp($y); ok 193 - $x = Math::BigInt->new("+987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 194 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 195 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("+4567889"); $x->bacmp($y); ok 196 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 197 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 198 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 199 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 200 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 201 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 202 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 203 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 204 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 205 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 206 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 207 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 208 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 209 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 210 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 211 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 212 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 213 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 214 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 215 - $x = Math::BigInt->bnorm("0e999"); ok 216 - is a valid object ok 217 - $x = Math::BigInt->bnorm("0e-999"); ok 218 - is a valid object ok 219 - $x = Math::BigInt->bnorm("-0e999"); ok 220 - is a valid object ok 221 - $x = Math::BigInt->bnorm("-0e-999"); ok 222 - is a valid object ok 223 - $x = Math::BigInt->bnorm("123"); ok 224 - is a valid object ok 225 - $x = Math::BigInt->bnorm("123.000"); ok 226 - is a valid object ok 227 - $x = Math::BigInt->bnorm("123e0"); ok 228 - is a valid object ok 229 - $x = Math::BigInt->bnorm("123e+0"); ok 230 - is a valid object ok 231 - $x = Math::BigInt->bnorm("123e-0"); ok 232 - is a valid object ok 233 - $x = Math::BigInt->bnorm("123.000e0"); ok 234 - is a valid object ok 235 - $x = Math::BigInt->bnorm("123.000e+0"); ok 236 - is a valid object ok 237 - $x = Math::BigInt->bnorm("123.000e-0"); ok 238 - is a valid object ok 239 - $x = Math::BigInt->bnorm("0babc"); ok 240 - is a valid object ok 241 - $x = Math::BigInt->bnorm("0b123"); ok 242 - is a valid object ok 243 - $x = Math::BigInt->bnorm("0b0"); ok 244 - is a valid object ok 245 - $x = Math::BigInt->bnorm("-0b0"); ok 246 - is a valid object ok 247 - $x = Math::BigInt->bnorm("-0b1"); ok 248 - is a valid object ok 249 - $x = Math::BigInt->bnorm("0b0001"); ok 250 - is a valid object ok 251 - $x = Math::BigInt->bnorm("0b001"); ok 252 - is a valid object ok 253 - $x = Math::BigInt->bnorm("0b011"); ok 254 - is a valid object ok 255 - $x = Math::BigInt->bnorm("0b101"); ok 256 - is a valid object ok 257 - $x = Math::BigInt->bnorm("0b1001"); ok 258 - is a valid object ok 259 - $x = Math::BigInt->bnorm("0b10001"); ok 260 - is a valid object ok 261 - $x = Math::BigInt->bnorm("0b100001"); ok 262 - is a valid object ok 263 - $x = Math::BigInt->bnorm("0b1000001"); ok 264 - is a valid object ok 265 - $x = Math::BigInt->bnorm("0b10000001"); ok 266 - is a valid object ok 267 - $x = Math::BigInt->bnorm("0b100000001"); ok 268 - is a valid object ok 269 - $x = Math::BigInt->bnorm("0b1000000001"); ok 270 - is a valid object ok 271 - $x = Math::BigInt->bnorm("0b10000000001"); ok 272 - is a valid object ok 273 - $x = Math::BigInt->bnorm("0b100000000001"); ok 274 - is a valid object ok 275 - $x = Math::BigInt->bnorm("0b1000000000001"); ok 276 - is a valid object ok 277 - $x = Math::BigInt->bnorm("0b10000000000001"); ok 278 - is a valid object ok 279 - $x = Math::BigInt->bnorm("0b100000000000001"); ok 280 - is a valid object ok 281 - $x = Math::BigInt->bnorm("0b1000000000000001"); ok 282 - is a valid object ok 283 - $x = Math::BigInt->bnorm("0b10000000000000001"); ok 284 - is a valid object ok 285 - $x = Math::BigInt->bnorm("0b100000000000000001"); ok 286 - is a valid object ok 287 - $x = Math::BigInt->bnorm("0b1000000000000000001"); ok 288 - is a valid object ok 289 - $x = Math::BigInt->bnorm("0b10000000000000000001"); ok 290 - is a valid object ok 291 - $x = Math::BigInt->bnorm("0b100000000000000000001"); ok 292 - is a valid object ok 293 - $x = Math::BigInt->bnorm("0b1000000000000000000001"); ok 294 - is a valid object ok 295 - $x = Math::BigInt->bnorm("0b10000000000000000000001"); ok 296 - is a valid object ok 297 - $x = Math::BigInt->bnorm("0b100000000000000000000001"); ok 298 - is a valid object ok 299 - $x = Math::BigInt->bnorm("0b1000000000000000000000001"); ok 300 - is a valid object ok 301 - $x = Math::BigInt->bnorm("0b10000000000000000000000001"); ok 302 - is a valid object ok 303 - $x = Math::BigInt->bnorm("0b100000000000000000000000001"); ok 304 - is a valid object ok 305 - $x = Math::BigInt->bnorm("0b1000000000000000000000000001"); ok 306 - is a valid object ok 307 - $x = Math::BigInt->bnorm("0b10000000000000000000000000001"); ok 308 - is a valid object ok 309 - $x = Math::BigInt->bnorm("0b100000000000000000000000000001"); ok 310 - is a valid object ok 311 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000001"); ok 312 - is a valid object ok 313 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000001"); ok 314 - is a valid object ok 315 - $x = Math::BigInt->bnorm("0b100000000000000000000000000000001"); ok 316 - is a valid object ok 317 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000000001"); ok 318 - is a valid object ok 319 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000000001"); ok 320 - is a valid object ok 321 - $x = Math::BigInt->bnorm("0b__101"); ok 322 - is a valid object ok 323 - $x = Math::BigInt->bnorm("0b1_0_1"); ok 324 - is a valid object ok 325 - $x = Math::BigInt->bnorm("0b0_0_0_1"); ok 326 - is a valid object ok 327 - $x = Math::BigInt->bnorm("-0x0"); ok 328 - is a valid object ok 329 - $x = Math::BigInt->bnorm("0xabcdefgh"); ok 330 - is a valid object ok 331 - $x = Math::BigInt->bnorm("0x1234"); ok 332 - is a valid object ok 333 - $x = Math::BigInt->bnorm("0xabcdef"); ok 334 - is a valid object ok 335 - $x = Math::BigInt->bnorm("-0xABCDEF"); ok 336 - is a valid object ok 337 - $x = Math::BigInt->bnorm("-0x1234"); ok 338 - is a valid object ok 339 - $x = Math::BigInt->bnorm("0x12345678"); ok 340 - is a valid object ok 341 - $x = Math::BigInt->bnorm("0x1_2_3_4_56_78"); ok 342 - is a valid object ok 343 - $x = Math::BigInt->bnorm("0xa_b_c_d_e_f"); ok 344 - is a valid object ok 345 - $x = Math::BigInt->bnorm("0x__123"); ok 346 - is a valid object ok 347 - $x = Math::BigInt->bnorm("0x9"); ok 348 - is a valid object ok 349 - $x = Math::BigInt->bnorm("0x11"); ok 350 - is a valid object ok 351 - $x = Math::BigInt->bnorm("0x21"); ok 352 - is a valid object ok 353 - $x = Math::BigInt->bnorm("0x41"); ok 354 - is a valid object ok 355 - $x = Math::BigInt->bnorm("0x81"); ok 356 - is a valid object ok 357 - $x = Math::BigInt->bnorm("0x101"); ok 358 - is a valid object ok 359 - $x = Math::BigInt->bnorm("0x201"); ok 360 - is a valid object ok 361 - $x = Math::BigInt->bnorm("0x401"); ok 362 - is a valid object ok 363 - $x = Math::BigInt->bnorm("0x801"); ok 364 - is a valid object ok 365 - $x = Math::BigInt->bnorm("0x1001"); ok 366 - is a valid object ok 367 - $x = Math::BigInt->bnorm("0x2001"); ok 368 - is a valid object ok 369 - $x = Math::BigInt->bnorm("0x4001"); ok 370 - is a valid object ok 371 - $x = Math::BigInt->bnorm("0x8001"); ok 372 - is a valid object ok 373 - $x = Math::BigInt->bnorm("0x10001"); ok 374 - is a valid object ok 375 - $x = Math::BigInt->bnorm("0x20001"); ok 376 - is a valid object ok 377 - $x = Math::BigInt->bnorm("0x40001"); ok 378 - is a valid object ok 379 - $x = Math::BigInt->bnorm("0x80001"); ok 380 - is a valid object ok 381 - $x = Math::BigInt->bnorm("0x100001"); ok 382 - is a valid object ok 383 - $x = Math::BigInt->bnorm("0x200001"); ok 384 - is a valid object ok 385 - $x = Math::BigInt->bnorm("0x400001"); ok 386 - is a valid object ok 387 - $x = Math::BigInt->bnorm("0x800001"); ok 388 - is a valid object ok 389 - $x = Math::BigInt->bnorm("0x1000001"); ok 390 - is a valid object ok 391 - $x = Math::BigInt->bnorm("0x2000001"); ok 392 - is a valid object ok 393 - $x = Math::BigInt->bnorm("0x4000001"); ok 394 - is a valid object ok 395 - $x = Math::BigInt->bnorm("0x8000001"); ok 396 - is a valid object ok 397 - $x = Math::BigInt->bnorm("0x10000001"); ok 398 - is a valid object ok 399 - $x = Math::BigInt->bnorm("0x20000001"); ok 400 - is a valid object ok 401 - $x = Math::BigInt->bnorm("0x40000001"); ok 402 - is a valid object ok 403 - $x = Math::BigInt->bnorm("0x80000001"); ok 404 - is a valid object ok 405 - $x = Math::BigInt->bnorm("0x100000001"); ok 406 - is a valid object ok 407 - $x = Math::BigInt->bnorm("0x200000001"); ok 408 - is a valid object ok 409 - $x = Math::BigInt->bnorm("0x400000001"); ok 410 - is a valid object ok 411 - $x = Math::BigInt->bnorm("0x800000001"); ok 412 - is a valid object ok 413 - $x = Math::BigInt->bnorm("0x2dd59e18a125dbed30a6ab1d93e9c855569f44f75806f0645dc9a2e98b808c3"); ok 414 - is a valid object ok 415 - $x = Math::BigInt->bnorm("inf"); ok 416 - is a valid object ok 417 - $x = Math::BigInt->bnorm("+inf"); ok 418 - is a valid object ok 419 - $x = Math::BigInt->bnorm("-inf"); ok 420 - is a valid object ok 421 - $x = Math::BigInt->bnorm("0inf"); ok 422 - is a valid object ok 423 - $x = Math::BigInt->bnorm(""); ok 424 - is a valid object ok 425 - $x = Math::BigInt->bnorm("abc"); ok 426 - is a valid object ok 427 - $x = Math::BigInt->bnorm(" 1 a"); ok 428 - is a valid object ok 429 - $x = Math::BigInt->bnorm("1bcd2"); ok 430 - is a valid object ok 431 - $x = Math::BigInt->bnorm("11111b"); ok 432 - is a valid object ok 433 - $x = Math::BigInt->bnorm("+1z"); ok 434 - is a valid object ok 435 - $x = Math::BigInt->bnorm("-1z"); ok 436 - is a valid object ok 437 - $x = Math::BigInt->bnorm("_123"); ok 438 - is a valid object ok 439 - $x = Math::BigInt->bnorm("_123_"); ok 440 - is a valid object ok 441 - $x = Math::BigInt->bnorm("123_"); ok 442 - is a valid object ok 443 - $x = Math::BigInt->bnorm("1__23"); ok 444 - is a valid object ok 445 - $x = Math::BigInt->bnorm("1E1__2"); ok 446 - is a valid object ok 447 - $x = Math::BigInt->bnorm("1_E12"); ok 448 - is a valid object ok 449 - $x = Math::BigInt->bnorm("1E_12"); ok 450 - is a valid object ok 451 - $x = Math::BigInt->bnorm("1_E_12"); ok 452 - is a valid object ok 453 - $x = Math::BigInt->bnorm("+_1E12"); ok 454 - is a valid object ok 455 - $x = Math::BigInt->bnorm("+0_1E2"); ok 456 - is a valid object ok 457 - $x = Math::BigInt->bnorm("+0_0_1E2"); ok 458 - is a valid object ok 459 - $x = Math::BigInt->bnorm("-0_0_1E2"); ok 460 - is a valid object ok 461 - $x = Math::BigInt->bnorm("-0_0_1E+0_0_2"); ok 462 - is a valid object ok 463 - $x = Math::BigInt->bnorm("E1"); ok 464 - is a valid object ok 465 - $x = Math::BigInt->bnorm("E23"); ok 466 - is a valid object ok 467 - $x = Math::BigInt->bnorm("1.23E1"); ok 468 - is a valid object ok 469 - $x = Math::BigInt->bnorm("1.23E-1"); ok 470 - is a valid object ok 471 - $x = Math::BigInt->bnorm("1e2e3"); ok 472 - is a valid object ok 473 - $x = Math::BigInt->bnorm("1e2r"); ok 474 - is a valid object ok 475 - $x = Math::BigInt->bnorm("1e2.0"); ok 476 - is a valid object ok 477 - $x = Math::BigInt->bnorm("1.2.2"); ok 478 - is a valid object ok 479 - $x = Math::BigInt->bnorm("1.2.3e1"); ok 480 - is a valid object ok 481 - $x = Math::BigInt->bnorm("-1.2.3"); ok 482 - is a valid object ok 483 - $x = Math::BigInt->bnorm("-1.2.3e-4"); ok 484 - is a valid object ok 485 - $x = Math::BigInt->bnorm("1.2e3.4"); ok 486 - is a valid object ok 487 - $x = Math::BigInt->bnorm("1.2e-3.4"); ok 488 - is a valid object ok 489 - $x = Math::BigInt->bnorm("1.2.3.4"); ok 490 - is a valid object ok 491 - $x = Math::BigInt->bnorm("1.2.t"); ok 492 - is a valid object ok 493 - $x = Math::BigInt->bnorm("1..2"); ok 494 - is a valid object ok 495 - $x = Math::BigInt->bnorm("1..2e1"); ok 496 - is a valid object ok 497 - $x = Math::BigInt->bnorm("1..2e1..1"); ok 498 - is a valid object ok 499 - $x = Math::BigInt->bnorm("12e1..1"); ok 500 - is a valid object ok 501 - $x = Math::BigInt->bnorm("..2"); ok 502 - is a valid object ok 503 - $x = Math::BigInt->bnorm(".-2"); ok 504 - is a valid object ok 505 - $x = Math::BigInt->bnorm("012"); ok 506 - is a valid object ok 507 - $x = Math::BigInt->bnorm("0123"); ok 508 - is a valid object ok 509 - $x = Math::BigInt->bnorm("01234"); ok 510 - is a valid object ok 511 - $x = Math::BigInt->bnorm("012345"); ok 512 - is a valid object ok 513 - $x = Math::BigInt->bnorm("0123456"); ok 514 - is a valid object ok 515 - $x = Math::BigInt->bnorm("01234567"); ok 516 - is a valid object ok 517 - $x = Math::BigInt->bnorm("012345678"); ok 518 - is a valid object ok 519 - $x = Math::BigInt->bnorm("0123456789"); ok 520 - is a valid object ok 521 - $x = Math::BigInt->bnorm("01234567891"); ok 522 - is a valid object ok 523 - $x = Math::BigInt->bnorm("012345678912"); ok 524 - is a valid object ok 525 - $x = Math::BigInt->bnorm("0123456789123"); ok 526 - is a valid object ok 527 - $x = Math::BigInt->bnorm("01234567891234"); ok 528 - is a valid object ok 529 - $x = Math::BigInt->bnorm("0e0"); ok 530 - is a valid object ok 531 - $x = Math::BigInt->bnorm("+0e0"); ok 532 - is a valid object ok 533 - $x = Math::BigInt->bnorm("+0e+0"); ok 534 - is a valid object ok 535 - $x = Math::BigInt->bnorm("-0e+0"); ok 536 - is a valid object ok 537 - $x = Math::BigInt->bnorm("0e-0"); ok 538 - is a valid object ok 539 - $x = Math::BigInt->bnorm("-0e-0"); ok 540 - is a valid object ok 541 - $x = Math::BigInt->bnorm("+0e-0"); ok 542 - is a valid object ok 543 - $x = Math::BigInt->bnorm("000"); ok 544 - is a valid object ok 545 - $x = Math::BigInt->bnorm("00e2"); ok 546 - is a valid object ok 547 - $x = Math::BigInt->bnorm("00e02"); ok 548 - is a valid object ok 549 - $x = Math::BigInt->bnorm("000e002"); ok 550 - is a valid object ok 551 - $x = Math::BigInt->bnorm("000e1230"); ok 552 - is a valid object ok 553 - $x = Math::BigInt->bnorm("00e-3"); ok 554 - is a valid object ok 555 - $x = Math::BigInt->bnorm("00e+3"); ok 556 - is a valid object ok 557 - $x = Math::BigInt->bnorm("00e-03"); ok 558 - is a valid object ok 559 - $x = Math::BigInt->bnorm("00e+03"); ok 560 - is a valid object ok 561 - $x = Math::BigInt->bnorm("-000"); ok 562 - is a valid object ok 563 - $x = Math::BigInt->bnorm("-00e2"); ok 564 - is a valid object ok 565 - $x = Math::BigInt->bnorm("-00e02"); ok 566 - is a valid object ok 567 - $x = Math::BigInt->bnorm("-000e002"); ok 568 - is a valid object ok 569 - $x = Math::BigInt->bnorm("-000e1230"); ok 570 - is a valid object ok 571 - $x = Math::BigInt->bnorm("-00e-3"); ok 572 - is a valid object ok 573 - $x = Math::BigInt->bnorm("-00e+3"); ok 574 - is a valid object ok 575 - $x = Math::BigInt->bnorm("-00e-03"); ok 576 - is a valid object ok 577 - $x = Math::BigInt->bnorm("-00e+03"); ok 578 - is a valid object ok 579 - $x = Math::BigInt->bnorm("0"); ok 580 - is a valid object ok 581 - $x = Math::BigInt->bnorm("+0"); ok 582 - is a valid object ok 583 - $x = Math::BigInt->bnorm("+00"); ok 584 - is a valid object ok 585 - $x = Math::BigInt->bnorm("+000"); ok 586 - is a valid object ok 587 - $x = Math::BigInt->bnorm("000000000000000000"); ok 588 - is a valid object ok 589 - $x = Math::BigInt->bnorm("-0"); ok 590 - is a valid object ok 591 - $x = Math::BigInt->bnorm("-0000"); ok 592 - is a valid object ok 593 - $x = Math::BigInt->bnorm("+1"); ok 594 - is a valid object ok 595 - $x = Math::BigInt->bnorm("+01"); ok 596 - is a valid object ok 597 - $x = Math::BigInt->bnorm("+001"); ok 598 - is a valid object ok 599 - $x = Math::BigInt->bnorm("+00000100000"); ok 600 - is a valid object ok 601 - $x = Math::BigInt->bnorm("123456789"); ok 602 - is a valid object ok 603 - $x = Math::BigInt->bnorm("-1"); ok 604 - is a valid object ok 605 - $x = Math::BigInt->bnorm("-01"); ok 606 - is a valid object ok 607 - $x = Math::BigInt->bnorm("-001"); ok 608 - is a valid object ok 609 - $x = Math::BigInt->bnorm("-123456789"); ok 610 - is a valid object ok 611 - $x = Math::BigInt->bnorm("-00000100000"); ok 612 - is a valid object ok 613 - $x = Math::BigInt->bnorm("1_2_3"); ok 614 - is a valid object ok 615 - $x = Math::BigInt->bnorm("10000000000E-1_0"); ok 616 - is a valid object ok 617 - $x = Math::BigInt->bnorm("1E2"); ok 618 - is a valid object ok 619 - $x = Math::BigInt->bnorm("1E1"); ok 620 - is a valid object ok 621 - $x = Math::BigInt->bnorm("1E0"); ok 622 - is a valid object ok 623 - $x = Math::BigInt->bnorm("1.23E2"); ok 624 - is a valid object ok 625 - $x = Math::BigInt->bnorm("100E-1"); ok 626 - is a valid object ok 627 - $x = Math::BigInt->bnorm("1.E3"); ok 628 - is a valid object ok 629 - $x = Math::BigInt->bnorm("1.01E2"); ok 630 - is a valid object ok 631 - $x = Math::BigInt->bnorm("1010E-1"); ok 632 - is a valid object ok 633 - $x = Math::BigInt->bnorm("-1010E0"); ok 634 - is a valid object ok 635 - $x = Math::BigInt->bnorm("-1010E1"); ok 636 - is a valid object ok 637 - $x = Math::BigInt->bnorm("1234.00"); ok 638 - is a valid object ok 639 - $x = Math::BigInt->bnorm("-1010E-2"); ok 640 - is a valid object ok 641 - $x = Math::BigInt->bnorm("-1.01E+1"); ok 642 - is a valid object ok 643 - $x = Math::BigInt->bnorm("-1.01E-1"); ok 644 - is a valid object ok 645 - $x = Math::BigInt->bnorm("1E-999999"); ok 646 - is a valid object ok 647 - $x = Math::BigInt->bnorm("0.5"); ok 648 - is a valid object ok 649 - $x = Math::BigInt->new("1"); $x->bnan(); ok 650 - is a valid object ok 651 - $x = Math::BigInt->new("2"); $x->bnan(); ok 652 - is a valid object ok 653 - $x = Math::BigInt->new("abc"); $x->bnan(); ok 654 - is a valid object ok 655 - $x = Math::BigInt->new("2"); $x->bone("+"); ok 656 - is a valid object ok 657 - $x = Math::BigInt->new("2"); $x->bone("-"); ok 658 - is a valid object ok 659 - $x = Math::BigInt->new("boneNaN"); $x->bone("-"); ok 660 - is a valid object ok 661 - $x = Math::BigInt->new("boneNaN"); $x->bone("+"); ok 662 - is a valid object ok 663 - $x = Math::BigInt->new("2"); $x->bone("abc"); ok 664 - is a valid object ok 665 - $x = Math::BigInt->new("3"); $x->bone(""); ok 666 - is a valid object ok 667 - $x = Math::BigInt->new("1"); $x->binf("+"); ok 668 - is a valid object ok 669 - $x = Math::BigInt->new("2"); $x->binf("-"); ok 670 - is a valid object ok 671 - $x = Math::BigInt->new("3"); $x->binf("abc"); ok 672 - is a valid object ok 673 - $x = Math::BigInt->new("123"); $x->is_nan() || 0; ok 674 - $x = Math::BigInt->new("abc"); $x->is_nan() || 0; ok 675 - $x = Math::BigInt->new("NaN"); $x->is_nan() || 0; ok 676 - $x = Math::BigInt->new("-123"); $x->is_nan() || 0; ok 677 - $x = Math::BigInt->new("+inf"); $x->is_inf(""); ok 678 - $x = Math::BigInt->new("-inf"); $x->is_inf(""); ok 679 - $x = Math::BigInt->new("abc"); $x->is_inf(""); ok 680 - $x = Math::BigInt->new("1"); $x->is_inf(""); ok 681 - $x = Math::BigInt->new("NaN"); $x->is_inf(""); ok 682 - $x = Math::BigInt->new("-1"); $x->is_inf(""); ok 683 - $x = Math::BigInt->new("+inf"); $x->is_inf("-"); ok 684 - $x = Math::BigInt->new("+inf"); $x->is_inf("+"); ok 685 - $x = Math::BigInt->new("-inf"); $x->is_inf("-"); ok 686 - $x = Math::BigInt->new("-inf"); $x->is_inf("+"); ok 687 - $x = Math::BigInt->new("-inf"); $x->is_inf("-inf"); ok 688 - $x = Math::BigInt->new("-inf"); $x->is_inf("+inf"); ok 689 - $x = Math::BigInt->new("+inf"); $x->is_inf("-inf"); ok 690 - $x = Math::BigInt->new("+inf"); $x->is_inf("+inf"); ok 691 - $x = Math::BigInt->new("+iNfInItY"); $x->is_inf(""); ok 692 - $x = Math::BigInt->new("-InFiNiTy"); $x->is_inf(""); ok 693 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x << $y; ok 694 - is a valid object ok 695 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+2"); $x << $y; ok 696 - is a valid object ok 697 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+32"); $x << $y; ok 698 - is a valid object ok 699 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+48"); $x << $y; ok 700 - is a valid object ok 701 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("-2"); $x << $y; ok 702 - is a valid object ok 703 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("4"); $x->blsft($y, 10); ok 704 - is a valid object ok 705 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 706 - is a valid object ok 707 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 708 - is a valid object ok 709 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 710 - is a valid object ok 711 - $x = Math::BigInt->new("+12"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 712 - is a valid object ok 713 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->blsft($y, 10); ok 714 - is a valid object ok 715 - $x = Math::BigInt->new("1234567890123"); $y = Math::BigInt->new("12"); $x->blsft($y, 10); ok 716 - is a valid object ok 717 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 718 - is a valid object ok 719 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 720 - is a valid object ok 721 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 722 - is a valid object ok 723 - $x = Math::BigInt->new("-102533203"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 724 - is a valid object ok 725 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x >> $y; ok 726 - is a valid object ok 727 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x >> $y; ok 728 - is a valid object ok 729 - $x = Math::BigInt->new("+4294967296"); $y = Math::BigInt->new("+32"); $x >> $y; ok 730 - is a valid object ok 731 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+48"); $x >> $y; ok 732 - is a valid object ok 733 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-2"); $x >> $y; ok 734 - is a valid object ok 735 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 736 - is a valid object ok 737 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 738 - is a valid object ok 739 - $x = Math::BigInt->new("+200"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 740 - is a valid object ok 741 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("3"); $x->brsft($y, 10); ok 742 - is a valid object ok 743 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 744 - is a valid object ok 745 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->brsft($y, 10); ok 746 - is a valid object ok 747 - $x = Math::BigInt->new("310000"); $y = Math::BigInt->new("4"); $x->brsft($y, 10); ok 748 - is a valid object ok 749 - $x = Math::BigInt->new("12300000"); $y = Math::BigInt->new("5"); $x->brsft($y, 10); ok 750 - is a valid object ok 751 - $x = Math::BigInt->new("1230000000000"); $y = Math::BigInt->new("10"); $x->brsft($y, 10); ok 752 - is a valid object ok 753 - $x = Math::BigInt->new("09876123456789067890"); $y = Math::BigInt->new("12"); $x->brsft($y, 10); ok 754 - is a valid object ok 755 - $x = Math::BigInt->new("1234561234567890123"); $y = Math::BigInt->new("13"); $x->brsft($y, 10); ok 756 - is a valid object ok 757 - $x = Math::BigInt->new("820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 758 - is a valid object ok 759 - $x = Math::BigInt->new("-15"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 760 - is a valid object ok 761 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 762 - is a valid object ok 763 - $x = Math::BigInt->new("-13"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 764 - is a valid object ok 765 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 766 - is a valid object ok 767 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 768 - is a valid object ok 769 - $x = Math::BigInt->new("-10"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 770 - is a valid object ok 771 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 772 - is a valid object ok 773 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 774 - is a valid object ok 775 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 776 - is a valid object ok 777 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 778 - is a valid object ok 779 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 780 - is a valid object ok 781 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 782 - is a valid object ok 783 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 784 - is a valid object ok 785 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 786 - is a valid object ok 787 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 788 - is a valid object ok 789 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("2"); $x->brsft($y, 2); ok 790 - is a valid object ok 791 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 792 - is a valid object ok 793 - $x = Math::BigInt->new("-820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 794 - is a valid object ok 795 - $x = Math::BigInt->new("-205066405"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 796 - is a valid object ok 797 - $x = Math::BigInt->new("+inf"); $x->bsstr(); ok 798 - $x = Math::BigInt->new("-inf"); $x->bsstr(); ok 799 - $x = Math::BigInt->new("1e+34"); $x->bsstr(); ok 800 - $x = Math::BigInt->new("123.456E3"); $x->bsstr(); ok 801 - $x = Math::BigInt->new("100"); $x->bsstr(); ok 802 - $x = Math::BigInt->new("bsstrabc"); $x->bsstr(); ok 803 - $x = Math::BigInt->new("-5"); $x->bsstr(); ok 804 - $x = Math::BigInt->new("-100"); $x->bsstr(); ok 805 - $x = Math::BigInt->new("5"); $x->numify(); ok 806 - $x = Math::BigInt->new("-5"); $x->numify(); ok 807 - $x = Math::BigInt->new("100"); $x->numify(); ok 808 - $x = Math::BigInt->new("-100"); $x->numify(); ok 809 - $x = Math::BigInt->new("bnegNaN"); $x->bneg(); ok 810 - is a valid object ok 811 - $x = Math::BigInt->new("+inf"); $x->bneg(); ok 812 - is a valid object ok 813 - $x = Math::BigInt->new("-inf"); $x->bneg(); ok 814 - is a valid object ok 815 - $x = Math::BigInt->new("abd"); $x->bneg(); ok 816 - is a valid object ok 817 - $x = Math::BigInt->new("0"); $x->bneg(); ok 818 - is a valid object ok 819 - $x = Math::BigInt->new("1"); $x->bneg(); ok 820 - is a valid object ok 821 - $x = Math::BigInt->new("-1"); $x->bneg(); ok 822 - is a valid object ok 823 - $x = Math::BigInt->new("+123456789"); $x->bneg(); ok 824 - is a valid object ok 825 - $x = Math::BigInt->new("-123456789"); $x->bneg(); ok 826 - is a valid object ok 827 - $x = Math::BigInt->new("babsNaN"); $x->babs(); ok 828 - is a valid object ok 829 - $x = Math::BigInt->new("+inf"); $x->babs(); ok 830 - is a valid object ok 831 - $x = Math::BigInt->new("-inf"); $x->babs(); ok 832 - is a valid object ok 833 - $x = Math::BigInt->new("0"); $x->babs(); ok 834 - is a valid object ok 835 - $x = Math::BigInt->new("1"); $x->babs(); ok 836 - is a valid object ok 837 - $x = Math::BigInt->new("-1"); $x->babs(); ok 838 - is a valid object ok 839 - $x = Math::BigInt->new("+123456789"); $x->babs(); ok 840 - is a valid object ok 841 - $x = Math::BigInt->new("-123456789"); $x->babs(); ok 842 - is a valid object ok 843 - $x = Math::BigInt->new("NaN"); $x->bsgn(); ok 844 - is a valid object ok 845 - $x = Math::BigInt->new("+inf"); $x->bsgn(); ok 846 - is a valid object ok 847 - $x = Math::BigInt->new("-inf"); $x->bsgn(); ok 848 - is a valid object ok 849 - $x = Math::BigInt->new("0"); $x->bsgn(); ok 850 - is a valid object ok 851 - $x = Math::BigInt->new("+123456789"); $x->bsgn(); ok 852 - is a valid object ok 853 - $x = Math::BigInt->new("-123456789"); $x->bsgn(); ok 854 - is a valid object ok 855 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 856 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 857 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 858 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 859 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 860 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 861 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 862 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 863 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 864 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 865 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 866 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 867 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 868 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("12"); $x->bcmp($y); ok 869 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 870 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 871 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-12"); $x->bcmp($y); ok 872 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 873 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("124"); $x->bcmp($y); ok 874 - $x = Math::BigInt->new("124"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 875 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-124"); $x->bcmp($y); ok 876 - $x = Math::BigInt->new("-124"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 877 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("5"); $x->bcmp($y); ok 878 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->bcmp($y); ok 879 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bcmp($y); ok 880 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("123456789"); $x->bcmp($y); ok 881 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 882 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 883 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 884 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 885 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 886 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 887 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 888 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 889 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 890 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 891 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 892 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 893 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 894 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 895 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 896 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 897 - $x = Math::BigInt->new("abc"); $x->binc(); ok 898 - is a valid object ok 899 - $x = Math::BigInt->new("+inf"); $x->binc(); ok 900 - is a valid object ok 901 - $x = Math::BigInt->new("-inf"); $x->binc(); ok 902 - is a valid object ok 903 - $x = Math::BigInt->new("+0"); $x->binc(); ok 904 - is a valid object ok 905 - $x = Math::BigInt->new("+1"); $x->binc(); ok 906 - is a valid object ok 907 - $x = Math::BigInt->new("-1"); $x->binc(); ok 908 - is a valid object ok 909 - $x = Math::BigInt->new("abc"); $x->bdec(); ok 910 - is a valid object ok 911 - $x = Math::BigInt->new("+inf"); $x->bdec(); ok 912 - is a valid object ok 913 - $x = Math::BigInt->new("-inf"); $x->bdec(); ok 914 - is a valid object ok 915 - $x = Math::BigInt->new("+0"); $x->bdec(); ok 916 - is a valid object ok 917 - $x = Math::BigInt->new("+1"); $x->bdec(); ok 918 - is a valid object ok 919 - $x = Math::BigInt->new("-1"); $x->bdec(); ok 920 - is a valid object ok 921 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->badd($y); ok 922 - is a valid object ok 923 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x->badd($y); ok 924 - is a valid object ok 925 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->badd($y); ok 926 - is a valid object ok 927 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->badd($y); ok 928 - is a valid object ok 929 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 930 - is a valid object ok 931 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 932 - is a valid object ok 933 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->badd($y); ok 934 - is a valid object ok 935 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 936 - is a valid object ok 937 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 938 - is a valid object ok 939 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("baddNaN"); $x->badd($y); ok 940 - is a valid object ok 941 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("baddNaN"); $x->badd($y); ok 942 - is a valid object ok 943 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->badd($y); ok 944 - is a valid object ok 945 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->badd($y); ok 946 - is a valid object ok 947 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->badd($y); ok 948 - is a valid object ok 949 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->badd($y); ok 950 - is a valid object ok 951 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->badd($y); ok 952 - is a valid object ok 953 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 954 - is a valid object ok 955 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 956 - is a valid object ok 957 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 958 - is a valid object ok 959 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 960 - is a valid object ok 961 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 962 - is a valid object ok 963 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 964 - is a valid object ok 965 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 966 - is a valid object ok 967 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 968 - is a valid object ok 969 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 970 - is a valid object ok 971 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 972 - is a valid object ok 973 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 974 - is a valid object ok 975 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 976 - is a valid object ok 977 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 978 - is a valid object ok 979 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 980 - is a valid object ok 981 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 982 - is a valid object ok 983 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 984 - is a valid object ok 985 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 986 - is a valid object ok 987 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 988 - is a valid object ok 989 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 990 - is a valid object ok 991 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 992 - is a valid object ok 993 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 994 - is a valid object ok 995 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 996 - is a valid object ok 997 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 998 - is a valid object ok 999 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1000 - is a valid object ok 1001 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1002 - is a valid object ok 1003 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("987654321"); $x->badd($y); ok 1004 - is a valid object ok 1005 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->badd($y); ok 1006 - is a valid object ok 1007 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x->badd($y); ok 1008 - is a valid object ok 1009 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->badd($y); ok 1010 - is a valid object ok 1011 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10001"); $x->badd($y); ok 1012 - is a valid object ok 1013 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100001"); $x->badd($y); ok 1014 - is a valid object ok 1015 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000001"); $x->badd($y); ok 1016 - is a valid object ok 1017 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000001"); $x->badd($y); ok 1018 - is a valid object ok 1019 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000001"); $x->badd($y); ok 1020 - is a valid object ok 1021 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000001"); $x->badd($y); ok 1022 - is a valid object ok 1023 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000001"); $x->badd($y); ok 1024 - is a valid object ok 1025 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000000001"); $x->badd($y); ok 1026 - is a valid object ok 1027 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000000001"); $x->badd($y); ok 1028 - is a valid object ok 1029 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000000001"); $x->badd($y); ok 1030 - is a valid object ok 1031 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10001"); $x->badd($y); ok 1032 - is a valid object ok 1033 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100001"); $x->badd($y); ok 1034 - is a valid object ok 1035 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000001"); $x->badd($y); ok 1036 - is a valid object ok 1037 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000001"); $x->badd($y); ok 1038 - is a valid object ok 1039 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000001"); $x->badd($y); ok 1040 - is a valid object ok 1041 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000001"); $x->badd($y); ok 1042 - is a valid object ok 1043 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000001"); $x->badd($y); ok 1044 - is a valid object ok 1045 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000000001"); $x->badd($y); ok 1046 - is a valid object ok 1047 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000000001"); $x->badd($y); ok 1048 - is a valid object ok 1049 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000000001"); $x->badd($y); ok 1050 - is a valid object ok 1051 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bsub($y); ok 1052 - is a valid object ok 1053 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1054 - is a valid object ok 1055 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->bsub($y); ok 1056 - is a valid object ok 1057 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bsub($y); ok 1058 - is a valid object ok 1059 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bsub($y); ok 1060 - is a valid object ok 1061 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bsub($y); ok 1062 - is a valid object ok 1063 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bsub($y); ok 1064 - is a valid object ok 1065 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1066 - is a valid object ok 1067 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1068 - is a valid object ok 1069 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1070 - is a valid object ok 1071 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1072 - is a valid object ok 1073 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1074 - is a valid object ok 1075 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1076 - is a valid object ok 1077 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1078 - is a valid object ok 1079 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1080 - is a valid object ok 1081 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1082 - is a valid object ok 1083 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1084 - is a valid object ok 1085 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1086 - is a valid object ok 1087 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1088 - is a valid object ok 1089 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1090 - is a valid object ok 1091 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1092 - is a valid object ok 1093 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1094 - is a valid object ok 1095 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1096 - is a valid object ok 1097 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1098 - is a valid object ok 1099 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1100 - is a valid object ok 1101 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1102 - is a valid object ok 1103 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1104 - is a valid object ok 1105 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1106 - is a valid object ok 1107 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1108 - is a valid object ok 1109 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1110 - is a valid object ok 1111 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1112 - is a valid object ok 1113 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1114 - is a valid object ok 1115 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1116 - is a valid object ok 1117 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1118 - is a valid object ok 1119 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1120 - is a valid object ok 1121 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1122 - is a valid object ok 1123 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1124 - is a valid object ok 1125 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("+987654321"); $x->bsub($y); ok 1126 - is a valid object ok 1127 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bsub($y); ok 1128 - is a valid object ok 1129 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x->bsub($y); ok 1130 - is a valid object ok 1131 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bsub($y); ok 1132 - is a valid object ok 1133 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1134 - is a valid object ok 1135 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1136 - is a valid object ok 1137 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1138 - is a valid object ok 1139 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1140 - is a valid object ok 1141 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1142 - is a valid object ok 1143 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1144 - is a valid object ok 1145 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1146 - is a valid object ok 1147 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1148 - is a valid object ok 1149 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1150 - is a valid object ok 1151 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1152 - is a valid object ok 1153 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1154 - is a valid object ok 1155 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1156 - is a valid object ok 1157 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1158 - is a valid object ok 1159 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1160 - is a valid object ok 1161 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1162 - is a valid object ok 1163 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1164 - is a valid object ok 1165 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1166 - is a valid object ok 1167 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1168 - is a valid object ok 1169 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1170 - is a valid object ok 1171 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1172 - is a valid object ok 1173 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1174 - is a valid object ok 1175 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1176 - is a valid object ok 1177 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1178 - is a valid object ok 1179 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("abc"); $x->bmuladd($y, $z); ok 1180 - is a valid object ok 1181 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1182 - is a valid object ok 1183 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1184 - is a valid object ok 1185 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaNmul"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1186 - is a valid object ok 1187 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaNmul"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1188 - is a valid object ok 1189 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1190 - is a valid object ok 1191 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1192 - is a valid object ok 1193 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1194 - is a valid object ok 1195 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1196 - is a valid object ok 1197 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1198 - is a valid object ok 1199 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1200 - is a valid object ok 1201 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1202 - is a valid object ok 1203 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1204 - is a valid object ok 1205 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1206 - is a valid object ok 1207 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1208 - is a valid object ok 1209 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1210 - is a valid object ok 1211 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1212 - is a valid object ok 1213 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1214 - is a valid object ok 1215 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1216 - is a valid object ok 1217 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1218 - is a valid object ok 1219 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1220 - is a valid object ok 1221 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1222 - is a valid object ok 1223 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1224 - is a valid object ok 1225 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1226 - is a valid object ok 1227 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1228 - is a valid object ok 1229 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1230 - is a valid object ok 1231 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1232 - is a valid object ok 1233 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1234 - is a valid object ok 1235 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1236 - is a valid object ok 1237 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1238 - is a valid object ok 1239 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1240 - is a valid object ok 1241 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1242 - is a valid object ok 1243 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1244 - is a valid object ok 1245 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1246 - is a valid object ok 1247 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1248 - is a valid object ok 1249 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1250 - is a valid object ok 1251 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1252 - is a valid object ok 1253 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1254 - is a valid object ok 1255 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1256 - is a valid object ok 1257 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1258 - is a valid object ok 1259 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1260 - is a valid object ok 1261 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1262 - is a valid object ok 1263 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1264 - is a valid object ok 1265 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1266 - is a valid object ok 1267 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1268 - is a valid object ok 1269 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1270 - is a valid object ok 1271 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1272 - is a valid object ok 1273 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1274 - is a valid object ok 1275 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1276 - is a valid object ok 1277 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1278 - is a valid object ok 1279 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1280 - is a valid object ok 1281 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1282 - is a valid object ok 1283 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("5"); $x->bmuladd($y, $z); ok 1284 - is a valid object ok 1285 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("5"); $x->bmuladd($y, $z); ok 1286 - is a valid object ok 1287 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $z = Math::BigInt->new("1234567890"); $x->bmuladd($y, $z); ok 1288 - is a valid object ok 1289 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("12345678901234567890"); $x->bmuladd($y, $z); ok 1290 - is a valid object ok 1291 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmul($y); ok 1292 - is a valid object ok 1293 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1294 - is a valid object ok 1295 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->bmul($y); ok 1296 - is a valid object ok 1297 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1298 - is a valid object ok 1299 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1300 - is a valid object ok 1301 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaNmul"); $x->bmul($y); ok 1302 - is a valid object ok 1303 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaNmul"); $x->bmul($y); ok 1304 - is a valid object ok 1305 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1306 - is a valid object ok 1307 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1308 - is a valid object ok 1309 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1310 - is a valid object ok 1311 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1312 - is a valid object ok 1313 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1314 - is a valid object ok 1315 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1316 - is a valid object ok 1317 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1318 - is a valid object ok 1319 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1320 - is a valid object ok 1321 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1322 - is a valid object ok 1323 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $x->bmul($y); ok 1324 - is a valid object ok 1325 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $x->bmul($y); ok 1326 - is a valid object ok 1327 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1328 - is a valid object ok 1329 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1330 - is a valid object ok 1331 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1332 - is a valid object ok 1333 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1334 - is a valid object ok 1335 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $x->bmul($y); ok 1336 - is a valid object ok 1337 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $x->bmul($y); ok 1338 - is a valid object ok 1339 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $x->bmul($y); ok 1340 - is a valid object ok 1341 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x->bmul($y); ok 1342 - is a valid object ok 1343 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $x->bmul($y); ok 1344 - is a valid object ok 1345 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $x->bmul($y); ok 1346 - is a valid object ok 1347 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $x->bmul($y); ok 1348 - is a valid object ok 1349 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $x->bmul($y); ok 1350 - is a valid object ok 1351 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $x->bmul($y); ok 1352 - is a valid object ok 1353 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1354 - is a valid object ok 1355 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1356 - is a valid object ok 1357 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1358 - is a valid object ok 1359 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1360 - is a valid object ok 1361 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1362 - is a valid object ok 1363 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1364 - is a valid object ok 1365 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1366 - is a valid object ok 1367 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1368 - is a valid object ok 1369 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1370 - is a valid object ok 1371 - $x = Math::BigInt->new("+25"); $y = Math::BigInt->new("+25"); $x->bmul($y); ok 1372 - is a valid object ok 1373 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("+12345"); $x->bmul($y); ok 1374 - is a valid object ok 1375 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+11111"); $x->bmul($y); ok 1376 - is a valid object ok 1377 - $x = Math::BigInt->new("9999"); $y = Math::BigInt->new("10000"); $x->bmul($y); ok 1378 - is a valid object ok 1379 - $x = Math::BigInt->new("99999"); $y = Math::BigInt->new("100000"); $x->bmul($y); ok 1380 - is a valid object ok 1381 - $x = Math::BigInt->new("999999"); $y = Math::BigInt->new("1000000"); $x->bmul($y); ok 1382 - is a valid object ok 1383 - $x = Math::BigInt->new("9999999"); $y = Math::BigInt->new("10000000"); $x->bmul($y); ok 1384 - is a valid object ok 1385 - $x = Math::BigInt->new("99999999"); $y = Math::BigInt->new("100000000"); $x->bmul($y); ok 1386 - is a valid object ok 1387 - $x = Math::BigInt->new("999999999"); $y = Math::BigInt->new("1000000000"); $x->bmul($y); ok 1388 - is a valid object ok 1389 - $x = Math::BigInt->new("9999999999"); $y = Math::BigInt->new("10000000000"); $x->bmul($y); ok 1390 - is a valid object ok 1391 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("100000000000"); $x->bmul($y); ok 1392 - is a valid object ok 1393 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("1000000000000"); $x->bmul($y); ok 1394 - is a valid object ok 1395 - $x = Math::BigInt->new("9999999999999"); $y = Math::BigInt->new("10000000000000"); $x->bmul($y); ok 1396 - is a valid object ok 1397 - $x = Math::BigInt->new("99999999999999"); $y = Math::BigInt->new("100000000000000"); $x->bmul($y); ok 1398 - is a valid object ok 1399 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("1000000000000000"); $x->bmul($y); ok 1400 - is a valid object ok 1401 - $x = Math::BigInt->new("9999999999999999"); $y = Math::BigInt->new("10000000000000000"); $x->bmul($y); ok 1402 - is a valid object ok 1403 - $x = Math::BigInt->new("99999999999999999"); $y = Math::BigInt->new("100000000000000000"); $x->bmul($y); ok 1404 - is a valid object ok 1405 - $x = Math::BigInt->new("999999999999999999"); $y = Math::BigInt->new("1000000000000000000"); $x->bmul($y); ok 1406 - is a valid object ok 1407 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $x->bmul($y); ok 1408 - is a valid object ok 1409 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1410 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1411 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1412 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1413 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join (",", $x->bdiv($y)); ok 1414 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1415 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1416 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1417 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1418 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1419 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1420 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1421 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1422 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1423 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1424 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join (",", $x->bdiv($y)); ok 1425 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1426 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1427 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join (",", $x->bdiv($y)); ok 1428 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1429 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1430 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1431 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1432 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1433 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1434 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1435 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1436 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1437 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1438 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1439 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1440 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1441 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1442 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1443 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1444 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1445 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1446 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1447 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1448 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1449 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1450 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1451 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1452 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1453 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1454 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1455 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1456 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1457 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1458 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1459 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1460 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1461 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1462 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1463 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1464 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); join (",", $x->bdiv($y)); ok 1465 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); join (",", $x->bdiv($y)); ok 1466 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); join (",", $x->bdiv($y)); ok 1467 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); join (",", $x->bdiv($y)); ok 1468 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); join (",", $x->bdiv($y)); ok 1469 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join (",", $x->bdiv($y)); ok 1470 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); join (",", $x->bdiv($y)); ok 1471 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); join (",", $x->bdiv($y)); ok 1472 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); join (",", $x->bdiv($y)); ok 1473 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); join (",", $x->bdiv($y)); ok 1474 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); join (",", $x->bdiv($y)); ok 1475 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); join (",", $x->bdiv($y)); ok 1476 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); join (",", $x->bdiv($y)); ok 1477 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); join (",", $x->bdiv($y)); ok 1478 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); join (",", $x->bdiv($y)); ok 1479 - $x = Math::BigInt->new("1267650600228229401496703205375"); $y = Math::BigInt->new("1267650600228229401496703205376"); join (",", $x->bdiv($y)); ok 1480 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); join (",", $x->bdiv($y)); ok 1481 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); join (",", $x->bdiv($y)); ok 1482 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); join (",", $x->bdiv($y)); ok 1483 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); join (",", $x->bdiv($y)); ok 1484 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); join (",", $x->bdiv($y)); ok 1485 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); join (",", $x->bdiv($y)); ok 1486 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); join (",", $x->bdiv($y)); ok 1487 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); join (",", $x->bdiv($y)); ok 1488 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); join (",", $x->bdiv($y)); ok 1489 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); join (",", $x->bdiv($y)); ok 1490 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1491 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1492 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1493 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1494 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1495 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1496 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1497 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1498 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1499 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); join (",", $x->bdiv($y)); ok 1500 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1501 - is a valid object ok 1502 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1503 - is a valid object ok 1504 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1505 - is a valid object ok 1506 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1507 - is a valid object ok 1508 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1509 - is a valid object ok 1510 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1511 - is a valid object ok 1512 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1513 - is a valid object ok 1514 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1515 - is a valid object ok 1516 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1517 - is a valid object ok 1518 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1519 - is a valid object ok 1520 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1521 - is a valid object ok 1522 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1523 - is a valid object ok 1524 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1525 - is a valid object ok 1526 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1527 - is a valid object ok 1528 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1529 - is a valid object ok 1530 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1531 - is a valid object ok 1532 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1533 - is a valid object ok 1534 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1535 - is a valid object ok 1536 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1537 - is a valid object ok 1538 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1539 - is a valid object ok 1540 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1541 - is a valid object ok 1542 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1543 - is a valid object ok 1544 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("-2"); $x->bdiv($y); ok 1545 - is a valid object ok 1546 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1547 - is a valid object ok 1548 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); $x->bdiv($y); ok 1549 - is a valid object ok 1550 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1551 - is a valid object ok 1552 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1553 - is a valid object ok 1554 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1555 - is a valid object ok 1556 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1557 - is a valid object ok 1558 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1559 - is a valid object ok 1560 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1561 - is a valid object ok 1562 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1563 - is a valid object ok 1564 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1565 - is a valid object ok 1566 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("26"); $x->bdiv($y); ok 1567 - is a valid object ok 1568 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1569 - is a valid object ok 1570 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1571 - is a valid object ok 1572 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1573 - is a valid object ok 1574 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1575 - is a valid object ok 1576 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1577 - is a valid object ok 1578 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1579 - is a valid object ok 1580 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1581 - is a valid object ok 1582 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1583 - is a valid object ok 1584 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1585 - is a valid object ok 1586 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x->bdiv($y); ok 1587 - is a valid object ok 1588 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x->bdiv($y); ok 1589 - is a valid object ok 1590 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x->bdiv($y); ok 1591 - is a valid object ok 1592 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1593 - is a valid object ok 1594 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("+5"); $x->bdiv($y); ok 1595 - is a valid object ok 1596 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("+4"); $x->bdiv($y); ok 1597 - is a valid object ok 1598 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("+8"); $x->bdiv($y); ok 1599 - is a valid object ok 1600 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("+16"); $x->bdiv($y); ok 1601 - is a valid object ok 1602 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1603 - is a valid object ok 1604 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x->bdiv($y); ok 1605 - is a valid object ok 1606 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x->bdiv($y); ok 1607 - is a valid object ok 1608 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x->bdiv($y); ok 1609 - is a valid object ok 1610 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x->bdiv($y); ok 1611 - is a valid object ok 1612 - $x = Math::BigInt->new("+1111088889"); $y = Math::BigInt->new("99999"); $x->bdiv($y); ok 1613 - is a valid object ok 1614 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1615 - is a valid object ok 1616 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1617 - is a valid object ok 1618 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1619 - is a valid object ok 1620 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1621 - is a valid object ok 1622 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1623 - is a valid object ok 1624 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1625 - is a valid object ok 1626 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1627 - is a valid object ok 1628 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1629 - is a valid object ok 1630 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1631 - is a valid object ok 1632 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1633 - is a valid object ok 1634 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1635 - is a valid object ok 1636 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1637 - is a valid object ok 1638 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1639 - is a valid object ok 1640 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1641 - is a valid object ok 1642 - $x = Math::BigInt->new("10000000000000000000000000000000000000000000000000000000000000000000000000000000000"); $y = Math::BigInt->new("10000000375084540248994272022843165711074"); $x->bdiv($y); ok 1643 - is a valid object ok 1644 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); $x->bdiv($y); ok 1645 - is a valid object ok 1646 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); $x->bdiv($y); ok 1647 - is a valid object ok 1648 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); $x->bdiv($y); ok 1649 - is a valid object ok 1650 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); $x->bdiv($y); ok 1651 - is a valid object ok 1652 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); $x->bdiv($y); ok 1653 - is a valid object ok 1654 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); $x->bdiv($y); ok 1655 - is a valid object ok 1656 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); $x->bdiv($y); ok 1657 - is a valid object ok 1658 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); $x->bdiv($y); ok 1659 - is a valid object ok 1660 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); $x->bdiv($y); ok 1661 - is a valid object ok 1662 - $x = Math::BigInt->new("84696969696969696956565656566184292929292929292847474747436308080808080808086765396464646464646465"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1663 - is a valid object ok 1664 - $x = Math::BigInt->new("84696969696969696943434343434871161616161616161452525252486813131313131313143230042929292929292930"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1665 - is a valid object ok 1666 - $x = Math::BigInt->new("84696969696969696969696969697497424242424242424242424242385803030303030303030300750000000000000000"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1667 - is a valid object ok 1668 - $x = Math::BigInt->new("84696969696969696930303030303558030303030303030057575757537318181818181818199694689393939393939395"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1669 - is a valid object ok 1670 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); $x->bdiv($y); ok 1671 - is a valid object ok 1672 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); $x->bdiv($y); ok 1673 - is a valid object ok 1674 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); $x->bdiv($y); ok 1675 - is a valid object ok 1676 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); $x->bdiv($y); ok 1677 - is a valid object ok 1678 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); $x->bdiv($y); ok 1679 - is a valid object ok 1680 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); $x->bdiv($y); ok 1681 - is a valid object ok 1682 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); $x->bdiv($y); ok 1683 - is a valid object ok 1684 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); $x->bdiv($y); ok 1685 - is a valid object ok 1686 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); $x->bdiv($y); ok 1687 - is a valid object ok 1688 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); $x->bdiv($y); ok 1689 - is a valid object ok 1690 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); $x->bdiv($y); ok 1691 - is a valid object ok 1692 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1693 - is a valid object ok 1694 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1695 - is a valid object ok 1696 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1697 - is a valid object ok 1698 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); $x->bdiv($y); ok 1699 - is a valid object ok 1700 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); $x->bdiv($y); ok 1701 - is a valid object ok 1702 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); $x->bdiv($y); ok 1703 - is a valid object ok 1704 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); $x->bdiv($y); ok 1705 - is a valid object ok 1706 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); $x->bdiv($y); ok 1707 - is a valid object ok 1708 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); $x->bdiv($y); ok 1709 - is a valid object ok 1710 - $x = Math::BigInt->new("949418181818187070707070707070707070"); $y = Math::BigInt->new("181818181853535353535353535353535353"); $x->bdiv($y); ok 1711 - is a valid object ok 1712 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1713 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1714 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1715 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1716 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1717 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1718 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1719 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1720 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1721 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1722 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1723 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1724 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1725 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1726 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1727 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1728 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1729 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1730 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1731 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1732 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1733 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1734 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1735 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1736 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1737 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1738 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1739 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1740 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1741 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1742 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1743 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1744 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1745 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1746 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1747 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1748 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1749 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1750 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1751 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1752 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1753 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1754 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1755 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1756 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1757 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1758 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1759 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1760 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1761 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1762 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1763 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1764 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1765 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1766 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1767 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1768 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1769 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1770 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1771 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1772 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1773 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1774 - is a valid object ok 1775 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1776 - is a valid object ok 1777 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1778 - is a valid object ok 1779 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1780 - is a valid object ok 1781 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1782 - is a valid object ok 1783 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1784 - is a valid object ok 1785 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1786 - is a valid object ok 1787 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1788 - is a valid object ok 1789 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1790 - is a valid object ok 1791 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1792 - is a valid object ok 1793 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1794 - is a valid object ok 1795 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1796 - is a valid object ok 1797 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1798 - is a valid object ok 1799 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1800 - is a valid object ok 1801 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1802 - is a valid object ok 1803 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1804 - is a valid object ok 1805 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1806 - is a valid object ok 1807 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1808 - is a valid object ok 1809 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1810 - is a valid object ok 1811 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1812 - is a valid object ok 1813 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1814 - is a valid object ok 1815 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1816 - is a valid object ok 1817 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1818 - is a valid object ok 1819 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1820 - is a valid object ok 1821 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1822 - is a valid object ok 1823 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1824 - is a valid object ok 1825 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1826 - is a valid object ok 1827 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1828 - is a valid object ok 1829 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1830 - is a valid object ok 1831 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1832 - is a valid object ok 1833 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1834 - is a valid object ok 1835 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1836 - is a valid object ok 1837 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1838 - is a valid object ok 1839 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1840 - is a valid object ok 1841 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1842 - is a valid object ok 1843 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1844 - is a valid object ok 1845 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1846 - is a valid object ok 1847 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1848 - is a valid object ok 1849 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1850 - is a valid object ok 1851 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1852 - is a valid object ok 1853 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1854 - is a valid object ok 1855 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1856 - is a valid object ok 1857 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1858 - is a valid object ok 1859 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1860 - is a valid object ok 1861 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1862 - is a valid object ok 1863 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1864 - is a valid object ok 1865 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1866 - is a valid object ok 1867 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1868 - is a valid object ok 1869 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1870 - is a valid object ok 1871 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1872 - is a valid object ok 1873 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1874 - is a valid object ok 1875 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1876 - is a valid object ok 1877 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1878 - is a valid object ok 1879 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1880 - is a valid object ok 1881 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1882 - is a valid object ok 1883 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1884 - is a valid object ok 1885 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1886 - is a valid object ok 1887 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1888 - is a valid object ok 1889 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1890 - is a valid object ok 1891 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1892 - is a valid object ok 1893 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1894 - is a valid object ok 1895 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1896 - is a valid object ok 1897 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1898 - is a valid object ok 1899 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1900 - is a valid object ok 1901 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1902 - is a valid object ok 1903 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1904 - is a valid object ok 1905 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-5"); $x->bmodinv($y); ok 1906 - is a valid object ok 1907 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1908 - is a valid object ok 1909 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5033"); $x->bmodinv($y); ok 1910 - is a valid object ok 1911 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1912 - is a valid object ok 1913 - $x = Math::BigInt->new("-1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1914 - is a valid object ok 1915 - $x = Math::BigInt->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigInt->new("2348249874968739"); $x->bmodinv($y); ok 1916 - is a valid object ok 1917 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1918 - is a valid object ok 1919 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1920 - is a valid object ok 1921 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1922 - is a valid object ok 1923 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1924 - is a valid object ok 1925 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1926 - is a valid object ok 1927 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1928 - is a valid object ok 1929 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1930 - is a valid object ok 1931 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1932 - is a valid object ok 1933 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1934 - is a valid object ok 1935 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1936 - is a valid object ok 1937 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1938 - is a valid object ok 1939 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1940 - is a valid object ok 1941 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1942 - is a valid object ok 1943 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1944 - is a valid object ok 1945 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1946 - is a valid object ok 1947 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1948 - is a valid object ok 1949 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1950 - is a valid object ok 1951 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1952 - is a valid object ok 1953 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1954 - is a valid object ok 1955 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1956 - is a valid object ok 1957 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1958 - is a valid object ok 1959 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1960 - is a valid object ok 1961 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bmodinv($y); ok 1962 - is a valid object ok 1963 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1964 - is a valid object ok 1965 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->bmodinv($y); ok 1966 - is a valid object ok 1967 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1968 - is a valid object ok 1969 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1970 - is a valid object ok 1971 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1972 - is a valid object ok 1973 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1974 - is a valid object ok 1975 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1976 - is a valid object ok 1977 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1978 - is a valid object ok 1979 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1980 - is a valid object ok 1981 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("0"); $x->bmodpow($y, $z); ok 1982 - is a valid object ok 1983 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1984 - is a valid object ok 1985 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1986 - is a valid object ok 1987 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1988 - is a valid object ok 1989 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1990 - is a valid object ok 1991 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1992 - is a valid object ok 1993 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1994 - is a valid object ok 1995 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1996 - is a valid object ok 1997 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1998 - is a valid object ok 1999 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2000 - is a valid object ok 2001 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2002 - is a valid object ok 2003 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2004 - is a valid object ok 2005 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2006 - is a valid object ok 2007 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2008 - is a valid object ok 2009 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2010 - is a valid object ok 2011 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2012 - is a valid object ok 2013 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2014 - is a valid object ok 2015 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2016 - is a valid object ok 2017 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2018 - is a valid object ok 2019 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2020 - is a valid object ok 2021 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2022 - is a valid object ok 2023 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2024 - is a valid object ok 2025 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2026 - is a valid object ok 2027 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2028 - is a valid object ok 2029 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2030 - is a valid object ok 2031 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2032 - is a valid object ok 2033 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2034 - is a valid object ok 2035 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2036 - is a valid object ok 2037 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2044 - is a valid object ok 2045 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2046 - is a valid object ok 2047 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2048 - is a valid object ok 2049 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2050 - is a valid object ok 2051 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2058 - is a valid object ok 2059 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2072 - is a valid object ok 2073 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2086 - is a valid object ok 2087 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2088 - is a valid object ok 2089 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2090 - is a valid object ok 2091 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2092 - is a valid object ok 2093 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2094 - is a valid object ok 2095 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2096 - is a valid object ok 2097 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2098 - is a valid object ok 2099 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2100 - is a valid object ok 2101 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2102 - is a valid object ok 2103 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2104 - is a valid object ok 2105 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2106 - is a valid object ok 2107 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2108 - is a valid object ok 2109 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2110 - is a valid object ok 2111 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2112 - is a valid object ok 2113 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2114 - is a valid object ok 2115 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2116 - is a valid object ok 2117 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2118 - is a valid object ok 2119 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2120 - is a valid object ok 2121 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2122 - is a valid object ok 2123 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2124 - is a valid object ok 2125 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2126 - is a valid object ok 2127 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2128 - is a valid object ok 2129 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2130 - is a valid object ok 2131 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2132 - is a valid object ok 2133 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2134 - is a valid object ok 2135 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2136 - is a valid object ok 2137 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2138 - is a valid object ok 2139 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2140 - is a valid object ok 2141 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2142 - is a valid object ok 2143 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2144 - is a valid object ok 2145 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2146 - is a valid object ok 2147 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2148 - is a valid object ok 2149 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2150 - is a valid object ok 2151 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2152 - is a valid object ok 2153 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2154 - is a valid object ok 2155 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2156 - is a valid object ok 2157 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2158 - is a valid object ok 2159 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2160 - is a valid object ok 2161 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2162 - is a valid object ok 2163 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2164 - is a valid object ok 2165 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2166 - is a valid object ok 2167 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2168 - is a valid object ok 2169 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2170 - is a valid object ok 2171 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2172 - is a valid object ok 2173 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2174 - is a valid object ok 2175 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2176 - is a valid object ok 2177 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2178 - is a valid object ok 2179 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2180 - is a valid object ok 2181 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2182 - is a valid object ok 2183 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2184 - is a valid object ok 2185 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2186 - is a valid object ok 2187 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2188 - is a valid object ok 2189 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2190 - is a valid object ok 2191 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2192 - is a valid object ok 2193 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2194 - is a valid object ok 2195 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2196 - is a valid object ok 2197 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2198 - is a valid object ok 2199 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2200 - is a valid object ok 2201 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2202 - is a valid object ok 2203 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2204 - is a valid object ok 2205 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2206 - is a valid object ok 2207 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2208 - is a valid object ok 2209 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2210 - is a valid object ok 2211 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2212 - is a valid object ok 2213 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2214 - is a valid object ok 2215 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2216 - is a valid object ok 2217 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2218 - is a valid object ok 2219 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2220 - is a valid object ok 2221 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2222 - is a valid object ok 2223 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2224 - is a valid object ok 2225 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2226 - is a valid object ok 2227 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2228 - is a valid object ok 2229 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2230 - is a valid object ok 2231 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2232 - is a valid object ok 2233 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2234 - is a valid object ok 2235 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2236 - is a valid object ok 2237 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2238 - is a valid object ok 2239 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2240 - is a valid object ok 2241 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2242 - is a valid object ok 2243 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2244 - is a valid object ok 2245 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2246 - is a valid object ok 2247 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2248 - is a valid object ok 2249 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2250 - is a valid object ok 2251 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2252 - is a valid object ok 2253 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2254 - is a valid object ok 2255 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2256 - is a valid object ok 2257 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2258 - is a valid object ok 2259 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2260 - is a valid object ok 2261 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2262 - is a valid object ok 2263 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2264 - is a valid object ok 2265 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2266 - is a valid object ok 2267 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2268 - is a valid object ok 2269 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2270 - is a valid object ok 2271 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2272 - is a valid object ok 2273 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2274 - is a valid object ok 2275 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2276 - is a valid object ok 2277 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2278 - is a valid object ok 2279 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2280 - is a valid object ok 2281 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2282 - is a valid object ok 2283 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("16"); $x->bmodpow($y, $z); ok 2284 - is a valid object ok 2285 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("5033"); $x->bmodpow($y, $z); ok 2286 - is a valid object ok 2287 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("7"); $z = Math::BigInt->new("5032"); $x->bmodpow($y, $z); ok 2288 - is a valid object ok 2289 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("8"); $z = Math::BigInt->new("-5"); $x->bmodpow($y, $z); ok 2290 - is a valid object ok 2291 - $x = Math::BigInt->new("1e50"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2292 - is a valid object ok 2293 - $x = Math::BigInt->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigInt->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigInt->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 2294 - is a valid object ok 2295 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2296 - is a valid object ok 2297 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2298 - is a valid object ok 2299 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2300 - is a valid object ok 2301 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x % $y; ok 2302 - is a valid object ok 2303 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x % $y; ok 2304 - is a valid object ok 2305 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x % $y; ok 2306 - is a valid object ok 2307 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2308 - is a valid object ok 2309 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2310 - is a valid object ok 2311 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2312 - is a valid object ok 2313 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2314 - is a valid object ok 2315 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2316 - is a valid object ok 2317 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2318 - is a valid object ok 2319 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2320 - is a valid object ok 2321 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2322 - is a valid object ok 2323 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2324 - is a valid object ok 2325 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2326 - is a valid object ok 2327 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x % $y; ok 2328 - is a valid object ok 2329 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2330 - is a valid object ok 2331 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2332 - is a valid object ok 2333 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2334 - is a valid object ok 2335 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2336 - is a valid object ok 2337 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x % $y; ok 2338 - is a valid object ok 2339 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x % $y; ok 2340 - is a valid object ok 2341 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x % $y; ok 2342 - is a valid object ok 2343 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x % $y; ok 2344 - is a valid object ok 2345 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x % $y; ok 2346 - is a valid object ok 2347 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2348 - is a valid object ok 2349 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2350 - is a valid object ok 2351 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x % $y; ok 2352 - is a valid object ok 2353 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x % $y; ok 2354 - is a valid object ok 2355 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x % $y; ok 2356 - is a valid object ok 2357 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2358 - is a valid object ok 2359 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2360 - is a valid object ok 2361 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2362 - is a valid object ok 2363 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2364 - is a valid object ok 2365 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2366 - is a valid object ok 2367 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2368 - is a valid object ok 2369 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2370 - is a valid object ok 2371 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2372 - is a valid object ok 2373 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2374 - is a valid object ok 2375 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x % $y; ok 2376 - is a valid object ok 2377 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x % $y; ok 2378 - is a valid object ok 2379 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x % $y; ok 2380 - is a valid object ok 2381 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x % $y; ok 2382 - is a valid object ok 2383 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x % $y; ok 2384 - is a valid object ok 2385 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("4"); $x % $y; ok 2386 - is a valid object ok 2387 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("8"); $x % $y; ok 2388 - is a valid object ok 2389 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("16"); $x % $y; ok 2390 - is a valid object ok 2391 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x % $y; ok 2392 - is a valid object ok 2393 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x % $y; ok 2394 - is a valid object ok 2395 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x % $y; ok 2396 - is a valid object ok 2397 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x % $y; ok 2398 - is a valid object ok 2399 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x % $y; ok 2400 - is a valid object ok 2401 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("+5"); $x % $y; ok 2402 - is a valid object ok 2403 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2404 - is a valid object ok 2405 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2406 - is a valid object ok 2407 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x % $y; ok 2408 - is a valid object ok 2409 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x % $y; ok 2410 - is a valid object ok 2411 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x % $y; ok 2412 - is a valid object ok 2413 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x % $y; ok 2414 - is a valid object ok 2415 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x % $y; ok 2416 - is a valid object ok 2417 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x % $y; ok 2418 - is a valid object ok 2419 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x % $y; ok 2420 - is a valid object ok 2421 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x % $y; ok 2422 - is a valid object ok 2423 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); $x % $y; ok 2424 - is a valid object ok 2425 - $x = Math::BigInt->new("100041000510123"); $y = Math::BigInt->new("3"); $x % $y; ok 2426 - is a valid object ok 2427 - $x = Math::BigInt->new("152403346"); $y = Math::BigInt->new("12345"); $x % $y; ok 2428 - is a valid object ok 2429 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x % $y; ok 2430 - is a valid object ok 2431 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("9"); $x % $y; ok 2432 - is a valid object ok 2433 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("9"); $x % $y; ok 2434 - is a valid object ok 2435 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("9"); $x % $y; ok 2436 - is a valid object ok 2437 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("9"); $x % $y; ok 2438 - is a valid object ok 2439 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("9"); $x % $y; ok 2440 - is a valid object ok 2441 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("9"); $x % $y; ok 2442 - is a valid object ok 2443 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("9"); $x % $y; ok 2444 - is a valid object ok 2445 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("9"); $x % $y; ok 2446 - is a valid object ok 2447 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("10"); $x % $y; ok 2448 - is a valid object ok 2449 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("10"); $x % $y; ok 2450 - is a valid object ok 2451 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("10"); $x % $y; ok 2452 - is a valid object ok 2453 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("10"); $x % $y; ok 2454 - is a valid object ok 2455 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("10"); $x % $y; ok 2456 - is a valid object ok 2457 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("10"); $x % $y; ok 2458 - is a valid object ok 2459 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("10"); $x % $y; ok 2460 - is a valid object ok 2461 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("10"); $x % $y; ok 2462 - is a valid object ok 2463 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("113"); $x % $y; ok 2464 - is a valid object ok 2465 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("113"); $x % $y; ok 2466 - is a valid object ok 2467 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("113"); $x % $y; ok 2468 - is a valid object ok 2469 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("113"); $x % $y; ok 2470 - is a valid object ok 2471 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("113"); $x % $y; ok 2472 - is a valid object ok 2473 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("113"); $x % $y; ok 2474 - is a valid object ok 2475 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("113"); $x % $y; ok 2476 - is a valid object ok 2477 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("113"); $x % $y; ok 2478 - is a valid object ok 2479 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x % $y; ok 2480 - is a valid object ok 2481 - $x = Math::BigInt->new("111111111111111111111111111111"); $y = Math::BigInt->new("111111111111111111111111111111"); $x % $y; ok 2482 - is a valid object ok 2483 - $x = Math::BigInt->new("12345678901234567890"); $y = Math::BigInt->new("12345678901234567890"); $x % $y; ok 2484 - is a valid object ok 2485 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("12"); Math::BigInt::bgcd($x, $y); ok 2486 - is a valid object ok 2487 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt::bgcd($x, $y); ok 2488 - is a valid object ok 2489 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); Math::BigInt::bgcd($x, $y); ok 2490 - is a valid object ok 2491 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2492 - is a valid object ok 2493 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); Math::BigInt::bgcd($x, $y); ok 2494 - is a valid object ok 2495 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2496 - is a valid object ok 2497 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); Math::BigInt::bgcd($x, $y); ok 2498 - is a valid object ok 2499 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 2500 - is a valid object ok 2501 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2502 - is a valid object ok 2503 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 2504 - is a valid object ok 2505 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2506 - is a valid object ok 2507 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 2508 - is a valid object ok 2509 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 2510 - is a valid object ok 2511 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 2512 - is a valid object ok 2513 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); Math::BigInt::bgcd($x, $y); ok 2514 - is a valid object ok 2515 - $x = Math::BigInt->new("+3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 2516 - is a valid object ok 2517 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 2518 - is a valid object ok 2519 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-2"); Math::BigInt::bgcd($x, $y); ok 2520 - is a valid object ok 2521 - $x = Math::BigInt->new("-144"); $y = Math::BigInt->new("-60"); Math::BigInt::bgcd($x, $y); ok 2522 - is a valid object ok 2523 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("-60"); Math::BigInt::bgcd($x, $y); ok 2524 - is a valid object ok 2525 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("60"); Math::BigInt::bgcd($x, $y); ok 2526 - is a valid object ok 2527 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("625"); Math::BigInt::bgcd($x, $y); ok 2528 - is a valid object ok 2529 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("81"); Math::BigInt::bgcd($x, $y); ok 2530 - is a valid object ok 2531 - $x = Math::BigInt->new("1034"); $y = Math::BigInt->new("804"); Math::BigInt::bgcd($x, $y); ok 2532 - is a valid object ok 2533 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("56"); Math::BigInt::bgcd($x, $y, $z); ok 2534 - is a valid object ok 2535 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("54"); Math::BigInt::bgcd($x, $y, $z); ok 2536 - is a valid object ok 2537 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 2538 - is a valid object ok 2539 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2540 - is a valid object ok 2541 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 2542 - is a valid object ok 2543 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2544 - is a valid object ok 2545 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 2546 - is a valid object ok 2547 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::blcm($x, $y); ok 2548 - is a valid object ok 2549 - $x = Math::BigInt->new("+27"); $y = Math::BigInt->new("+90"); Math::BigInt::blcm($x, $y); ok 2550 - is a valid object ok 2551 - $x = Math::BigInt->new("+1034"); $y = Math::BigInt->new("+804"); Math::BigInt::blcm($x, $y); ok 2552 - is a valid object ok 2553 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x & $y; ok 2554 - is a valid object ok 2555 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x & $y; ok 2556 - is a valid object ok 2557 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x & $y; ok 2558 - is a valid object ok 2559 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x & $y; ok 2560 - is a valid object ok 2561 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x & $y; ok 2562 - is a valid object ok 2563 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x & $y; ok 2564 - is a valid object ok 2565 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x & $y; ok 2566 - is a valid object ok 2567 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x & $y; ok 2568 - is a valid object ok 2569 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+281474976710656"); $x & $y; ok 2570 - is a valid object ok 2571 - $x = Math::BigInt->new("281474976710656"); $y = Math::BigInt->new("-1"); $x & $y; ok 2572 - is a valid object ok 2573 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x & $y; ok 2574 - is a valid object ok 2575 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x & $y; ok 2576 - is a valid object ok 2577 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x & $y; ok 2578 - is a valid object ok 2579 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("-4"); $x & $y; ok 2580 - is a valid object ok 2581 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x & $y; ok 2582 - is a valid object ok 2583 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x & $y; ok 2584 - is a valid object ok 2585 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x & $y; ok 2586 - is a valid object ok 2587 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x & $y; ok 2588 - is a valid object ok 2589 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x & $y; ok 2590 - is a valid object ok 2591 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x & $y; ok 2592 - is a valid object ok 2593 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x & $y; ok 2594 - is a valid object ok 2595 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x & $y; ok 2596 - is a valid object ok 2597 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x & $y; ok 2598 - is a valid object ok 2599 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x & $y; ok 2600 - is a valid object ok 2601 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x & $y; ok 2602 - is a valid object ok 2603 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x & $y; ok 2604 - is a valid object ok 2605 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x & $y; ok 2606 - is a valid object ok 2607 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x & $y; ok 2608 - is a valid object ok 2609 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x & $y; ok 2610 - is a valid object ok 2611 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x & $y; ok 2612 - is a valid object ok 2613 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x & $y; ok 2614 - is a valid object ok 2615 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x & $y; ok 2616 - is a valid object ok 2617 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x & $y; ok 2618 - is a valid object ok 2619 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0x3F0F0F0F0F0F"); $x & $y; ok 2620 - is a valid object ok 2621 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x | $y; ok 2622 - is a valid object ok 2623 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x | $y; ok 2624 - is a valid object ok 2625 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x | $y; ok 2626 - is a valid object ok 2627 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x | $y; ok 2628 - is a valid object ok 2629 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x | $y; ok 2630 - is a valid object ok 2631 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x | $y; ok 2632 - is a valid object ok 2633 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x | $y; ok 2634 - is a valid object ok 2635 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x | $y; ok 2636 - is a valid object ok 2637 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x | $y; ok 2638 - is a valid object ok 2639 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x | $y; ok 2640 - is a valid object ok 2641 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x | $y; ok 2642 - is a valid object ok 2643 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x | $y; ok 2644 - is a valid object ok 2645 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x | $y; ok 2646 - is a valid object ok 2647 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("-1"); $x | $y; ok 2648 - is a valid object ok 2649 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x | $y; ok 2650 - is a valid object ok 2651 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x | $y; ok 2652 - is a valid object ok 2653 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x | $y; ok 2654 - is a valid object ok 2655 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x | $y; ok 2656 - is a valid object ok 2657 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2658 - is a valid object ok 2659 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2660 - is a valid object ok 2661 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2662 - is a valid object ok 2663 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2664 - is a valid object ok 2665 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2666 - is a valid object ok 2667 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2668 - is a valid object ok 2669 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2670 - is a valid object ok 2671 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2672 - is a valid object ok 2673 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2674 - is a valid object ok 2675 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2676 - is a valid object ok 2677 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2678 - is a valid object ok 2679 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2680 - is a valid object ok 2681 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2682 - is a valid object ok 2683 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2684 - is a valid object ok 2685 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2686 - is a valid object ok 2687 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x | $y; ok 2688 - is a valid object ok 2689 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2690 - is a valid object ok 2691 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2692 - is a valid object ok 2693 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2694 - is a valid object ok 2695 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x | $y; ok 2696 - is a valid object ok 2697 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2698 - is a valid object ok 2699 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2700 - is a valid object ok 2701 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x | $y; ok 2702 - is a valid object ok 2703 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2704 - is a valid object ok 2705 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2706 - is a valid object ok 2707 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x | $y; ok 2708 - is a valid object ok 2709 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2710 - is a valid object ok 2711 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2712 - is a valid object ok 2713 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x | $y; ok 2714 - is a valid object ok 2715 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2716 - is a valid object ok 2717 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2718 - is a valid object ok 2719 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2720 - is a valid object ok 2721 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2722 - is a valid object ok 2723 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2724 - is a valid object ok 2725 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ^ $y; ok 2726 - is a valid object ok 2727 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x ^ $y; ok 2728 - is a valid object ok 2729 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2730 - is a valid object ok 2731 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x ^ $y; ok 2732 - is a valid object ok 2733 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x ^ $y; ok 2734 - is a valid object ok 2735 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2736 - is a valid object ok 2737 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ^ $y; ok 2738 - is a valid object ok 2739 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x ^ $y; ok 2740 - is a valid object ok 2741 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x ^ $y; ok 2742 - is a valid object ok 2743 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x ^ $y; ok 2744 - is a valid object ok 2745 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2746 - is a valid object ok 2747 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2748 - is a valid object ok 2749 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2750 - is a valid object ok 2751 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x ^ $y; ok 2752 - is a valid object ok 2753 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x ^ $y; ok 2754 - is a valid object ok 2755 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x ^ $y; ok 2756 - is a valid object ok 2757 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2758 - is a valid object ok 2759 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2760 - is a valid object ok 2761 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2762 - is a valid object ok 2763 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2764 - is a valid object ok 2765 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2766 - is a valid object ok 2767 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2768 - is a valid object ok 2769 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2770 - is a valid object ok 2771 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2772 - is a valid object ok 2773 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2774 - is a valid object ok 2775 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2776 - is a valid object ok 2777 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2778 - is a valid object ok 2779 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2780 - is a valid object ok 2781 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2782 - is a valid object ok 2783 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2784 - is a valid object ok 2785 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2786 - is a valid object ok 2787 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x ^ $y; ok 2788 - is a valid object ok 2789 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2790 - is a valid object ok 2791 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2792 - is a valid object ok 2793 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2794 - is a valid object ok 2795 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x ^ $y; ok 2796 - is a valid object ok 2797 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2798 - is a valid object ok 2799 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2800 - is a valid object ok 2801 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x ^ $y; ok 2802 - is a valid object ok 2803 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2804 - is a valid object ok 2805 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2806 - is a valid object ok 2807 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x ^ $y; ok 2808 - is a valid object ok 2809 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2810 - is a valid object ok 2811 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2812 - is a valid object ok 2813 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 2814 - is a valid object ok 2815 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2816 - is a valid object ok 2817 - $x = Math::BigInt->new("abc"); $x->bnot(); ok 2818 - is a valid object ok 2819 - $x = Math::BigInt->new("+0"); $x->bnot(); ok 2820 - is a valid object ok 2821 - $x = Math::BigInt->new("+8"); $x->bnot(); ok 2822 - is a valid object ok 2823 - $x = Math::BigInt->new("+281474976710656"); $x->bnot(); ok 2824 - is a valid object ok 2825 - $x = Math::BigInt->new("-1"); $x->bnot(); ok 2826 - is a valid object ok 2827 - $x = Math::BigInt->new("-2"); $x->bnot(); ok 2828 - is a valid object ok 2829 - $x = Math::BigInt->new("-12"); $x->bnot(); ok 2830 - is a valid object ok 2831 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2832 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2833 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2834 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2835 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2836 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2837 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2838 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2839 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2840 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2841 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2842 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2843 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("3"); $x->digit($y); ok 2844 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); $x->digit($y); ok 2845 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); $x->digit($y); ok 2846 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2847 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2848 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2849 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2850 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2851 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2852 - $x = Math::BigInt->new("abc"); $x = $x->mantissa()->bstr(); ok 2853 - $x = Math::BigInt->new("1e4"); $x = $x->mantissa()->bstr(); ok 2854 - $x = Math::BigInt->new("2e0"); $x = $x->mantissa()->bstr(); ok 2855 - $x = Math::BigInt->new("123"); $x = $x->mantissa()->bstr(); ok 2856 - $x = Math::BigInt->new("-1"); $x = $x->mantissa()->bstr(); ok 2857 - $x = Math::BigInt->new("-2"); $x = $x->mantissa()->bstr(); ok 2858 - $x = Math::BigInt->new("+inf"); $x = $x->mantissa()->bstr(); ok 2859 - $x = Math::BigInt->new("-inf"); $x = $x->mantissa()->bstr(); ok 2860 - $x = Math::BigInt->new("abc"); $x = $x->exponent()->bstr(); ok 2861 - $x = Math::BigInt->new("1e4"); $x = $x->exponent()->bstr(); ok 2862 - $x = Math::BigInt->new("2e0"); $x = $x->exponent()->bstr(); ok 2863 - $x = Math::BigInt->new("123"); $x = $x->exponent()->bstr(); ok 2864 - $x = Math::BigInt->new("-1"); $x = $x->exponent()->bstr(); ok 2865 - $x = Math::BigInt->new("-2"); $x = $x->exponent()->bstr(); ok 2866 - $x = Math::BigInt->new("0"); $x = $x->exponent()->bstr(); ok 2867 - $x = Math::BigInt->new("+inf"); $x = $x->exponent()->bstr(); ok 2868 - $x = Math::BigInt->new("-inf"); $x = $x->exponent()->bstr(); ok 2869 - $x = Math::BigInt->new("abc"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2870 - $x = Math::BigInt->new("1e4"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2871 - $x = Math::BigInt->new("2e0"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2872 - $x = Math::BigInt->new("123"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2873 - $x = Math::BigInt->new("-1"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2874 - $x = Math::BigInt->new("-2"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2875 - $x = Math::BigInt->new("0"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2876 - $x = Math::BigInt->new("+inf"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2877 - $x = Math::BigInt->new("-inf"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2878 - $x = Math::BigInt->new("-1"); $x->bfac(); ok 2879 - is a valid object ok 2880 - $x = Math::BigInt->new("NaNfac"); $x->bfac(); ok 2881 - is a valid object ok 2882 - $x = Math::BigInt->new("+inf"); $x->bfac(); ok 2883 - is a valid object ok 2884 - $x = Math::BigInt->new("-inf"); $x->bfac(); ok 2885 - is a valid object ok 2886 - $x = Math::BigInt->new("0"); $x->bfac(); ok 2887 - is a valid object ok 2888 - $x = Math::BigInt->new("1"); $x->bfac(); ok 2889 - is a valid object ok 2890 - $x = Math::BigInt->new("2"); $x->bfac(); ok 2891 - is a valid object ok 2892 - $x = Math::BigInt->new("3"); $x->bfac(); ok 2893 - is a valid object ok 2894 - $x = Math::BigInt->new("4"); $x->bfac(); ok 2895 - is a valid object ok 2896 - $x = Math::BigInt->new("5"); $x->bfac(); ok 2897 - is a valid object ok 2898 - $x = Math::BigInt->new("6"); $x->bfac(); ok 2899 - is a valid object ok 2900 - $x = Math::BigInt->new("7"); $x->bfac(); ok 2901 - is a valid object ok 2902 - $x = Math::BigInt->new("8"); $x->bfac(); ok 2903 - is a valid object ok 2904 - $x = Math::BigInt->new("9"); $x->bfac(); ok 2905 - is a valid object ok 2906 - $x = Math::BigInt->new("10"); $x->bfac(); ok 2907 - is a valid object ok 2908 - $x = Math::BigInt->new("11"); $x->bfac(); ok 2909 - is a valid object ok 2910 - $x = Math::BigInt->new("12"); $x->bfac(); ok 2911 - is a valid object ok 2912 - $x = Math::BigInt->new("20"); $x->bfac(); ok 2913 - is a valid object ok 2914 - $x = Math::BigInt->new("22"); $x->bfac(); ok 2915 - is a valid object ok 2916 - $x = Math::BigInt->new("69"); $x->bfac(); ok 2917 - is a valid object ok 2918 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("12"); $x ** $y; ok 2919 - is a valid object ok 2920 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("abc"); $x ** $y; ok 2921 - is a valid object ok 2922 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x ** $y; ok 2923 - is a valid object ok 2924 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x ** $y; ok 2925 - is a valid object ok 2926 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x ** $y; ok 2927 - is a valid object ok 2928 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2929 - is a valid object ok 2930 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2931 - is a valid object ok 2932 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x ** $y; ok 2933 - is a valid object ok 2934 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x ** $y; ok 2935 - is a valid object ok 2936 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ** $y; ok 2937 - is a valid object ok 2938 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x ** $y; ok 2939 - is a valid object ok 2940 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2941 - is a valid object ok 2942 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2943 - is a valid object ok 2944 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 2945 - is a valid object ok 2946 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x ** $y; ok 2947 - is a valid object ok 2948 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x ** $y; ok 2949 - is a valid object ok 2950 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2951 - is a valid object ok 2952 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2953 - is a valid object ok 2954 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x ** $y; ok 2955 - is a valid object ok 2956 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 2957 - is a valid object ok 2958 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 2959 - is a valid object ok 2960 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 2961 - is a valid object ok 2962 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 2963 - is a valid object ok 2964 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2965 - is a valid object ok 2966 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2967 - is a valid object ok 2968 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2969 - is a valid object ok 2970 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 2971 - is a valid object ok 2972 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 2973 - is a valid object ok 2974 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 2975 - is a valid object ok 2976 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500013"); $x ** $y; ok 2977 - is a valid object ok 2978 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 2979 - is a valid object ok 2980 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 2981 - is a valid object ok 2982 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x ** $y; ok 2983 - is a valid object ok 2984 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x ** $y; ok 2985 - is a valid object ok 2986 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $x ** $y; ok 2987 - is a valid object ok 2988 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2989 - is a valid object ok 2990 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2991 - is a valid object ok 2992 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2993 - is a valid object ok 2994 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x ** $y; ok 2995 - is a valid object ok 2996 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2997 - is a valid object ok 2998 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 2999 - is a valid object ok 3000 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3001 - is a valid object ok 3002 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3003 - is a valid object ok 3004 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3005 - is a valid object ok 3006 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3007 - is a valid object ok 3008 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3009 - is a valid object ok 3010 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3011 - is a valid object ok 3012 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3013 - is a valid object ok 3014 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3015 - is a valid object ok 3016 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3017 - is a valid object ok 3018 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3019 - is a valid object ok 3020 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x ** $y; ok 3021 - is a valid object ok 3022 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x ** $y; ok 3023 - is a valid object ok 3024 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x ** $y; ok 3025 - is a valid object ok 3026 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x ** $y; ok 3027 - is a valid object ok 3028 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x ** $y; ok 3029 - is a valid object ok 3030 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x ** $y; ok 3031 - is a valid object ok 3032 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x ** $y; ok 3033 - is a valid object ok 3034 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3035 - is a valid object ok 3036 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3037 - is a valid object ok 3038 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3039 - is a valid object ok 3040 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-4"); $x ** $y; ok 3041 - is a valid object ok 3042 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x ** $y; ok 3043 - is a valid object ok 3044 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x ** $y; ok 3045 - is a valid object ok 3046 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x ** $y; ok 3047 - is a valid object ok 3048 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x ** $y; ok 3049 - is a valid object ok 3050 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("6"); $x ** $y; ok 3051 - is a valid object ok 3052 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("7"); $x ** $y; ok 3053 - is a valid object ok 3054 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("8"); $x ** $y; ok 3055 - is a valid object ok 3056 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("9"); $x ** $y; ok 3057 - is a valid object ok 3058 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("20"); $x ** $y; ok 3059 - is a valid object ok 3060 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x ** $y; ok 3061 - is a valid object ok 3062 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 3063 - is a valid object ok 3064 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 3065 - is a valid object ok 3066 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 3067 - is a valid object ok 3068 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 3069 - is a valid object ok 3070 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("2"); $x ** $y; ok 3071 - is a valid object ok 3072 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 3073 - is a valid object ok 3074 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x ** $y; ok 3075 - is a valid object ok 3076 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x ** $y; ok 3077 - is a valid object ok 3078 - $x = Math::BigInt->new("100"); $x->length(); ok 3079 - $x = Math::BigInt->new("10"); $x->length(); ok 3080 - $x = Math::BigInt->new("1"); $x->length(); ok 3081 - $x = Math::BigInt->new("0"); $x->length(); ok 3082 - $x = Math::BigInt->new("12345"); $x->length(); ok 3083 - $x = Math::BigInt->new("10000000000000000"); $x->length(); ok 3084 - $x = Math::BigInt->new("-123"); $x->length(); ok 3085 - $x = Math::BigInt->new("215960156869840440586892398248"); $x->length(); ok 3086 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3087 - is a valid object ok 3088 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3089 - is a valid object ok 3090 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3091 - is a valid object ok 3092 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3093 - is a valid object ok 3094 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3095 - is a valid object ok 3096 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3097 - is a valid object ok 3098 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3099 - is a valid object ok 3100 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3101 - is a valid object ok 3102 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3103 - is a valid object ok 3104 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3105 - is a valid object ok 3106 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3107 - is a valid object ok 3108 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3109 - is a valid object ok 3110 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3111 - is a valid object ok 3112 - $x = Math::BigInt->new("15241"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3113 - is a valid object ok 3114 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3115 - is a valid object ok 3116 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3117 - is a valid object ok 3118 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3119 - is a valid object ok 3120 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3121 - is a valid object ok 3122 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3123 - is a valid object ok 3124 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3125 - is a valid object ok 3126 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3127 - is a valid object ok 3128 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3129 - is a valid object ok 3130 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3131 - is a valid object ok 3132 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3133 - is a valid object ok 3134 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3135 - is a valid object ok 3136 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); $x->broot($y); ok 3137 - is a valid object ok 3138 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3139 - is a valid object ok 3140 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3141 - is a valid object ok 3142 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3143 - is a valid object ok 3144 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3145 - is a valid object ok 3146 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3147 - is a valid object ok 3148 - $x = Math::BigInt->new("-123.45"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3149 - is a valid object ok 3150 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3151 - is a valid object ok 3152 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 3153 - is a valid object ok 3154 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 3155 - is a valid object ok 3156 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 3157 - is a valid object ok 3158 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 3159 - is a valid object ok 3160 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 3161 - is a valid object ok 3162 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 3163 - is a valid object ok 3164 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3165 - is a valid object ok 3166 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3167 - is a valid object ok 3168 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3169 - is a valid object ok 3170 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("8"); $x->broot($y); ok 3171 - is a valid object ok 3172 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("16"); $x->broot($y); ok 3173 - is a valid object ok 3174 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("32"); $x->broot($y); ok 3175 - is a valid object ok 3176 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("64"); $x->broot($y); ok 3177 - is a valid object ok 3178 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("128"); $x->broot($y); ok 3179 - is a valid object ok 3180 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $y = Math::BigInt->new("15"); $x->broot($y); ok 3181 - is a valid object ok 3182 - $x = Math::BigInt->new("145"); $x->bsqrt(); ok 3183 - is a valid object ok 3184 - $x = Math::BigInt->new("144"); $x->bsqrt(); ok 3185 - is a valid object ok 3186 - $x = Math::BigInt->new("143"); $x->bsqrt(); ok 3187 - is a valid object ok 3188 - $x = Math::BigInt->new("16"); $x->bsqrt(); ok 3189 - is a valid object ok 3190 - $x = Math::BigInt->new("170"); $x->bsqrt(); ok 3191 - is a valid object ok 3192 - $x = Math::BigInt->new("169"); $x->bsqrt(); ok 3193 - is a valid object ok 3194 - $x = Math::BigInt->new("168"); $x->bsqrt(); ok 3195 - is a valid object ok 3196 - $x = Math::BigInt->new("4"); $x->bsqrt(); ok 3197 - is a valid object ok 3198 - $x = Math::BigInt->new("3"); $x->bsqrt(); ok 3199 - is a valid object ok 3200 - $x = Math::BigInt->new("2"); $x->bsqrt(); ok 3201 - is a valid object ok 3202 - $x = Math::BigInt->new("9"); $x->bsqrt(); ok 3203 - is a valid object ok 3204 - $x = Math::BigInt->new("12"); $x->bsqrt(); ok 3205 - is a valid object ok 3206 - $x = Math::BigInt->new("256"); $x->bsqrt(); ok 3207 - is a valid object ok 3208 - $x = Math::BigInt->new("100000000"); $x->bsqrt(); ok 3209 - is a valid object ok 3210 - $x = Math::BigInt->new("4000000000000"); $x->bsqrt(); ok 3211 - is a valid object ok 3212 - $x = Math::BigInt->new("152399026"); $x->bsqrt(); ok 3213 - is a valid object ok 3214 - $x = Math::BigInt->new("152399025"); $x->bsqrt(); ok 3215 - is a valid object ok 3216 - $x = Math::BigInt->new("152399024"); $x->bsqrt(); ok 3217 - is a valid object ok 3218 - $x = Math::BigInt->new("18446744073709551616"); $x->bsqrt(); ok 3219 - is a valid object ok 3220 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $x->bsqrt(); ok 3221 - is a valid object ok 3222 - $x = Math::BigInt->new("1"); $x->bsqrt(); ok 3223 - is a valid object ok 3224 - $x = Math::BigInt->new("0"); $x->bsqrt(); ok 3225 - is a valid object ok 3226 - $x = Math::BigInt->new("-2"); $x->bsqrt(); ok 3227 - is a valid object ok 3228 - $x = Math::BigInt->new("-123"); $x->bsqrt(); ok 3229 - is a valid object ok 3230 - $x = Math::BigInt->new("Nan"); $x->bsqrt(); ok 3231 - is a valid object ok 3232 - $x = Math::BigInt->new("+inf"); $x->bsqrt(); ok 3233 - is a valid object ok 3234 - $x = Math::BigInt->new("-inf"); $x->bsqrt(); ok 3235 - is a valid object ok 3236 - $x = Math::BigInt->new("NaN"); $x->bexp(); ok 3237 - is a valid object ok 3238 - $x = Math::BigInt->new("inf"); $x->bexp(); ok 3239 - is a valid object ok 3240 - $x = Math::BigInt->new("1"); $x->bexp(); ok 3241 - is a valid object ok 3242 - $x = Math::BigInt->new("2"); $x->bexp(); ok 3243 - is a valid object ok 3244 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3245 - is a valid object ok 3246 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3247 - is a valid object ok 3248 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3249 - is a valid object ok 3250 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3251 - is a valid object ok 3252 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3253 - is a valid object ok 3254 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3255 - is a valid object ok 3256 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3257 - is a valid object ok 3258 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3259 - is a valid object ok 3260 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->batan2($y); ok 3261 - is a valid object ok 3262 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3263 - is a valid object ok 3264 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3265 - is a valid object ok 3266 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3267 - is a valid object ok 3268 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3269 - is a valid object ok 3270 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3271 - is a valid object ok 3272 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3273 - is a valid object ok 3274 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3275 - is a valid object ok 3276 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3277 - is a valid object ok 3278 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->batan2($y); ok 3279 - is a valid object ok 3280 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3281 - is a valid object ok 3282 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3283 - is a valid object ok 3284 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3285 - is a valid object ok 3286 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3287 - is a valid object ok 3288 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3289 - is a valid object ok 3290 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3291 - is a valid object ok 3292 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3293 - is a valid object ok 3294 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3295 - is a valid object ok 3296 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3297 - is a valid object ok 3298 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3299 - is a valid object ok 3300 - $x = Math::BigInt->new("77"); Math::BigInt->bpi($x); ok 3301 - is a valid object ok 3302 - $x = Math::BigInt->new("+0"); Math::BigInt->bpi($x); ok 3303 - is a valid object ok 3304 - $x = Math::BigInt->new("11"); Math::BigInt->bpi($x); ok 3305 - is a valid object ok 3306 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("10"); $x->bnok($y); ok 3307 - is a valid object ok 3308 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3309 - is a valid object ok 3310 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3311 - is a valid object ok 3312 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3313 - is a valid object ok 3314 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3315 - is a valid object ok 3316 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bnok($y); ok 3317 - is a valid object ok 3318 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3319 - is a valid object ok 3320 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->bnok($y); ok 3321 - is a valid object ok 3322 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3323 - is a valid object ok 3324 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("6"); $x->bnok($y); ok 3325 - is a valid object ok 3326 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("90"); $x->bnok($y); ok 3327 - is a valid object ok 3328 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("95"); $x->bnok($y); ok 3329 - is a valid object ok 3330 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3331 - is a valid object ok 3332 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3333 - is a valid object ok 3334 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3335 - is a valid object ok 3336 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3337 - is a valid object ok 3338 - $x = Math::BigInt->new("NaNbround"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3339 - is a valid object ok 3340 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3341 - is a valid object ok 3342 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3343 - is a valid object ok 3344 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3345 - is a valid object ok 3346 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("2"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3347 - is a valid object ok 3348 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3349 - is a valid object ok 3350 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3351 - is a valid object ok 3352 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3353 - is a valid object ok 3354 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3355 - is a valid object ok 3356 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3357 - is a valid object ok 3358 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3359 - is a valid object ok 3360 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3361 - is a valid object ok 3362 - $x = Math::BigInt->new("+101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3363 - is a valid object ok 3364 - $x = Math::BigInt->new("-101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3365 - is a valid object ok 3366 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3367 - is a valid object ok 3368 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3369 - is a valid object ok 3370 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3371 - is a valid object ok 3372 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3373 - is a valid object ok 3374 - $x = Math::BigInt->new("+201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3375 - is a valid object ok 3376 - $x = Math::BigInt->new("-201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3377 - is a valid object ok 3378 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3379 - is a valid object ok 3380 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3381 - is a valid object ok 3382 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3383 - is a valid object ok 3384 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3385 - is a valid object ok 3386 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3387 - is a valid object ok 3388 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3389 - is a valid object ok 3390 - $x = Math::BigInt->new("+301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3391 - is a valid object ok 3392 - $x = Math::BigInt->new("-301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3393 - is a valid object ok 3394 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3395 - is a valid object ok 3396 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3397 - is a valid object ok 3398 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3399 - is a valid object ok 3400 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3401 - is a valid object ok 3402 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3403 - is a valid object ok 3404 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3405 - is a valid object ok 3406 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3407 - is a valid object ok 3408 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3409 - is a valid object ok 3410 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3411 - is a valid object ok 3412 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3413 - is a valid object ok 3414 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3415 - is a valid object ok 3416 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3417 - is a valid object ok 3418 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3419 - is a valid object ok 3420 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3421 - is a valid object ok 3422 - $x = Math::BigInt->new("+501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3423 - is a valid object ok 3424 - $x = Math::BigInt->new("-501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3425 - is a valid object ok 3426 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3427 - is a valid object ok 3428 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3429 - is a valid object ok 3430 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3431 - is a valid object ok 3432 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3433 - is a valid object ok 3434 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3435 - is a valid object ok 3436 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3437 - is a valid object ok 3438 - $x = Math::BigInt->new("+601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3439 - is a valid object ok 3440 - $x = Math::BigInt->new("-601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3441 - is a valid object ok 3442 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("7"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3443 - is a valid object ok 3444 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3445 - is a valid object ok 3446 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3447 - is a valid object ok 3448 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3449 - is a valid object ok 3450 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3451 - is a valid object ok 3452 - $x = Math::BigInt->new("+60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3453 - is a valid object ok 3454 - $x = Math::BigInt->new("+60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3455 - is a valid object ok 3456 - $x = Math::BigInt->new("+60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3457 - is a valid object ok 3458 - $x = Math::BigInt->new("+60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3459 - is a valid object ok 3460 - $x = Math::BigInt->new("+60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3461 - is a valid object ok 3462 - $x = Math::BigInt->new("+60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3463 - is a valid object ok 3464 - $x = Math::BigInt->new("+60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3465 - is a valid object ok 3466 - $x = Math::BigInt->new("+60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3467 - is a valid object ok 3468 - $x = Math::BigInt->new("+60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3469 - is a valid object ok 3470 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3471 - is a valid object ok 3472 - $x = Math::BigInt->new("-60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3473 - is a valid object ok 3474 - $x = Math::BigInt->new("-60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3475 - is a valid object ok 3476 - $x = Math::BigInt->new("-60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3477 - is a valid object ok 3478 - $x = Math::BigInt->new("-60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3479 - is a valid object ok 3480 - $x = Math::BigInt->new("-60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3481 - is a valid object ok 3482 - $x = Math::BigInt->new("-60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3483 - is a valid object ok 3484 - $x = Math::BigInt->new("-60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3485 - is a valid object ok 3486 - $x = Math::BigInt->new("-60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3487 - is a valid object ok 3488 - $x = Math::BigInt->new("-60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3489 - is a valid object ok 3490 - $x = Math::BigInt->new("0"); $x->is_zero() || 0; ok 3491 - $x = Math::BigInt->new("NaNzero"); $x->is_zero() || 0; ok 3492 - $x = Math::BigInt->new("+inf"); $x->is_zero() || 0; ok 3493 - $x = Math::BigInt->new("-inf"); $x->is_zero() || 0; ok 3494 - $x = Math::BigInt->new("123"); $x->is_zero() || 0; ok 3495 - $x = Math::BigInt->new("-1"); $x->is_zero() || 0; ok 3496 - $x = Math::BigInt->new("1"); $x->is_zero() || 0; ok 3497 - $x = Math::BigInt->new("0"); $x->is_one() || 0; ok 3498 - $x = Math::BigInt->new("NaNone"); $x->is_one() || 0; ok 3499 - $x = Math::BigInt->new("+inf"); $x->is_one() || 0; ok 3500 - $x = Math::BigInt->new("-inf"); $x->is_one() || 0; ok 3501 - $x = Math::BigInt->new("1"); $x->is_one() || 0; ok 3502 - $x = Math::BigInt->new("2"); $x->is_one() || 0; ok 3503 - $x = Math::BigInt->new("-1"); $x->is_one() || 0; ok 3504 - $x = Math::BigInt->new("-2"); $x->is_one() || 0; ok 3505 - $x = Math::BigInt->new("0"); $x->bfloor(); ok 3506 - is a valid object ok 3507 - $x = Math::BigInt->new("NaNfloor"); $x->bfloor(); ok 3508 - is a valid object ok 3509 - $x = Math::BigInt->new("+inf"); $x->bfloor(); ok 3510 - is a valid object ok 3511 - $x = Math::BigInt->new("-inf"); $x->bfloor(); ok 3512 - is a valid object ok 3513 - $x = Math::BigInt->new("-1"); $x->bfloor(); ok 3514 - is a valid object ok 3515 - $x = Math::BigInt->new("-2"); $x->bfloor(); ok 3516 - is a valid object ok 3517 - $x = Math::BigInt->new("2"); $x->bfloor(); ok 3518 - is a valid object ok 3519 - $x = Math::BigInt->new("3"); $x->bfloor(); ok 3520 - is a valid object ok 3521 - $x = Math::BigInt->new("abc"); $x->bfloor(); ok 3522 - is a valid object ok 3523 - $x = Math::BigInt->new("NaNceil"); $x->bceil(); ok 3524 - is a valid object ok 3525 - $x = Math::BigInt->new("+inf"); $x->bceil(); ok 3526 - is a valid object ok 3527 - $x = Math::BigInt->new("-inf"); $x->bceil(); ok 3528 - is a valid object ok 3529 - $x = Math::BigInt->new("0"); $x->bceil(); ok 3530 - is a valid object ok 3531 - $x = Math::BigInt->new("-1"); $x->bceil(); ok 3532 - is a valid object ok 3533 - $x = Math::BigInt->new("-2"); $x->bceil(); ok 3534 - is a valid object ok 3535 - $x = Math::BigInt->new("2"); $x->bceil(); ok 3536 - is a valid object ok 3537 - $x = Math::BigInt->new("3"); $x->bceil(); ok 3538 - is a valid object ok 3539 - $x = Math::BigInt->new("abc"); $x->bceil(); ok 3540 - is a valid object ok 3541 - $x = Math::BigInt->new("NaN"); $x->bint(); ok 3542 - is a valid object ok 3543 - $x = Math::BigInt->new("+inf"); $x->bint(); ok 3544 - is a valid object ok 3545 - $x = Math::BigInt->new("-inf"); $x->bint(); ok 3546 - is a valid object ok 3547 - $x = Math::BigInt->new("0"); $x->bint(); ok 3548 - is a valid object ok 3549 - $x = Math::BigInt->new("-1"); $x->bint(); ok 3550 - is a valid object ok 3551 - $x = Math::BigInt->new("-2"); $x->bint(); ok 3552 - is a valid object ok 3553 - $x = Math::BigInt->new("2"); $x->bint(); ok 3554 - is a valid object ok 3555 - $x = Math::BigInt->new("3"); $x->bint(); ok 3556 - is a valid object ok 3557 - $x = Math::BigInt->new("128"); $x->as_hex(); ok 3558 - $x = Math::BigInt->new("-128"); $x->as_hex(); ok 3559 - $x = Math::BigInt->new("0"); $x->as_hex(); ok 3560 - $x = Math::BigInt->new("-0"); $x->as_hex(); ok 3561 - $x = Math::BigInt->new("1"); $x->as_hex(); ok 3562 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_hex(); ok 3563 - $x = Math::BigInt->new("+inf"); $x->as_hex(); ok 3564 - $x = Math::BigInt->new("-inf"); $x->as_hex(); ok 3565 - $x = Math::BigInt->new("NaNas_hex"); $x->as_hex(); ok 3566 - $x = Math::BigInt->new("128"); $x->as_bin(); ok 3567 - $x = Math::BigInt->new("-128"); $x->as_bin(); ok 3568 - $x = Math::BigInt->new("0"); $x->as_bin(); ok 3569 - $x = Math::BigInt->new("-0"); $x->as_bin(); ok 3570 - $x = Math::BigInt->new("1"); $x->as_bin(); ok 3571 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 3572 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_bin(); ok 3573 - $x = Math::BigInt->new("+inf"); $x->as_bin(); ok 3574 - $x = Math::BigInt->new("-inf"); $x->as_bin(); ok 3575 - $x = Math::BigInt->new("NaNas_bin"); $x->as_bin(); ok 3576 - $x = Math::BigInt->new("128"); $x->as_oct(); ok 3577 - $x = Math::BigInt->new("-128"); $x->as_oct(); ok 3578 - $x = Math::BigInt->new("0"); $x->as_oct(); ok 3579 - $x = Math::BigInt->new("-0"); $x->as_oct(); ok 3580 - $x = Math::BigInt->new("1"); $x->as_oct(); ok 3581 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 3582 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_oct(); ok 3583 - $x = Math::BigInt->new("+inf"); $x->as_oct(); ok 3584 - $x = Math::BigInt->new("-inf"); $x->as_oct(); ok 3585 - $x = Math::BigInt->new("NaNas_oct"); $x->as_oct(); ok 3586 - $x = Math::BigInt->new("-1"); $x = log($x); ok 3587 - is a valid object ok 3588 - $x = Math::BigInt->new("0"); $x = log($x); ok 3589 - is a valid object ok 3590 - $x = Math::BigInt->new("1"); $x = log($x); ok 3591 - is a valid object ok 3592 - $x = Math::BigInt->new("2"); $x = log($x); ok 3593 - is a valid object ok 3594 - $x = Math::BigInt->new("3"); $x = log($x); ok 3595 - is a valid object ok 3596 - $x = Math::BigInt->new("123456789"); $x = log($x); ok 3597 - is a valid object ok 3598 - $x = Math::BigInt->new("1234567890987654321"); $x = log($x); ok 3599 - is a valid object ok 3600 - $x = Math::BigInt->new("-inf"); $x = log($x); ok 3601 - is a valid object ok 3602 - $x = Math::BigInt->new("inf"); $x = log($x); ok 3603 - is a valid object ok 3604 - $x = Math::BigInt->new("NaN"); $x = log($x); ok 3605 - is a valid object ok 3606 - $x = Math::BigInt->new("4294967296"); $a = $x->bmul($x); ok 3607 - $x = Math::BigInt->new(10); $a = $x->bpow($x); ok 3608 - $z = $x & $y; $x ok 3609 - $z = $x & $y; $y ok 3610 - $z = $x & $y; $z ok 3611 - $z = $x | $y; $x ok 3612 - $z = $x | $y; $y ok 3613 - $z = $x | $y; $z ok 3614 - $z = $x | $y; $x ok 3615 - $z = $x | $y; $y ok 3616 - $z = $x | $y; $z ok 3617 - $z = $x ^ $y; $x ok 3618 - $z = $x ^ $y; $y ok 3619 - $z = $x ^ $y; $z ok 3620 - $y = -$x; $x ok 3621 - $y = abs($x); $x ok 3622 - $x->copy()->bmodpow($y, $z); $u ok 3623 - $x->copy()->bmodpow($y, $z); $y ok 3624 - $x->copy()->bmodpow($y, $z); $z ok 3625 - $y = -$x; $x ok 3626 - $y = -$x; $y ok 3627 - $y = $x->copy()->bneg(); $x ok 3628 - $y = $x->copy()->bneg(); $y ok 3629 - $x->bmul($y); $x ok 3630 - $x->bmul($y); $y ok 3631 - $x->badd($y); $x ok 3632 - $x->badd($y); $y ok 3633 - $x->bsub($y); $x ok 3634 - $x->bsub($y); $y ok 3635 - $x->bdiv($y); $x ok 3636 - $x->bdiv($y); $y ok 3637 - $x->bmod($y); $x ok 3638 - $x->bmod($y); $y ok 3639 - $x->bmul($y); $x ok 3640 - $x->bmul($y); $y ok 3641 - $x->badd($y); $x ok 3642 - $x->badd($y); $y ok 3643 - $x->bsub($y); $x ok 3644 - $x->bsub($y); $y ok 3645 - $x->bdiv($y); $x ok 3646 - $x->bdiv($y); $y ok 3647 - $x->bmod($y); $x ok 3648 - $x->bmod($y); $y ok 3649 - $x->bmul($y); $x ok 3650 - $x->bmul($y); $y ok 3651 - $x->badd($y); $x ok 3652 - $x->badd($y); $y ok 3653 - $x->bsub($y); $x ok 3654 - $x->bsub($y); $y ok 3655 - $x->bdiv($y); $x ok 3656 - $x->bdiv($y); $y ok 3657 - $x->bmod($y); $x ok 3658 - $x->bmod($y); $y ok 3659 - overloading cmp works ok 3660 - $x = Math::BigInt->new(10); $x = 2 ** $x; $x == 1024; ok 3661 - $x = Math::BigInt->new(10); $x = 2 * $x; $x == 20; ok 3662 - $x = Math::BigInt->new(10); $x = 2 + $x; $x == 12; ok 3663 - $x = Math::BigInt->new(10); $x = 2 - $x; $x == -8; ok 3664 - $x = Math::BigInt->new(10); $x = 20 / $x; $x == 2; ok 3665 - $x = Math::BigInt->new(3); $x = 20 % $x; $x == 2; ok 3666 - $x = Math::BigInt->new(7); $x = 20 & $x; $x == 4; ok 3667 - $x = Math::BigInt->new(7); $x = 0x20 | $x; $x == 0x27; ok 3668 - $x = Math::BigInt->new(7); $x = 0x20 ^ $x; $x == 0x27; ok 3669 - $x = Math::BigInt->badd(4, 5); $x == 9; ok 3670 - $x = Math::BigInt->new(1); $x is true ok 3671 - $x = Math::BigInt->new(0); !$x is false ok 3672 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 3673 - first arg matches /^Math::BigInt/ ok 3674 - second arg is 4 ok 3675 - third arg is 5 ok 3676 - objectify(0, 4, 5) gives Math::BigInt, 4, 5 ok 3677 - first arg matches /^Math::BigInt/ ok 3678 - second arg is 4 ok 3679 - third arg is 5 ok 3680 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 3681 - first arg matches /^Math::BigInt/ ok 3682 - second arg is 4 ok 3683 - third arg is 5 ok 3684 - objectify(2, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 3685 - first arg matches /^Math::BigInt/ ok 3686 - second arg is 4 ok 3687 - second arg is a Math::BigInt object ok 3688 - third arg is 5 ok 3689 - third arg is a Math::BigInt object ok 3690 - fourth arg is 6 ok 3691 - fourth arg is a scalar ok 3692 - fifth arg is 7 ok 3693 - fifth arg is a scalar ok 3694 - objectify(2, Math::BigInt, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 3695 - first arg is Math::BigInt ok 3696 - second arg is 4 ok 3697 - second arg is a Math::BigInt object ok 3698 - third arg is 5 ok 3699 - third arg is a Math::BigInt object ok 3700 - fourth arg is 6 ok 3701 - fourth arg is a scalar ok 3702 - fifth arg is 7 ok 3703 - fifth arg is a scalar ok 3704 - Math::BigInt->new(123)->badd(123) = 246 ok 3705 - Math::BigInt->badd(123, 321) = 444 ok 3706 - Math::BigInt->badd(123, Math::BigInt->new(321)) = 444 ok 3707 - Math::BigInt->new(123)->bsub(122) = 1 ok 3708 - Math::BigInt->bsub(321, 123) = 198 ok 3709 - Math::BigInt->bsub(321, Math::BigInt->new(123)) = 198 ok 3710 - Math::BigInt->new(123)->bmul(123) = 15129 ok 3711 - Math::BigInt->bmul(123, 123) = 15129 ok 3712 - Math::BigInt->bmul(123, Math::BigInt->new(123)) = 15129 ok 3713 - Math::BigInt->new(15129)->bdiv(123) = 123 ok 3714 - Math::BigInt->bdiv(15129, 123) = 123 ok 3715 - Math::BigInt->bdiv(15129, Math::BigInt->new(123)) = 123 ok 3716 - Math::BigInt->new(15131)->bmod(123) = 2 ok 3717 - Math::BigInt->bmod(15131, 123) = 2 ok 3718 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) = 2 ok 3719 - Math::BigInt->new(2)->bpow(16) = 65536 ok 3720 - Math::BigInt->bpow(2, 16) = 65536 ok 3721 - Math::BigInt->bpow(2, Math::BigInt->new(16)) = 65536 ok 3722 - Math::BigInt->new(2**15)->brsft(1) = 2**14 ok 3723 - Math::BigInt->brsft(2**15, 1) = 2**14 ok 3724 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) = 2**14 ok 3725 - Math::BigInt->new(2**13)->blsft(1) = 2**14 ok 3726 - Math::BigInt->blsft(2**13, 1) = 2**14 ok 3727 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) = 2**14 ok 3728 - $x = Math::BigInt->new(1050000000000000); $x->bsstr() = "105e+13" ok 3729 - $x = Math::BigInt->new(1e+129); $x->bsstr() = "1e+129" ok 3730 - Math::BigInt->new("1") = 1 ok 3731 - Math::BigInt->new(" 1") = 1 ok 3732 - Math::BigInt->new("1 ") = 1 ok 3733 - Math::BigInt->new(" 1 ") = 1 ok 3734 - Math::BigInt->new("\n1") = 1 ok 3735 - Math::BigInt->new("1\n") = 1 ok 3736 - Math::BigInt->new("\n1\n") = 1 ok 3737 - Math::BigInt->new(" \n1\n") = 1 ok 3738 - Math::BigInt->new(" \n1 \n") = 1 ok 3739 - Math::BigInt->new(" \n1\n ") = 1 ok 3740 - Math::BigInt->new(" \n1\n1") = 'NaN' ok 3741 - Math::BigInt->new("1 \n1\n1") = 'NaN' ok 3742 - Math::BigInt->new("12") = 12 ok 3743 - Math::BigInt->new(" 12") = 12 ok 3744 - Math::BigInt->new("12 ") = 12 ok 3745 - Math::BigInt->new(" 12 ") = 12 ok 3746 - Math::BigInt->new("\n12") = 12 ok 3747 - Math::BigInt->new("12\n") = 12 ok 3748 - Math::BigInt->new("\n12\n") = 12 ok 3749 - Math::BigInt->new(" \n12\n") = 12 ok 3750 - Math::BigInt->new(" \n12 \n") = 12 ok 3751 - Math::BigInt->new(" \n12\n ") = 12 ok 3752 - Math::BigInt->new(" \n12\n1") = 'NaN' ok 3753 - Math::BigInt->new("1 \n12\n1") = 'NaN' ok 3754 - Math::BigInt->new("123") = 123 ok 3755 - Math::BigInt->new(" 123") = 123 ok 3756 - Math::BigInt->new("123 ") = 123 ok 3757 - Math::BigInt->new(" 123 ") = 123 ok 3758 - Math::BigInt->new("\n123") = 123 ok 3759 - Math::BigInt->new("123\n") = 123 ok 3760 - Math::BigInt->new("\n123\n") = 123 ok 3761 - Math::BigInt->new(" \n123\n") = 123 ok 3762 - Math::BigInt->new(" \n123 \n") = 123 ok 3763 - Math::BigInt->new(" \n123\n ") = 123 ok 3764 - Math::BigInt->new(" \n123\n1") = 'NaN' ok 3765 - Math::BigInt->new("1 \n123\n1") = 'NaN' ok 3766 - Math::BigInt->new("1234") = 1234 ok 3767 - Math::BigInt->new(" 1234") = 1234 ok 3768 - Math::BigInt->new("1234 ") = 1234 ok 3769 - Math::BigInt->new(" 1234 ") = 1234 ok 3770 - Math::BigInt->new("\n1234") = 1234 ok 3771 - Math::BigInt->new("1234\n") = 1234 ok 3772 - Math::BigInt->new("\n1234\n") = 1234 ok 3773 - Math::BigInt->new(" \n1234\n") = 1234 ok 3774 - Math::BigInt->new(" \n1234 \n") = 1234 ok 3775 - Math::BigInt->new(" \n1234\n ") = 1234 ok 3776 - Math::BigInt->new(" \n1234\n1") = 'NaN' ok 3777 - Math::BigInt->new("1 \n1234\n1") = 'NaN' ok 3778 - Math::BigInt->new("12345") = 12345 ok 3779 - Math::BigInt->new(" 12345") = 12345 ok 3780 - Math::BigInt->new("12345 ") = 12345 ok 3781 - Math::BigInt->new(" 12345 ") = 12345 ok 3782 - Math::BigInt->new("\n12345") = 12345 ok 3783 - Math::BigInt->new("12345\n") = 12345 ok 3784 - Math::BigInt->new("\n12345\n") = 12345 ok 3785 - Math::BigInt->new(" \n12345\n") = 12345 ok 3786 - Math::BigInt->new(" \n12345 \n") = 12345 ok 3787 - Math::BigInt->new(" \n12345\n ") = 12345 ok 3788 - Math::BigInt->new(" \n12345\n1") = 'NaN' ok 3789 - Math::BigInt->new("1 \n12345\n1") = 'NaN' ok 3790 - Math::BigInt->new("123456") = 123456 ok 3791 - Math::BigInt->new(" 123456") = 123456 ok 3792 - Math::BigInt->new("123456 ") = 123456 ok 3793 - Math::BigInt->new(" 123456 ") = 123456 ok 3794 - Math::BigInt->new("\n123456") = 123456 ok 3795 - Math::BigInt->new("123456\n") = 123456 ok 3796 - Math::BigInt->new("\n123456\n") = 123456 ok 3797 - Math::BigInt->new(" \n123456\n") = 123456 ok 3798 - Math::BigInt->new(" \n123456 \n") = 123456 ok 3799 - Math::BigInt->new(" \n123456\n ") = 123456 ok 3800 - Math::BigInt->new(" \n123456\n1") = 'NaN' ok 3801 - Math::BigInt->new("1 \n123456\n1") = 'NaN' ok 3802 - Math::BigInt->new("1234567") = 1234567 ok 3803 - Math::BigInt->new(" 1234567") = 1234567 ok 3804 - Math::BigInt->new("1234567 ") = 1234567 ok 3805 - Math::BigInt->new(" 1234567 ") = 1234567 ok 3806 - Math::BigInt->new("\n1234567") = 1234567 ok 3807 - Math::BigInt->new("1234567\n") = 1234567 ok 3808 - Math::BigInt->new("\n1234567\n") = 1234567 ok 3809 - Math::BigInt->new(" \n1234567\n") = 1234567 ok 3810 - Math::BigInt->new(" \n1234567 \n") = 1234567 ok 3811 - Math::BigInt->new(" \n1234567\n ") = 1234567 ok 3812 - Math::BigInt->new(" \n1234567\n1") = 'NaN' ok 3813 - Math::BigInt->new("1 \n1234567\n1") = 'NaN' ok 3814 - Math::BigInt->new("12345678") = 12345678 ok 3815 - Math::BigInt->new(" 12345678") = 12345678 ok 3816 - Math::BigInt->new("12345678 ") = 12345678 ok 3817 - Math::BigInt->new(" 12345678 ") = 12345678 ok 3818 - Math::BigInt->new("\n12345678") = 12345678 ok 3819 - Math::BigInt->new("12345678\n") = 12345678 ok 3820 - Math::BigInt->new("\n12345678\n") = 12345678 ok 3821 - Math::BigInt->new(" \n12345678\n") = 12345678 ok 3822 - Math::BigInt->new(" \n12345678 \n") = 12345678 ok 3823 - Math::BigInt->new(" \n12345678\n ") = 12345678 ok 3824 - Math::BigInt->new(" \n12345678\n1") = 'NaN' ok 3825 - Math::BigInt->new("1 \n12345678\n1") = 'NaN' ok 3826 - Math::BigInt->new("123456789") = 123456789 ok 3827 - Math::BigInt->new(" 123456789") = 123456789 ok 3828 - Math::BigInt->new("123456789 ") = 123456789 ok 3829 - Math::BigInt->new(" 123456789 ") = 123456789 ok 3830 - Math::BigInt->new("\n123456789") = 123456789 ok 3831 - Math::BigInt->new("123456789\n") = 123456789 ok 3832 - Math::BigInt->new("\n123456789\n") = 123456789 ok 3833 - Math::BigInt->new(" \n123456789\n") = 123456789 ok 3834 - Math::BigInt->new(" \n123456789 \n") = 123456789 ok 3835 - Math::BigInt->new(" \n123456789\n ") = 123456789 ok 3836 - Math::BigInt->new(" \n123456789\n1") = 'NaN' ok 3837 - Math::BigInt->new("1 \n123456789\n1") = 'NaN' ok 3838 - Math::BigInt->new("1234567890") = 1234567890 ok 3839 - Math::BigInt->new(" 1234567890") = 1234567890 ok 3840 - Math::BigInt->new("1234567890 ") = 1234567890 ok 3841 - Math::BigInt->new(" 1234567890 ") = 1234567890 ok 3842 - Math::BigInt->new("\n1234567890") = 1234567890 ok 3843 - Math::BigInt->new("1234567890\n") = 1234567890 ok 3844 - Math::BigInt->new("\n1234567890\n") = 1234567890 ok 3845 - Math::BigInt->new(" \n1234567890\n") = 1234567890 ok 3846 - Math::BigInt->new(" \n1234567890 \n") = 1234567890 ok 3847 - Math::BigInt->new(" \n1234567890\n ") = 1234567890 ok 3848 - Math::BigInt->new(" \n1234567890\n1") = 'NaN' ok 3849 - Math::BigInt->new("1 \n1234567890\n1") = 'NaN' ok 3850 - value of ((2^148)+1)/17 ok 3851 - number of digits in ((2^148)+1)/17 ok 3852 - value of 2^127-1 ok 3853 - number of digits in 2^127-1 ok 3854 - number of digits in fraction part of 2^127-1 ok 3855 - number of digits in 1_000_000_000_000 ok 3856 - number of digits in fraction part of 1_000_000_000_000 ok 3857 - 2 <<= 18 with Math::BigInt objects ok 3858 - 2 <<= 18 with Math::BigInt objects ok 3859 - 2 >>= 18 with Math::BigInt objects ok 3860 - 2 >>= 18 with Math::BigInt objects ok 3861 - $x = Math::Foo->new(5); $x = $x - 8; $x = 3 ok 3862 - $x is an object of class "Math::Foo" ok 3863 - $x = Math::Foo->new(5); $x = 8 - $x; $x = -3 ok 3864 - $x is an object of class "Math::Foo" ok 3865 - Math::BigInt->new("+inf") = "inf" ok 3866 # skip no 64 bit integer support ok 3867 # skip no 64 bit integer support ok 3868 # skip no 64 bit integer support ok 3869 # skip no 64 bit integer support ok 3870 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3871 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3872 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3873 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3874 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3875 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3876 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3877 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3878 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3879 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3880 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3881 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3882 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3883 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3884 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3885 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3886 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3887 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3888 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3889 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3890 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3891 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3892 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3893 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3894 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3895 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3896 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3897 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3898 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3899 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3900 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3901 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3902 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3903 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3904 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3905 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3906 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3907 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3908 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3909 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3910 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3911 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3912 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3913 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3914 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3915 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3916 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3917 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3918 # skip skipping tests not intended for the backend Math::BigInt::GMP ok 3919 # skip skipping tests not intended for the backend Math::BigInt::GMP ok t/biglog.t ............... 1..71 ok 1 - GMP loaded ok 2 - blog(2) ok 3 - blog(288) ok 4 - blog(2000) ok 5 - bexp(1) ok 6 - bexp(2) ok 7 - bexp(3) ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 ok 27 ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 ok 38 ok 39 ok 40 ok 41 - blog(100) ok 42 - 2 ** 32 ok 43 - 3 ** 32 ok 44 - 2 ** 65 ok 45 - blog(777**256, 12345678901234) ok 46 - blog(777**777, 777) ok 47 - 14.14213562 ok 48 - 4.472135955 ok 49 - 1.414213562 ok 50 - 0.4472135955 ok 51 - 0.1414213562 ok 52 - 0.7 ok 53 - 0.7000000000 ok 54 - 0.04472135955 ok 55 - 0.01414213562 ok 56 - 0.07 ok 57 - 0.07000000000 ok 58 - 0.001414213562 ok 59 - 0.1449137675 ok 60 - 1.095445115 ok 61 - 1.109053651 ok 62 - 3.507135583 ok 63 - 3.146426545 ok 64 - 3.141500000 ok 65 - 3.1415 ok 66 - 0.5169187652 ok 67 - bexp(1) ok 68 - bexp(2) ok 69 - bexp(12.5) ok 70 - bexp(100) ok 71 - bexp(12.5) to 91 digits ok t/bigroot.t .............. 1..9 ok 1 - GMP loaded ok 2 - Try: Math::BigFloat 2->bpow(120)->broot(8,undef) == 32768 ok 3 - Try: Math::BigInt 2->bpow(120)->broot(8,undef) == 32768 ok 4 - Try: Math::BigFloat 2->bpow(60)->broot(8,undef) == 181.0193359837561662466161566988413540569 ok 5 - Try: Math::BigInt 2->bpow(60)->broot(8,undef) == 181 ok 6 - Try: Math::BigFloat 2->bpow(60)->broot(9,undef) == 101.5936673259647663841091609134277286651 ok 7 - Try: Math::BigInt 2->bpow(60)->broot(9,undef) == 101 ok 8 - Try: Math::BigFloat 2->bpow(60)->broot(17,undef) == 11.54672461623965153271017217302844672562 ok 9 - Try: Math::BigInt 2->bpow(60)->broot(17,undef) == 11 ok t/mbi-from-big-scalar.t .. 1..12 ok 1 - new 9223372036854775805 ok 2 - new -9223372036854775805 ok 3 - new 9223372036854775806 ok 4 - new -9223372036854775806 ok 5 - new 9223372036854775807 ok 6 - new -9223372036854775807 ok 7 - new 9223372036854775808 ok 8 - new -9223372036854775808 ok 9 - new 18446744073709551614 ok 10 - new 18446744073709551615 ok 11 - 10 should be less than maxint ok 12 # skip The following test may hang or cause an exception if incorrect. Set AUTHOR_TESTING to a true value to run this test. ok t/storable.t ............. 1..1 ok 1 ok Thread creation failed: pthread_create returned 12 at t/threads.t line 24. Thread creation failed: pthread_create returned 12 at t/threads.t line 24. Thread creation failed: pthread_create returned 12 at t/threads.t line 24. Can't call method "join" on an undefined value at t/threads.t line 27. # Looks like your test exited with 12 before it could output anything. t/threads.t .............. 1..22 Dubious, test returned 12 (wstat 3072, 0xc00) Failed 22/22 subtests Test Summary Report ------------------- t/threads.t (Wstat: 3072 Tests: 0 Failed: 0) Non-zero exit status: 12 Parse errors: Bad plan. You planned 22 tests but ran 0. Files=12, Tests=6779, 7 wallclock secs ( 0.44 usr 0.88 sys + 3.76 cusr 1.21 csys = 6.29 CPU) Result: FAIL Failed 1/12 test programs. 0/6779 subtests failed. make: *** [test_dynamic] Error 12 PJACKLAM/Math-BigInt-GMP-1.50.tar.gz make test TEST_VERBOSE=1 -- NOT OK //hint// to see the cpan-testers results for installing this module, try: reports PJACKLAM/Math-BigInt-GMP-1.50.tar.gz MITHALDU/Crypt-DH-0.07.tar.gz Has already been unwrapped into directory /home/fly1800/cpanfly-5.18/var/cpan/build/Crypt-DH-0.07-BTlTGp MITHALDU/Crypt-DH-0.07.tar.gz Has already been prepared Running make for M/MI/MITHALDU/Crypt-DH-0.07.tar.gz Warning: Prerequisite 'Math::BigInt::GMP => 1.24' for 'MITHALDU/Crypt-DH-0.07.tar.gz' failed when processing 'PJACKLAM/Math-BigInt-GMP-1.50.tar.gz' with 'make_test => NO'. Continuing, but chances to succeed are limited. >>> make cp lib/Crypt/DH.pm blib/lib/Crypt/DH.pm Manifying 1 pod document MITHALDU/Crypt-DH-0.07.tar.gz make -- OK Running make test >>> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 "/home/fly1800/ap1800-297235/bin/perl-static" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(1, 'inc', 'blib/lib', 'blib/arch')" t/00-compile.t t/01-dh.t t/00-compile.t .. 1..1 ok 1 - use Crypt::DH; ok t/01-dh.t ....... 1..21 ok 1 - any2bigint(scalar) returns a defined value ok 2 - any2bigint(scalar) returns a Math::BigInt ok 3 - any2bigint(scalar) returns the correct value ok 4 - any2bigint(Math::BigInt) returns a defined value ok 5 - any2bigint(Math::BigInt) returns a Math::BigInt ok 6 - any2bigint(Math::BigInt) returns the correct value ok 7 - any2bigint(Math::Pari) returns a defined value ok 8 - any2bigint(Math::Pari) returns a Math::BigInt ok 9 - any2bigint(Math::Pari) returns the correct value ok 10 - Key generation did not modify g ok 11 - Key generation did not modify p ok 12 - Shared secrets match ok 13 - Key generation did not modify g ok 14 - Key generation did not modify p ok 15 - Shared secrets match ok 16 - Key generation did not modify g ok 17 - Key generation did not modify p ok 18 - Shared secrets match ok 19 - Key generation did not modify g ok 20 - Key generation did not modify p ok 21 - Shared secrets match ok All tests successful. Files=2, Tests=22, 6 wallclock secs ( 0.03 usr 0.02 sys + 5.60 cusr 0.03 csys = 5.68 CPU) Result: PASS MITHALDU/Crypt-DH-0.07.tar.gz Tests succeeded but one dependency not OK (Math::BigInt::GMP) MITHALDU/Crypt-DH-0.07.tar.gz [dependencies] -- NA SCHWIGON/Net-SSH-Perl-2.01.tar.gz Has already been unwrapped into directory /home/fly1800/cpanfly-5.18/var/cpan/build/Net-SSH-Perl-2.01-BkMpAX SCHWIGON/Net-SSH-Perl-2.01.tar.gz Has already been prepared Running make for S/SC/SCHWIGON/Net-SSH-Perl-2.01.tar.gz Warning: Prerequisite 'Crypt::DH => 0.01' for 'SCHWIGON/Net-SSH-Perl-2.01.tar.gz' failed when processing 'MITHALDU/Crypt-DH-0.07.tar.gz' with 'make_test => NO one dependency not OK (Math::BigInt::GMP)'. Continuing, but chances to succeed are limited. >>> make cp lib/Net/SSH/Perl/Cipher/AES256_CBC.pm blib/lib/Net/SSH/Perl/Cipher/AES256_CBC.pm cp lib/Net/SSH/Perl/Cipher/ChachaPoly.xs blib/lib/Net/SSH/Perl/Cipher/ChachaPoly.xs cp lib/Net/SSH/Perl/Key.pm blib/lib/Net/SSH/Perl/Key.pm cp lib/Net/SSH/Perl/Buffer.pm blib/lib/Net/SSH/Perl/Buffer.pm cp lib/Net/SSH/Perl/Comp.pm blib/lib/Net/SSH/Perl/Comp.pm cp lib/Net/SSH/Perl/Util/Authfile.pm blib/lib/Net/SSH/Perl/Util/Authfile.pm cp lib/Net/SSH/Perl/Cipher/AES192_CBC.pm blib/lib/Net/SSH/Perl/Cipher/AES192_CBC.pm cp lib/Net/SSH/Perl/ChannelMgr.pm blib/lib/Net/SSH/Perl/ChannelMgr.pm cp lib/Net/SSH/Perl.pm blib/lib/Net/SSH/Perl.pm cp lib/Net/SSH/Perl/Auth/RSA.pm blib/lib/Net/SSH/Perl/Auth/RSA.pm cp lib/Net/SSH/Perl/Util/SSH1MP.pm blib/lib/Net/SSH/Perl/Util/SSH1MP.pm cp lib/Net/SSH/Perl/Subsystem/Server.pm blib/lib/Net/SSH/Perl/Subsystem/Server.pm cp lib/Net/SSH/Perl/Config.pm blib/lib/Net/SSH/Perl/Config.pm cp lib/Net/SSH/Perl/Cipher.pm blib/lib/Net/SSH/Perl/Cipher.pm cp lib/Net/SSH/Perl/Kex/DH.pm blib/lib/Net/SSH/Perl/Kex/DH.pm cp lib/Net/SSH/Perl/Util/SSH2MP.pm blib/lib/Net/SSH/Perl/Util/SSH2MP.pm cp lib/Net/SSH/Perl/Handle/SSH1.pm blib/lib/Net/SSH/Perl/Handle/SSH1.pm cp lib/Net/SSH/Perl/Cipher/CTR.pm blib/lib/Net/SSH/Perl/Cipher/CTR.pm cp lib/Net/SSH/Perl/Auth.pm blib/lib/Net/SSH/Perl/Auth.pm cp lib/Net/SSH/Perl/Cipher/DES3.pm blib/lib/Net/SSH/Perl/Cipher/DES3.pm cp lib/Net/SSH/Perl/Util/SSH1Misc.pm blib/lib/Net/SSH/Perl/Util/SSH1Misc.pm cp lib/Net/SSH/Perl/Constants.pm blib/lib/Net/SSH/Perl/Constants.pm cp lib/Net/SSH/Perl/Handle.pm blib/lib/Net/SSH/Perl/Handle.pm cp lib/Net/SSH/Perl/Auth/KeyboardInt.pm blib/lib/Net/SSH/Perl/Auth/KeyboardInt.pm cp lib/Net/SSH/Perl/Agent.pm blib/lib/Net/SSH/Perl/Agent.pm cp lib/Net/SSH/Perl/Kex/DHGEXSHA1.pm blib/lib/Net/SSH/Perl/Kex/DHGEXSHA1.pm cp lib/Net/SSH/Perl/Kex/DH14.pm blib/lib/Net/SSH/Perl/Kex/DH14.pm cp lib/Net/SSH/Perl/Cipher/AES256_CTR.pm blib/lib/Net/SSH/Perl/Cipher/AES256_CTR.pm cp lib/Net/SSH/Perl/Cipher/Blowfish.pm blib/lib/Net/SSH/Perl/Cipher/Blowfish.pm cp lib/Net/SSH/Perl/Cipher/AES_CBC.pm blib/lib/Net/SSH/Perl/Cipher/AES_CBC.pm cp lib/Net/SSH/Perl/Cipher/ChachaPoly.pm blib/lib/Net/SSH/Perl/Cipher/ChachaPoly.pm cp lib/Net/SSH/Perl/Key/Ed25519.pm blib/lib/Net/SSH/Perl/Key/Ed25519.pm cp lib/Net/SSH/Perl/Auth/Rhosts_RSA.pm blib/lib/Net/SSH/Perl/Auth/Rhosts_RSA.pm cp lib/Net/SSH/Perl/Mac.pm blib/lib/Net/SSH/Perl/Mac.pm cp lib/Net/SSH/Perl/AuthMgr.pm blib/lib/Net/SSH/Perl/AuthMgr.pm cp lib/Net/SSH/Perl/Handle/SSH2.pm blib/lib/Net/SSH/Perl/Handle/SSH2.pm cp lib/Net/SSH/Perl/Cipher/AES128_CTR.pm blib/lib/Net/SSH/Perl/Cipher/AES128_CTR.pm cp lib/Net/SSH/Perl/Util/RSA.pm blib/lib/Net/SSH/Perl/Util/RSA.pm cp lib/Net/SSH/Perl/Cipher/CBC.pm blib/lib/Net/SSH/Perl/Cipher/CBC.pm cp lib/Net/SSH/Perl/Util.pm blib/lib/Net/SSH/Perl/Util.pm cp lib/Net/SSH/Perl/Auth/PublicKey.pm blib/lib/Net/SSH/Perl/Auth/PublicKey.pm cp lib/Net/SSH/Perl/Auth/ChallengeResponse.pm blib/lib/Net/SSH/Perl/Auth/ChallengeResponse.pm cp lib/Net/SSH/Perl/Util/Term.pm blib/lib/Net/SSH/Perl/Util/Term.pm cp lib/Net/SSH/Perl/Auth/KeyboardInteractive.pm blib/lib/Net/SSH/Perl/Auth/KeyboardInteractive.pm cp lib/Net/SSH/Perl/Cipher/AES_CTR.pm blib/lib/Net/SSH/Perl/Cipher/AES_CTR.pm cp lib/Net/SSH/Perl/Cipher/DES.pm blib/lib/Net/SSH/Perl/Cipher/DES.pm cp lib/Net/SSH/Perl/Kex/C25519.pm blib/lib/Net/SSH/Perl/Kex/C25519.pm cp lib/Net/SSH/Perl/Kex/DHGEXSHA256.pm blib/lib/Net/SSH/Perl/Kex/DHGEXSHA256.pm cp lib/Net/SSH/Perl/Cipher/AES192_CTR.pm blib/lib/Net/SSH/Perl/Cipher/AES192_CTR.pm cp lib/Net/SSH/Perl/Proxy.pm blib/lib/Net/SSH/Perl/Proxy.pm cp lib/Net/SSH/Perl/Cipher/IDEA.pm blib/lib/Net/SSH/Perl/Cipher/IDEA.pm cp lib/Net/SSH/Perl/Auth/Password.pm blib/lib/Net/SSH/Perl/Auth/Password.pm cp lib/Net/SSH/Perl/Key/DSA.pm blib/lib/Net/SSH/Perl/Key/DSA.pm cp lib/Net/SSH/Perl/Cipher/RC4.pm blib/lib/Net/SSH/Perl/Cipher/RC4.pm cp lib/Net/SSH/Perl/Cipher/AES128_CBC.pm blib/lib/Net/SSH/Perl/Cipher/AES128_CBC.pm cp lib/Net/SSH/Perl/Kex.pm blib/lib/Net/SSH/Perl/Kex.pm cp lib/Net/SSH/Perl/Cipher/CFB.pm blib/lib/Net/SSH/Perl/Cipher/CFB.pm cp lib/Net/SSH/Perl/SSH1.pm blib/lib/Net/SSH/Perl/SSH1.pm cp lib/Net/SSH/Perl/Util/Hosts.pm blib/lib/Net/SSH/Perl/Util/Hosts.pm cp lib/Net/SSH/Perl/Channel.pm blib/lib/Net/SSH/Perl/Channel.pm cp lib/Net/SSH/Perl/Auth/Rhosts.pm blib/lib/Net/SSH/Perl/Auth/Rhosts.pm cp lib/Net/SSH/Perl/Kex/DH1.pm blib/lib/Net/SSH/Perl/Kex/DH1.pm cp lib/Net/SSH/Perl/Subsystem/Client.pm blib/lib/Net/SSH/Perl/Subsystem/Client.pm cp lib/Net/SSH/Perl/Util/Win32.pm blib/lib/Net/SSH/Perl/Util/Win32.pm cp lib/Net/SSH/Perl/Key/RSA1.pm blib/lib/Net/SSH/Perl/Key/RSA1.pm cp lib/Net/SSH/Perl/Key/Ed25519.xs blib/lib/Net/SSH/Perl/Key/Ed25519.xs cp lib/Net/SSH/Perl/Packet.pm blib/lib/Net/SSH/Perl/Packet.pm cp lib/Net/SSH/Perl/SSH2.pm blib/lib/Net/SSH/Perl/SSH2.pm cp lib/Net/SSH/Perl/Key/RSA.pm blib/lib/Net/SSH/Perl/Key/RSA.pm cp lib/Net/SSH/Perl/Kex/DHGEX.pm blib/lib/Net/SSH/Perl/Kex/DHGEX.pm cp lib/Net/SSH/Perl/Comp/Zlib.pm blib/lib/Net/SSH/Perl/Comp/Zlib.pm Running Mkbootstrap for Net::SSH::Perl () chmod 644 "Perl.bs" "/home/fly1800/ap1800-297235/bin/perl-static" "/home/fly1800/cpanfly-5.18/var/megalib/ExtUtils/xsubpp" -typemap "/home/fly1800/ap1800-297235/lib/ExtUtils/typemap" -typemap "typemap" Perl.xs > Perl.xsc && mv Perl.xsc Perl.c gcc -c -D_REENTRANT -D_GNU_SOURCE -DUSE_SITECUSTOMIZE -DPERL_RELOCATABLE_INCPUSH -fno-merge-constants -fno-strict-aliasing -pipe -fstack-protector -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O2 -DVERSION=\"2.01\" -DXS_VERSION=\"2.01\" -fPIC "-I/home/fly1800/ap1800-297235/lib/CORE" Perl.c In file included from src/chacha/chacha.c:9, from Perl.c:191: src/chacha/chacha.h:25: warning: '__bounded__' attribute directive ignored src/chacha/chacha.h:28: warning: '__bounded__' attribute directive ignored src/chacha/chacha.h:28: warning: '__bounded__' attribute directive ignored src/chacha/chacha.h:32: warning: '__bounded__' attribute directive ignored src/chacha/chacha.h:32: warning: '__bounded__' attribute directive ignored In file included from src/chacha/poly1305.c:10, from Perl.c:193: src/chacha/poly1305.h:20: warning: '__bounded__' attribute directive ignored src/chacha/poly1305.h:20: warning: '__bounded__' attribute directive ignored src/chacha/poly1305.h:20: warning: '__bounded__' attribute directive ignored rm -f blib/arch/auto/Net/SSH/Perl/Perl.so gcc -shared -O2 -fstack-protector Perl.o -o blib/arch/auto/Net/SSH/Perl/Perl.so \ \ chmod 755 blib/arch/auto/Net/SSH/Perl/Perl.so "/home/fly1800/ap1800-297235/bin/perl-static" -MExtUtils::Command::MM -e 'cp_nonempty' -- Perl.bs blib/arch/auto/Net/SSH/Perl/Perl.bs 644 Manifying 57 pod documents SCHWIGON/Net-SSH-Perl-2.01.tar.gz make -- OK Running make test >>> make test TEST_VERBOSE=1 Running Mkbootstrap for Net::SSH::Perl () chmod 644 "Perl.bs" PERL_DL_NONLAZY=1 "/home/fly1800/ap1800-297235/bin/perl-static" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/00-signature.t ... skipped: Set the environment variable TEST_SIGNATURE to enable this test t/01-compile.t ..... 1..1 ok 1 - use Net::SSH::Perl; ok t/02-buffer.t ...... 1..19 ok 1 - make a buffer ok 2 - buffer length is 7 ok 3 - get_str returns "foo" ok 4 - offset is 7 ok 5 - get_str returns 0 ok 6 - get_int32 returns 999,99,999 ok 7 - get_int8 returns 2 ok 8 - get_char returns "a" ok 9 - get_mp_int returns very large number ok 10 - offset is 0 after empty() ok 11 - length is 0 after empty() ok 12 - bytes is "" after empty() ok 13 - length is 6 after append ok 14 - bytes is "foobar" after append ok 15 - length is 0 after empty() again ok 16 - dump returns "" ok 17 - get_int16 returns 129 ok 18 - dump returns "00 81" ok 19 - dump(1) returns "81" ok t/03-packet.t ...... 1..10 ok 1 - created a packet ok 2 - read a packet back ok 3 - packet type is SSH_CMSG_USER ok 4 - get_str returns "foo" ok 5 - sending success and expecting a failure message croaks ok 6 - check failure message ok 7 - read fails after disconnect ok 8 - error message on read after disconnect ok 9 - packet type is SSH_SMSG_FAILURE ok 10 - second packet type is SSH_CMSG_EOF ok t/04-config.t ...... 1..25 ok 1 - created config object ok 2 - port is 10000 ok 3 - port was set to 5000 ok 4 - got identity_files config ok 5 - got two entries ok 6 - first entry is "identity" ok 7 - second entry is "identity2" ok 8 - cipher is IDEA after merge ok 9 - create a new config with an overridden option ok 10 - port is 22 ok 11 - auth_rhosts is false ok 12 - host is "dummy" ok 13 - port is 5000 ok 14 - interactive is true ok 15 - make a new SSH object ok 16 - object has config ok 17 - port for object is 10000 ok 18 - hostname is foo.bar.com ok 19 - host key in object is foo.bar.com ok 20 - port is 22 after override in SSH constructor ok 21 - port is 22 after override via "options" ok 22 - auth_rhosts is false ok 23 - interactive is true ok 24 - user is "bar" ok 25 - user is "bar" after ->login ok t/05-cipher.t ...... 1..72 ok 1 - First argument was true from line 49 ok 2 - Second argument was true from line 49 ok 3 - Values matched from line 49 ok 4 - Values matched from line 49 ok 5 - First argument was true from line 54 ok 6 - Second argument was true from line 54 ok 7 - Values matched from line 54 ok 8 - Values matched from line 54 ok 9 - First argument was true from line 59 ok 10 - Second argument was true from line 59 ok 11 - Values matched from line 59 ok 12 - Values matched from line 59 ok 13 - First argument was true from line 49 ok 14 - Second argument was true from line 49 ok 15 - Values matched from line 49 ok 16 - Values matched from line 49 ok 17 - First argument was true from line 54 ok 18 - Second argument was true from line 54 ok 19 - Values matched from line 54 ok 20 - Values matched from line 54 ok 21 - First argument was true from line 59 ok 22 - Second argument was true from line 59 ok 23 - Values matched from line 59 ok 24 - Values matched from line 59 ok 25 - First argument was true from line 49 ok 26 - Second argument was true from line 49 ok 27 - Values matched from line 49 ok 28 - Values matched from line 49 ok 29 - First argument was true from line 54 ok 30 - Second argument was true from line 54 ok 31 - Values matched from line 54 ok 32 - Values matched from line 54 ok 33 - First argument was true from line 59 ok 34 - Second argument was true from line 59 ok 35 - Values matched from line 59 ok 36 - Values matched from line 59 ok 37 - First argument was true from line 49 ok 38 - Second argument was true from line 49 ok 39 - Values matched from line 49 ok 40 - Values matched from line 49 ok 41 - First argument was true from line 54 ok 42 - Second argument was true from line 54 ok 43 - Values matched from line 54 ok 44 - Values matched from line 54 ok 45 - First argument was true from line 59 ok 46 - Second argument was true from line 59 ok 47 - Values matched from line 59 ok 48 - Values matched from line 59 ok 49 - First argument was true from line 49 ok 50 - Second argument was true from line 49 ok 51 - Values matched from line 49 ok 52 - Values matched from line 49 ok 53 - First argument was true from line 54 ok 54 - Second argument was true from line 54 ok 55 - Values matched from line 54 ok 56 - Values matched from line 54 ok 57 - First argument was true from line 59 ok 58 - Second argument was true from line 59 ok 59 - Values matched from line 59 ok 60 - Values matched from line 59 ok 61 - First argument was true from line 49 ok 62 - Second argument was true from line 49 ok 63 - Values matched from line 49 ok 64 - Values matched from line 49 ok 65 - First argument was true from line 54 ok 66 - Second argument was true from line 54 ok 67 - Values matched from line 54 ok 68 - Values matched from line 54 ok 69 - First argument was true from line 59 ok 70 - Second argument was true from line 59 ok 71 - Values matched from line 59 ok 72 - Values matched from line 59 ok t/06-auth.t ........ skipped: Test not enabled yet t/06-circular.t .... 1..1 # Running under perl version 5.018000 for linux # Current time local: Sun Apr 24 12:08:46 2016 # Current time GMT: Sun Apr 24 19:08:46 2016 # Using Test.pm version 1.26 ok 1 ok t/07-ed25519.t ..... 1..5 ok 1 - use Net::SSH::Perl::Key; ok 2 - Key generated ok 3 - Signature generated ok 4 - Signature verified ok 5 - Read key file ok t/99-perlcritic.t .. skipped: Set the environment variable TEST_CRITIC to enable this test t/99-pod.t ......... skipped: Test not ready yet. t/99-spellcheck.t .. skipped: Set the environment variable TEST_SPELL to enable this test t/99-yaml.t ........ skipped: Set the environment variable TEST_AUTHOR to enable this test All tests successful. Files=13, Tests=133, 2 wallclock secs ( 0.07 usr 0.01 sys + 1.57 cusr 0.10 csys = 1.75 CPU) Result: PASS SCHWIGON/Net-SSH-Perl-2.01.tar.gz Tests succeeded but one dependency not OK (Crypt::DH) SCHWIGON/Net-SSH-Perl-2.01.tar.gz [dependencies] -- NA VmSize: 153856 kB Finished 2016-04-24T12:08:47